ReadLn und ReadBuffer

[endeffects]

hallo,

also ich hab eine bestehende server verbindung
und sende einen request an den server und
möchte ich die antwort in ein memo packen,
nun weiß ich allerdings nicht wie ich abfrage
ob der buffer lesbar ist, zur zeit wird die
anwendung mit einem exception fehler abgebrochen

Code:

procedure TForm.Button1Click(Sender: TObject);
var cb: string;
begin
  with IdTCPClient do
    begin
      try
        Write(request');
        //if ???readable(2000)??? = true then begin
             ReadBuffer(CB, SizeOf (CB));
             Memo.Lines.Add(cb);
        //end;
      except
        on E : Exception do
          ShowMessage(E.Message);
      end;
    end;