多个执行文件调用问题：

回复人：rh(毛主席万岁！)　(2001-4-16 15:16:00)  得20分
procedure TForm1.FormCreate(Sender: TObject);
//这里是调用winzip.exe解压c;\file.zip
begin
  Edit1.Text:='winzip.exe';//可执行文件名
  Edit2.Text:='c:\file.zip';//调用参数
end;procedure TForm1.Button1Click(Sender: TObject);
begin
  ShellExecute(Handle,'open',PChar(Edit1.Text),PChar(Edit2.Text),nil,SW_NORMAL);
end;