Registriert seit: 11. Nov 2003
Ort: Oldenburg
1.446 Beiträge
Delphi 10.2 Tokyo Enterprise
|
Re: Problem mit Stream
4. Nov 2005, 15:20
Ich glaub du hast da ein paar fehler
Delphi-Quellcode:
FileS := TFileStream.Create(FN, fmOpenWrite); //das muss fmOpenRead heisen
FileS.ReadBuffer(Buf, FileS.Size); //und wenn deine Datei mehr als 255 Zeichen hat gibst auch mecker
Frank Tux sein Lieblingsquellcode
While anzfische<TuxSatt do begin
Fisch:=TFisch.Create; Tux.EssenFisch(Fisch); Fisch.Free;inc(anzfische); end;
|