ReadLn und ReadBuffer

[endeffects]

leider funktioniert CB[0] nicht, wenn ich das gegen
CB ersetze wird beim onclick event eine schutzverletzung ausgelöst,

folgender code funktioniert nun:

Code:

    procedure TForm.Button1Click(Sender: TObject);
    begin
        with IdTCPClient do
        begin
            Write('request');
            Memo.Lines.Add(CurrentReadBuffer);
        end;
    end;

jemand vielleicht noch eine idee wie man
den buffer vorher leert, um nur die aktuellen
daten auszugeben?