Lazarus
Home
Help
TinyPortal
Search
Login
Register
Lazarus
»
Forum
»
Using the Lazarus IDE
»
General
»
How to set a password for the archive? paszlib TZipper
Free Pascal
Website
Downloads
Wiki
Documentation
Bugtracker
Mailing List
Lazarus
Website
Downloads (Laz+FPC)
Packages (OPM)
FAQ
Wiki
Documentation (RTL/FCL/LCL)
Bugtracker
CCR Bugs
GIT
Mailing List
Other languages
Foundation
Website
Useful Wiki Links
Project Roadmap
Getting the Source
Screenshots
How to use the forum
About donations (wiki)
Bookstore
Computer Math and Games in Pascal
(preview)
Lazarus Handbook
Search
Advanced search
Recent
Why my program crashed du...
by
MarkMLl
[
Today
at 03:18:27 pm]
Transparent animation
by
majolika
[
Today
at 03:10:14 pm]
using RunCommand to wrap ...
by
MarkMLl
[
Today
at 02:17:57 pm]
Candlestick chart
by
ronhud
[
Today
at 01:59:56 pm]
Lazarus editor feature re...
by
Tony Stone
[
Today
at 01:57:07 pm]
The Silver Coder on YouTu...
by
silvercoder70
[
Today
at 01:50:34 pm]
Treeview: full-width back...
by
wp
[
Today
at 01:36:04 pm]
Search in Watches window.
by
Martin_fr
[
Today
at 01:17:59 pm]
Cell bounding box drawing...
by
Jonny
[
Today
at 12:32:10 pm]
API definitions
by
440bx
[
Today
at 12:29:57 pm]
Where is Spready?
by
wp
[
Today
at 12:12:37 pm]
Deleted
by
wp
[
Today
at 12:05:53 pm]
Bug in the formula MATCH
by
wp
[
Today
at 12:02:49 pm]
Tesseract for ocr
by
MarkMLl
[
Today
at 12:01:38 pm]
problems accessing mySQL-...
by
hy
[
Today
at 11:48:08 am]
IsNan
by
Paolo
[
Today
at 11:46:04 am]
Fpcupdeluxe
by
petex
[
Today
at 11:39:37 am]
Custom self drawn compone...
by
Josh
[
Today
at 11:17:09 am]
missed warning
by
Paolo
[
Today
at 10:33:57 am]
align a panel alClient in...
by
Hansvb
[
Today
at 09:45:04 am]
FLIF and FUIF Formats (Fr...
by
hukka
[
Today
at 05:34:30 am]
Unselect all rows in stri...
by
Jonny
[
Today
at 02:16:49 am]
Magic Cropper (correct pe...
by
Boleeman
[
Today
at 01:41:08 am]
BUG in InputQuery if defa...
by
dsiders
[
Today
at 12:38:49 am]
NTSC/CRT port for Free Pa...
by
hukka
[
Today
at 12:35:52 am]
« previous
next »
Print
Pages: [
1
]
Author
Topic: How to set a password for the archive? paszlib TZipper (Read 948 times)
viterik
Newbie
Posts: 2
How to set a password for the archive? paszlib TZipper
«
on:
March 02, 2023, 07:58:26 pm »
Please tell me. How to set a password for the archive? I use this library
https://fpcwiki.coderetro.net/paszlib/
Code: Pascal
[Select]
[+]
[-]
Uses
...
Zipper
,
FileUtil
var
AZipper
:
TZipper
;
TheFileList
:
TStringList
;
begin
MyDirectory
:
=
'C:\MyFolder'
;
AZipper
:
=
TZipper
.
Create
;
AZipper
.
Filename
:
=
'myzipfile.zip'
;
TheFileList
:
=
TStringList
.
Create
;
try
FindAllFiles
(
TheFileList
,
MyDirectory
)
;
AZipper
.
Entries
.
AddFileEntries
(
TheFileList
)
;
AZipper
.
ZipAllFiles
;
finally
TheFileList
.
Free
;
AZipper
.
Free
;
end
;
end
;
Logged
Nicole
Hero Member
Posts: 1009
Re: How to set a password for the archive? paszlib TZipper
«
Reply #1 on:
March 02, 2023, 08:08:16 pm »
Are you sure, you just want to set a password?
Encryption of the content would be better.
Encryption is not an easy task and there are many ways to do it.
Perhaps you may want to key in the keyword to find out, what way fits for you.
Logged
paweld
Hero Member
Posts: 1293
Re: How to set a password for the archive? paszlib TZipper
«
Reply #2 on:
March 02, 2023, 08:45:37 pm »
TZipper don't support password. Try Abbrevia component:
https://forum.lazarus.freepascal.org/index.php/topic,15462.msg83043.html#msg83043
Logged
Best regards / Pozdrawiam
paweld
Print
Pages: [
1
]
« previous
next »
Lazarus
»
Forum
»
Using the Lazarus IDE
»
General
»
How to set a password for the archive? paszlib TZipper
TinyPortal
© 2005-2018