Supi, ich habs jetzt:
Delphi-Quellcode:
procedure TForm2.Button1Click(Sender: TObject);
var
buffer: shortstring;
dw : dword;
begin
Timer1.enabled:=true;
ReadFile(Pipe, buffer[0], sizeof(buffer), dw, nil);
buffer[0] := Char(dw);
Memo1.Lines.Add(buffer);
end;
Jetzt hab ich nur gelegentlich Zeilen mit Zeichen die nicht in der Pipe sind. Vermutlich genau dann, wenn die Pipe gerade bedient wird und mein Timer eine Abfrage startet.
kuba