Daten von ComPort in Stringliste speichern

[Steve]

Hi,
evtl. gehts so:

Delphi-Quellcode:

procedure TForm1.ApdComPort1TriggerAvail(CP: TObject; Count: Word);
var
  I: Integer;
  txt: STRING;
begin
  txt := '';
  for I:= 0 to Count-1 do
  begin
    txt := txt+ApdComPort1.GetChar;
  end;
  List.Add(txt);
  List.SaveToFile(ExtractFilePath(ParamStr(0))+ 'temp.txt');
end;

[edit] Sind evtl CR/LF's (#13#10) in der empfangenen Zeichenkette enthalten? [/edit]
Gruß
Stephan