Einzelnen Beitrag anzeigen

Benutzerbild von maximov
maximov

Registriert seit: 2. Okt 2003
Ort: Hamburg
548 Beiträge
 
Delphi 2005 Professional
 
#9

Re: Blockread oder Tfilestream was nu ???

  Alt 29. Jun 2004, 12:17
Na an stelle X in der datei (X=byte vom anfang der datei).

in etwa so:
Delphi-Quellcode:
var buffer:array[0..1023] od byte;
..
var fileStream : TFileStream;
begin
  fileStream := TFileStream.Create(fileName, fmOpenCreate oder so);
  try
    fileStream.position := X;
    fileStream.readBuffer(buffer[0],sizeOf(buffer));
    // buffer ändern
    buffer[42] := 42;
    // zurück damit
    fileStream.position := X;
    fileStream.writeBuffer(buffer[0],sizeOf(buffer));
  finally
    fileStream.free;
  end;
oder spricht da was gegen?
mâxîmôv.

{KDT}
  Mit Zitat antworten Zitat