Registriert seit: 31. Jul 2003
Ort: Dresden
1.386 Beiträge
Delphi 7 Architect
|
Re: Stream und Datei
14. Jun 2004, 00:59
Delphi-Quellcode:
var stm1,
stm2 : TStream;
...
stm1 := TFileStream.Create('datei1', fmOpenRead);
stm2 := TFileStream.Create('datei2', fmCreate);
stm1.Seek(stm1.Size div 2, soFromBeginning);
stm2.CopyFrom(stm1);
stm1.Free;
stm2.Free;
Vorsichtig! Nicht getestet!
- ciao neo -
Es gibt niemals dumme Fragen, sondern nur dumme Antworten!
|