Delphi 怎么样调出系统运行对话框,
 
调运行声明
该函数在Shell32.dll中,是个无名字的函数,调用时要用索引来调用,为 index 61, 在VB中我会,我刚从VB转过来的,对这方面不是很清楚,请高手指定,谢谢,它共有6个参数,不知道是不是像下面这样声明,
Function SHRunFileDlg(hOwner,hIcon:Integer;lpstrDirectory,szTitle,szPrompt:pchar;uFlags:Integer):Integer;external'shell32.dll'index 61;

另外声明后又该如何调用呢,我刚入手,不好意思,用了3年的VB,就是因为HOOK与动态链接库的问题才放弃VB用DELPHI的,

最经常的用法：先添加对话框到窗体中，调用时就

if OpenDialog1.Execute then
begin
............
end;

这里以打开对话框为例，其他对话框也是类似的用法，如保存对话框，颜色对话框等。

OpenDialog1.Execute 放在 if...then 里，如果点击对话框的“取消”按钮就不执行下面的begin...end 里的代码。