Zipping

[eliser]

Hi.
I have to include an ability to compress files in my project, can anyone supply me with routine that does the job? I need it quickly.

 

[hilfy]

There are a number of 3rd party components available to do this for you, some of which are freeware.

If you go to the Delphi Super Page (

http://delphi.icm.edu.pl/)

and search for "ZIP Archive" you'll see a number of files available that will do this.

-D

 

[fran121]

A routine… heh…
Uses ShellApi;
…
ShellExecute(application.Handle,
pchar('open'),
pchar('rar.exe'),
pchar('a '+MyArcName+' '+files2add),
pchar(extractfiledir(application.ExeName)),
SW_HIDE);

 

[eliser]

Thanks, but need no extra files, neither *.exe nor *.dll; all the stuff must be inside my app.

 

[panther11]

In this case you have to use third-party components. I use ZipForge from

http://www.componentace.com

Or there is another way: you can invent your own algorithm and write your routine yourself

 

[greatsoft]

Don’t invent a bike. Use Zipforge or FlexCompress or ECL from ComponentAce.

 

[eliser]

What is ECL and flex compress?

 

[whosrdaddy]

abbrevia from turbopower is also a nice product, used to be payware but they gave source away to Open Source community.
here's the link :

http://sourceforge.net/projects/tpabbrevia/

cheers

--------------------------------------
What You See Is What You Get

 

[greatsoft]

ECL is easy compression library – handy unit to handle archiving
FlexCompress is a visual component that does similar work.

 

[buho]

And you have ZIPLib in Delphi's CD.

buho (A).

 

[bbegley]

We use abbrevia. Very easy.

Brian
"There are 2 kinds of people in the world, those that divide people into two groups and those that don't. I belong to the second group." - tag line I stole