Modificata la get_memo(), rimuove l'eventuale \r alla fine della

riga ed esegue il ciclo per il numero effettivo di item nella TToken_string.


git-svn-id: svn://10.65.10.50/trunk@3183 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
angelo 1996-07-15 07:14:58 +00:00
parent 6dc34cef7a
commit 7fc9ac8d8e

View File

@ -2781,9 +2781,14 @@ bool TRectype::get_memo(
TTextfile& txt) const // @parm Reference della variabile a cui assegnare il contenuto dell campo
{
TToken_string memo( get( fieldname ), '\n' );
int last = memo.items( );
for( int i = 0; i < items( ); i ++ )
txt.append( memo.get( i ) );
const int last = memo.items( );
for( int i = 0; i < last; i ++ )
{
TString m(memo.get(i));
const int l = m.len() > 0 ? m.len()-1 : 0;
if (m[l] == '\r') m.cut(l);
txt.append( m );
}
return TRUE;
}