hallo ihr,
folgendes... ich will eine exe komprimieren und dafür will ich die LH5
unit benutzen.
Es geht um folgende procedure:
procedure LHACompress(InStr, OutStr: TStream);
Das problem ist jetzt, ich weiss wie ich den stream einlesen kann:
InStr:= TFileStream.Create('Datei.exe', fmCreate);
Aber wie bekomme ich OutStr in eine datei bzw stream.
Ich habe folgendes probiert funzt aber nicht:
Delphi-Quellcode:
InStr:= TFileStream.Create('Datei.exe', fmCreate);
OutStr.Position := 0;
LHACompress(InStr,OutStr);
OutStr := TFileStream.Create('datei.exe', fmCreate) ; //diese zeile ist überflüssig
Würd mich freuen, wenn ihr mir helfen könnt.