Viktor Szakáts wrote:
>
> This seems even more optimized:
> ---
> FUNCTION MemoToArray( s )
>LOCAL aLine := hb_ATokens( StrTran( RTrim( s ), CRLF, _EOL ), _EOL )
>LOCAL nNewSize := 0
>LOCAL line
>
>FOR EACH line IN aLine DESCEND
> IF ! Empty( line )
> nNewSize :=
This seems even more optimized:
---
FUNCTION MemoToArray( s )
LOCAL aLine := hb_ATokens( StrTran( RTrim( s ), CRLF, _EOL ), _EOL )
LOCAL nNewSize := 0
LOCAL line
FOR EACH line IN aLine DESCEND
IF ! Empty( line )
nNewSize := line:__enumIndex()
EXIT
ENDIF
Manu,
Google traduce fácil y aceptablemente: al menos eso creo. :)
http://translate.google.com/?hl=es#es|en
"
Hello Pritpal, I see that you use a lot len(a) inside the loops and is
evaluation at each iteration.
For example MemoToArray would be more optimized as follows:
"
Un saludo
Xavi
Manu e
Hi
xMen wrote:
>
> Hola Pritpal veo que usas mucho len( a ) dentro de los bucles y eso se
> evalua en cada iteración.
> Por ejemplo MemoToArray quedaría más optimizada así:
>
I can understand English only, but no problem, I can sense what you mean.
> FUNCTION MemoToArray( s )
>LOCAL
Hola Pritpal veo que usas mucho len( a ) dentro de los bucles y eso se
evalua en cada iteración.
Por ejemplo MemoToArray quedaría más optimizada así:
FUNCTION MemoToArray( s )
LOCAL a_, b_, i, j, n
s := trim( s )
s := strtran( s, CRLF, _EOL )
a_:= hb_atokens( s, _EOL )
n := len( a_ )
> Log Message:
> ---
> 2009-12-05 09:57 UTC-0800 Pritpal Bedi (prit...@vouchcac.com)
> * contrib/hbide/hbide.prg
> * contrib/hbide/projects/hbide.hbi
> * contrib/hbide/resources/projectproperties.ui
>! Probably now dialog will exit cleanly on .
>! Destroyed more Qt objects on ex
Revision: 13135
http://harbour-project.svn.sourceforge.net/harbour-project/?rev=13135&view=rev
Author: vouchcac
Date: 2009-12-05 18:04:12 + (Sat, 05 Dec 2009)
Log Message:
---
2009-12-05 09:57 UTC-0800 Pritpal Bedi (prit...@vouchcac.com)
* contrib/hbide/hbide.prg
*
