Phantom Zip v2.0

[Matze]

Zitat von Luckie:

Warum sollte man sich auch mit Kompression beschäftigen, wenn man ein Packprogramm schreibt? Ist doch nebensächlich.

Welche Kompressionsstufe ist denn aktuell im Programm hinterlegt?
Das muss man normalerweise bei Zip-Komponenten angeben können.

Für fortgeschrittene Einstellungen, könntest du auch die 7zip.dll nutzen. Du hast dann jedoch diese Dll-Datei neben deiner Exe im Verzeichnis. Was aber nicht stört, da du sowieso mehrere Dateien auslieferst.

[-Phantom-]

@Hunni

Dafür gibt es "Entpacken nach"

@ Matze

ja würde ich gerne machen, damit ich auch andere Formate öffnen und entpacken kann. Ist du umsonst? Wo kann ich die Downlodden?

>> das muss höhst wahrscheinlich die richtige sein
http://www.dlldll.com/7-zip.dll_download.html

[Matze]

Die wird mit 7zip ausgeliefert und ist kostenlos ja.
Die Lizenz musst du natürlich beachten. Delphi-Beispiele gibt's meines Wissens auch irgendwo.

Ich vermute, du machst das Projekt aus Spaß an der Freud', denn 7zip kannst du damit natürlich nicht toppen in Sachen Funktionalität.

Ich habe eine 7z.dll und eine 7-zip.dll. Ich weiß grad gar nicht, welche die richtige ist.

Edit: 7zip plugin Api

[-Phantom-]

Ja stimmt schon das ich es auf "Fun" mache. Denn ich bin noch ein Delphi Anfänger ... Ich meine ich programmier erst 9 Monate. Und bei jedem Projekt was ich mache lerne ich eine menge dazu. Jetzt werde ich wahrscheinlich lernen wie man mit dll's arbeitet

[Matze]

Zitat von -Phantom-:

Jetzt werde ich wahrscheinlich lernen wie man mit dll's arbeitet

Danke der API kriegst du davon eigentlich nichts mit, es sei denn, du versuchst deren Code zu verstehen.

[-Phantom-]

Ich finde die "7z.dll" nirgendwo. Ich hab die 7.-zip.dll gefunden. Aber ich weiß nun nicht wie ich das machen muss. ( muss ich dafür ein neues Thema öffnen ?)
Das ist mein Versuch : ( nicht böse sein wenn das total daneben ist hab noch nie mit Dll's rum hantiert )

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject) stdcall;
external '7-zip.dll';
begin
   with CreateInArchive(CLSID_CFormatZip) do
   begin
     OpenFile('C:\Users\Administrator\Desktop\test.zip');
     ExtractTo('C:\Users\Administrator\Desktop\test');
 end;
end;

Als Fehler kommt das er "CreateInArchive", "Openfile", und "Extractto" nicht kennt

[cookie22]

die dll ist mit im archiv.