Zip Routinen

[Socke]

Danke, aber ich meinte vom Quelltext
(Warum drück ich mich immer so missverstandlich aus)

nichts leichter als das. Das funktioniert wie jedes andere Programm mit ExecuteProcess oder mit TProcess oder unter Windows auch mit ShellExecute

Code: Alles auswählen

uses Sysutils;
//...
SysUtils.ExecuteProcess('/usr/bin/7zip',['e','"Datei.7z"'])

[felix96]

Kann mein Programm auch irgendwie "Merken" ob´s keklappt hat ?
Ansonsten Super

[felix96]

Es würde mit fileexists gehen

[Socke]

Ich empfehle: http://lazarus-ccr.sourceforge.net/docs ... ocess.html
Vollständig wäre das:

Code: Alles auswählen

var
  code: Integer;
try
  code := ExecuteProcess('/usr/bin/7zip',['e','"Datei 1.zip"']);
  if code = 0 then
    ShowMessage('hat funktioniert!')
  else // Exitcode wurde vom Programm auf !=0 gesetzt
    ShowMessage('Fehler!');
except
  on E: EOSError do ShowMessage(E.Message); // wenn das Programm nicht gefunden wurde oder so
end;

[felix96]

Und wie geht das mit dem Passwort ?

[Socke]

hättest du dir die Hilfe durchgelesen, wüsstest du, dass du bswp folgendes aufrufen musst:

Code: Alles auswählen

# 7zr ist unter Linux der 7zip-Archivierer, der nur 7zip-Archive unterstützt
7zr e -pPasswort "MyZip.7z

[felix96]

Das Funktionirt aber nicht:

Code: Alles auswählen

['e','-ppasswort','"hi"','"hi.zip"']);

[Socke]

Das Funktionirt aber nicht:

Code: Alles auswählen

['e','-ppasswort','"hi"','"hi.zip"']);

Da hast du vollkommen Recht. Die Option -p ist nur zum Erstellen da, für den Rest sag ich mal RTFM

[felix96]

Da steht aber nur 02000802="Passwort"

[felix96]

Weis das keiner

[felix96]

Es wird immer nur beschrieben:
1) mit e entpacken, dann Passwort eingeben(wahrscheinlich gehts garnicht)

[_X_]

RTFM; << Weißt du was das heißt? Wenn nicht dann google mal.

[felix96]

Ohne Google:

ReadTheFuckingManual.
Ja und in der txt steht 02000802="Passwort"

Ich glaube man muss die Datei mit e entpacken,
und anschliesend muss das Programm das Passwort "eingeben"

[pluto]

Hier wird genau beschrieben, wie ein Externes Programm aufgerufen wird.
http://wiki.lazarus.freepascal.org/Exec ... rograms/de" onclick="window.open(this.href);return false;

[felix96]

Da ist aber kein Beispiel wie man in die Konsole was schreiben kann, achdem sie gestartet wurde(ich glaube das gehört zu Beispiel von "talking" mit dem aspell Prozess ")