komunikator - w lines.add o jedną linię za dużo

0

Mam TImer'a z takim kodem:

procedure TForm1.Timer1Timer(Sender: TObject);
begin
if not IdTCPClient2.Connected then IdTCPClient2.connect;
IdTCPClient2.SendCmd('GET');
if IdTCPClient2.LastCmdResult.TextCode = '300' then memo1.Lines.add('rozmówca: ' + IdTCPClient2.LastCmdResult.text.Text);
end;

Jednak po wyświetleniu tekstu dodaje się samoczynnie kolejna pusta linia. Dlaczego?

przykład memo:

rozmówca: jakiś tam tekst

rozmówca: kolejny tekst

rozmówca: coś jeszcze
0

Nie wysyłasz przypadkiem nadmiarowego \n między klientami? [trim albo lepiej kontroluj co przesyłasz]

1 użytkowników online, w tym zalogowanych: 0, gości: 1