Com-Schnittstelle / Problem beim Empfang

[gezschongezahlt]

Guten Tag,
ich bin neu hier im Forum.
Ich habe folgendes Problem:
Ich arbeite mit der Komponente ApdComPort und steuere
damit ein Messmodul(ct'Lab) über die serielle Schnittstelle an.
Das mit dem senden klappt schon mal (es blinkt eine LED, wenn was ankommt).
Daraufhin müsste eine Antwort kommen,
womit ich nun zu meinem Problem komme;
diese kann ich nicht empfangen/abfangen.
Im Grunde läuft es mom noch darauf hinaus,
eine Art Terminal nachzubauen..


hier geschieht das senden...

Delphi-Quellcode:

procedure v24putString(s:String);
var i:Integer;
   begin

   if ApdComPort.OutBuffFree >= (length(s)+2) then
     begin

        ApdComPort.PutString(s+#13#10); 

     end ;
end;

mit diesem Event wollte ich die Daten Emfangen:

Delphi-Quellcode:

procedure TForm1.ApdComPort1TriggerAvail(CP: TObject; Count: Word);
var
  s: String;
  I: Word;
begin
 showmessage('Empfangen!!');
  s:='';
  for I := 1 to Count do 
    s := s + ApdComPort.GetChar;
    showmessage(s);
    Memo1.Lines.Add(s);
end;

Wäre für jede Hilfe sehr dankbar!