超级菜鸟小问题（五十分白送啊：P）

Question

这么简单的事，你去查查 win api  就知道了

Answer 1

在你的uint开始的uses里加入shellapi就可以了！

Answer 2

对对！！！楼上的2位说的都对！
只要在USES里加上SHELLAPI就OK了：）

Answer 3

  下面程序测试通过。unit Unit1;interfaceuses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  StdCtrls,ShellAPI; // Add ShellAPItype
  TForm1 = class(TForm)
    Edit1: TEdit;
    Edit2: TEdit;
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
    procedure FormCreate(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  Form1: TForm1;implementation{$R *.DFM}procedure TForm1.Button1Click(Sender: TObject);
begin
  ShellExecute(Handle,'open',PChar(Edit1.Text),PChar(Edit2.Text),nil,SW_NORMAL);
end;procedure TForm1.FormCreate(Sender: TObject);
begin
  Edit1.Text:='c:\program files\winzip\winzip32.exe';// 要绝对路径
  Edit2.Text:='d:\EXAMPLE.ZIP';
end;end.