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 := line:__enumIndex()
> EXIT
> ENDIF
> NEXT
>
> ASize( aLine, nNewSize )
>
> RETURN aLine
>
Perfect.
Regards
Pritpal Bedi
--
View this message in context:
http://old.nabble.com/SF.net-SVN%3A-harbour-project%3A-13135--trunk-harbour-tp26658015p26667140.html
Sent from the Harbour - Dev mailing list archive at Nabble.com.
_______________________________________________
Harbour mailing list (attachment size limit: 40KB)
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour
