[delphizip] Request for new variable:IsOverwrite... OnSetNewName( Sender: TObject; var OldFileName: String; var IsChanged,IsOverwrite: Boolean )
- From: Alistair George <bigal@xxxxxxxxxx>
- To: delphizip@xxxxxxxxxxxxx
- Date: Sun, 15 Dec 2002 12:21:24 +1300
Hi,
When adding to a ZIP IsOverwrite would be very useful in
Versioning. EG if the file already exists in the archive, then IsOverwrite would
be True, else False. (default False).
I checked out OnSetNewName, and with a showmessage(Oldfilename); It brings up
an interesting result:
Fspecargs.clear;
FSpecArgs.Add( ?C:\backup\myfile.exe? ); // Say I add one file eg myfile.exe
(Filecount=1)
add;
(OnSetNewName showmessage(Oldfilename) showed) 21 iterations of directories, not
files till it gets to myfile.exe.
ShowMessage(IntToStr(SuccessCnt)) //gives result of 22 for 1 file!
Alistair+
Other related posts:
- » [delphizip] Request for new variable:IsOverwrite... OnSetNewName( Sender: TObject; var OldFileName: String; var IsChanged,IsOverwrite: Boolean )
