Einzelnen Beitrag anzeigen

Benutzerbild von Uwe Raabe
Uwe Raabe

Registriert seit: 20. Jan 2006
Ort: Lübbecke
11.475 Beiträge
 
Delphi 12 Athens
 
#8

AW: TZipFile und TMemoryStream

  Alt 8. Feb 2021, 18:23
Ca 100 dieser Dateien sind in dem Zip-Archiv gespeichert und ich will sie öffnen, ohne sie auf der Platte (zwischen)speichern zu müssen.
Eventuell so:
Delphi-Quellcode:
var
  header: TZipHeader;
  matrix: TFussballMatrix;
  MyZip: TZipFile;
  stream: TStream;
begin
  ...
  MyZip.Read(0, stream, header);
  try
    stream.Read(matrix, Sizeof(matrix));
  finally
    stream.Free;
  end;
  ...
Uwe Raabe
Certified Delphi Master Developer
Embarcadero MVP
Blog: The Art of Delphi Programming
  Mit Zitat antworten Zitat