Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Zippen mit Passwort (https://www.delphipraxis.net/10932-zippen-mit-passwort.html)

Mauli 28. Okt 2003 10:47


Zippen mit Passwort
 
Hallo zusammen

ich würde gerne aus meinen Programm heraus eine Zipfile mit Passwort versehen.

Das mit dem Zipfile müsste ich hin bekommen:

Delphi-Quellcode:
procedure zippen;
var URL : string;
     Handle : HWND;
begin
try
 URL:=Pfad+'\Sey.zip ';
 URL:= URL+ Pfad+'MeinText.txt ';
 URL:= URL+ Pfad+'MeineDB.DB ' ;
 ShellExecute(Handle, 'OPEN','c:\Programme\Winzip\wzzip', PChar(URL),nil, SW_SHOWNORMAL );
except
 //.......
end;
end;

Hat jemand eine Idee, wie ich dem Ganzen ein Passwort zuweisen kann?

Ich freu mich auf eure Antworten!

Tom 28. Okt 2003 10:51

Re: Zippen mit Passwort
 
Am Rande: Wofür ist bei dem Source Try/Except/End gut? ShellExecute löst keine Exception aus.

Mauli 28. Okt 2003 10:54

Re: Zippen mit Passwort
 
OK. Lass es einfach weg ;)

Aber danke für den Hinweis!

mirage228 28. Okt 2003 10:59

Re: Zippen mit Passwort
 
such mal bei SourceForge nach "Turbo Power" oder nach "Abbrevia" - das ist das, was du suchst ;-)

dann funktioniert das ganze auch ohne winzip

mfG
mirage228

Luckie 28. Okt 2003 11:00

Re: Zippen mit Passwort
 
Wenn Winzip per Konsole aufgerufen werden kann, dann gibt es betsimmt auch einen parameter für das Paswort. Näheres solltest du in der WinZip Hilfe finden.

BTW. URL ist wohl etwas unglücklich gewählt, oder bewegst du dich im Internet? Filename wäre wohl wesentlich sinnvoller.


Alle Zeitangaben in WEZ +1. Es ist jetzt 21:03 Uhr.

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