Registriert seit: 25. Nov 2005
Ort: Seligenstadt
7 Beiträge
Delphi 2007 Architect
|
Re: PAnsiChar mit write in Datei schreiben
17. Nov 2008, 12:04
Hi, such mal hier im Forum nach "BlockWrite". Da bekommst Du schon jede Menge Hinweise.
var
WrittenBytes : integer;
DestFile : file;
..
{$I-}
BlockWrite(DestFile,buf^[0],10000,WrittenBytes);
{$I+}
if (IOResult<>0) then exit;
if (WrittenBytes<>10000) then exit;
..
Tipp: Dreckiges Geschirr schimmelt nicht, wenn man es einfriert.
|