TStrings i białe znaki

[duf]

KOD cpp:   �  UKRYJ  �

KOD cpp:   �  POKAŻ  �

TStrings* plik = new TStringList;
plik->Text = "a";
plik->Text = plik->Text + "b";
ShowMessage( plik->Text );
ShowMessage( plik->Text.Length() );
 

Proszę o wytłumaczenie dlaczego:
1. w ShowMessage widzę litery jedna pod drugą czyli litera 'a' posiada znak nowej linii
a
b

2. Długość tekstu 'plik->Text' wynosi 6 znaków skoro są tylko dwa znaki
Czy jest możliwe żeby plik->Text zawierał tylko tekst 'ab' w przypadku łączenia jak w przykładzie?

[Mironas]

TStrings na końcu ostatniego wiersza zawsze dodaje 'znak końca wiersza'. Taki znak wg standardu Windows to tak naprawdę dwa znaki: \r oraz \n (dec: 13 10, hex: 0D 0A) czyli powrót karetki i następny wiersz. Jeśli dajesz:

KOD cpp:   �  UKRYJ  �

KOD cpp:   �  POKAŻ  �

plik->Text = "a";

to zawartość 'plik->Text' będzie zawierać 3 znaki:
a\r\n

Jeśli do tego dodajesz:

KOD cpp:   �  UKRYJ  �

KOD cpp:   �  POKAŻ  �

plik->Text = plik->Text + "b";

to zawartość 'plik->Text' wygląda następująco:
a\r\n
b\r\n
czyli razem 6 znaków.

Jeśli chcesz zmodyfikować wybrany wiersz to powinieneś użyć 'Strings[x]' ('x' to numer wiersza liczony od zera):

KOD cpp:   �  UKRYJ  �

KOD cpp:   �  POKAŻ  �

String wiersz = plik->Strings[x];
wiersz = wiersz.SubString(1, wiersz.Length()-2);  // obcięcie dwóch ostatnich znaków
plik->Strings[x] = wiersz + "b";
 

[duf]

wiersz = wiersz.SubString( 1, wiersz.Length() );
Dzięki. ale Dopiero teraz jest samo 'a'

[Cyfrowy Baron]

Można też posłużyć się funkcją Trim do obcinania białych znaków:

KOD cpp:   �  UKRYJ  �

KOD cpp:   �  POKAŻ  �

TStrings *plik = new TStringList;

plik->Text = "a";
plik->Text = plik->Text.Trim() + "b";


ShowMessage( plik->Text.Trim() );
ShowMessage( plik->Text.Trim().Length() );