[delphizip] Re: extract using different directories.......

  • From: "R.Peters" <russellpeters@xxxxxxxxxxx>
  • To: <delphizip@xxxxxxxxxxxxx>
  • Date: Wed, 27 Jul 2005 18:42:07 +1000

Use the OnSetExtName event

procedure TForm1.ZipSetExtName(Sender: TObject; var FileName: String;
    var IsChanged: Boolean);
begin
  if ExtractFilePath(Filename) = 'oldPath\' then
  begin
    Filename := 'newPath\' + ExtractFilename(Filename);
    IsChanged := true;
  end;
end; 

note that if newPath is fully qualified (has drive) the file will be sent
there.

- Russell Peters
-----Original Message-----
From: delphizip-bounce@xxxxxxxxxxxxx [mailto:delphizip-bounce@xxxxxxxxxxxxx]
On Behalf Of Durward Bishop
Sent: Wednesday, July 27, 2005 4:14 PM
To: delphizip@xxxxxxxxxxxxx
Subject: [delphizip] extract using different directories.......

I have a basic understanding of the extract process but how would you code a
function to unzip a file that is in one directory to a different directory?
Thanks,
Durward Bishop
-----------
To unsubscribe from this list, send an empty e-mail message to:
  delphizip-request@xxxxxxxxxxxxx
and put the word unsubscribe in the subject.


__________ NOD32 1.1178 (20050726) Information __________

This message was checked by NOD32 antivirus system.
http://www.eset.com


-----------
To unsubscribe from this list, send an empty e-mail 
message to:
  delphizip-request@xxxxxxxxxxxxx 
and put the word unsubscribe in the subject.

Other related posts: