Ergebnis der Suchanfrage

• Forum: Sonstige Fragen zu Delphi

  Re: im FileStream bestimmte Zeichen ersetzen

    Delphi
    by Satty67, 4. Jun 2009
  Hab es mal gemessen... die Variante von himitsu ist etwa 50x schneller :stupid:
  
  Falls es überhaupt noch jemand interessiert ;)
  procedure MakeZeroFilledFile;
  var
  FileStream : TFileStream;
  Buffer : array of Byte;
  i : Integer;
  begin
  FileStream := TFileStream.Create('F:\WorkTemp\Leerfile.dat', fmCreate);
• Forum: Sonstige Fragen zu Delphi

  Re: im FileStream bestimmte Zeichen ersetzen

    Delphi
    by Satty67, 4. Jun 2009
  Stell Dir den Stream als großes Byte-Array vor. Du kannst nur nicht direkt darauf zugreifen, sondern musst einzelne Byte (oder Byteblöcke) mit Stream.Methoden lesen/schreiben
  Stream.Read(aByte, SizeOf(aByte))
  Stream.Write(aByte, SizeOf(aByte))
  
  Also im Prinzip nach dem öffnen zweier Streams aus dem einen ein Byte lesen... prüfen und evtl. anderen Wert zuweisen... dann Byte in zweiten Stream...