shellexecute出错问题

Question

调用shellexecute，编译时不能通过，提示 undeclared identifier'shellexecute'错误是为什么呢，没有引用单元吗？
我用的是delphi 6  
下面是源码，那位老大帮我看看
procedure TfrmReport.Action_openExecute(Sender: TObject);
begin
  //ShellExecute(handle, "open", GridDesigner.exe, NULL, NULL,SHOWNORMAL);
end;

Answer 1

呵呵
uses 中加入shellapi

Answer 2

procedure TfrmReport.Action_openExecute(Sender: TObject);
begin
  ShellExecute(handle, 'open', 'GridDesigner.exe', nil, nil,sw_shownormal);
end;ok 了