delphi中怎么打开.udl文件对话框

delphi中如何打开.udl文件对话框
用winexec是打开可执行文件，好像不行。
用SHELLEXECUTEINFO的话再哪声明，怎么找不到它

[解决办法]
uses
shellapi


function ShellExecute; external shell32 name 'ShellExecuteA ';
[解决办法]
API: PromptDataSource()
[解决办法]
uses
shellapi;


……
ShellExecute //是api函数 在shellapi单元