Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi ZipMaster will alles außer exe (https://www.delphipraxis.net/79210-zipmaster-will-alles-ausser-exe.html)

Alexander Roth 18. Okt 2006 08:41


ZipMaster will alles außer exe
 
Hi @all,

also ich beutze Zipmaster. Ich habe versucht in einem neuen Projekt mit zipmaster beliebige Dateiformate zu packen. Alles kein Problem. Bis ich eine exe packen wollte. Er machte es zwar anstandslos, doch er das zip Archiv ist kein deut kleiner als die ungepackte Datei.

Wenn ich an die exe die endung exe.dat dranhänge komprimiert er es.

Wisst ihr wieso das so ist? Könntet ihr das mal bei euch ausprobieren, ob das auch so ist?
Gibt es da irgendeine Einstellung die man da umschalten muss?

Und das wichtigste: Wie kriege ich exe komprimiert?


Ach ja den Code:
Delphi-Quellcode:
        zipmaster1.ZipFileName:=programpath+'.zip';
        ZipMaster1.FSpecArgs.Add(programname);
        ZipMaster1.Add;
Dann noch das da:
Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
begin
   ZipMaster1.Dll_Load := true;
end;
und
Delphi-Quellcode:
procedure TForm1.FormDestroy(Sender: TObject);
begin
  ZipMaster1.Dll_Load := false;
end;
Das sind die Einstellungen der Komponente: (Gexperts Component to code)
Delphi-Quellcode:
var
  ZipMaster1: TZipMaster;

  ZipMaster1 := TZipMaster.Create(Self);
  with ZipMaster1 do
  begin
    Name := 'ZipMaster1';
    AddOptions := [];
    AddStoreSuffixes := [assGIF, assPNG, assZ, assZIP, assZOO, assARC, assLZH, assARJ, assTAZ, assTGZ, assLHA, assRAR, assACE, assCAB, assGZ, assGZIP, assJAR, assEXE, assJPG, assJPEG, ass7Zp, assMP3, assWMV, assWMA, assDVR, assAVI];
    Dll_Load := False;
    DLLDirectory := '..\..\Dll';
    ExtrOptions := [];
    KeepFreeOnAllDisks := 0;
    KeepFreeOnDisk1 := 0;
    MaxVolumeSize := 0;
    PasswordReqCount := 1;
    SFXOptions := [];
    SFXOverWriteMode := OvrConfirm;
    SFXPath := 'DZSFXUS.bin';
    SpanOptions := [];
    Trace := False;
    Unattended := False;
    Verbose := True;
    Version := '1.79.04.02';
    VersionInfo := '1.79.04.02';
  end;
Tschüss

Alexander

Alexander Roth 19. Okt 2006 10:59

Re: ZipMaster will alles außer exe
 
Hallooooooooo :hi:

Keiner irgendeine Idee????????

chrisw 20. Okt 2006 07:03

Re: ZipMaster will alles außer exe
 
mit UPX

Alexander Roth 20. Okt 2006 08:33

Re: ZipMaster will alles außer exe
 
Das ist natürlich eine Idee. Aber ich würde es gerne in zip packen.
Habt ihr eine Idee wieso das nur exe Dateien mit Zipmaster nicht funktionieren?

gammatester 20. Okt 2006 09:02

Re: ZipMaster will alles außer exe
 
Zitat:

Zitat von Alexander Roth
...
Delphi-Quellcode:
    AddStoreSuffixes := [assGIF, assPNG, assZ, assZIP, assZOO, assARC, assLZH, assARJ, assTAZ, assTGZ, assLHA, assRAR, assACE, assCAB, assGZ, assGZIP, assJAR, assEXE, assJPG, assJPEG, ass7Zp, assMP3, assWMV, assWMA, assDVR, assAVI];
...

Ohne zu wissen, was das Teil eigentlich macht schlage ich vor, Du solltest das assEXE aus der Menge herausnehmen, ist zumindest ein Versuch wert.

Wolfgang

Alexander Roth 20. Okt 2006 11:23

Re: ZipMaster will alles außer exe
 
Genial es Klappt!!!!!
:thumb: :thumb: :thumb:
:dancer2: :dancer2:
:dance:

Tausend Dank!


Alle Zeitangaben in WEZ +1. Es ist jetzt 02:39 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz