用Delphi怎样才可以调出 Win 的文件属性框！！帮忙！(50分)

当我们在“我的电脑”选中一个文件的时候按右键，在右键菜单里有一个“属性”菜单项，
当单击之后就会弹出属性对话框，我就是要这个，但怎样在Delphi中调用Win里的文件属性
框？请帮忙！

你要是提问前先搜索一下，这50分也可省了：
uses ShellAPI;
var
SEI: PShellExecuteInfoA;
begin
New(SEI);
try
with SEI^ do
begin
cbSize := SizeOf(SEI^);
FMask := SEE_MASK_NOCLOSEPROCESS or SEE_MASK_INVOKEIDLIST or SEE_MASK_FLAG_NO_UI;
Wnd := Handle;
lpVerb := 'properties';
lpFile := '你的文件名';
lpParameters := nil;
lpDirectory := nil;
nShow := 0;
hInstApp := HInstance;
lpIDList := nil;
end;
ShellExecuteEx(SEI);
finally
Dispose(PShellExecuteInfoA(SEI));
end;
end;

我拿回去看看！

接受答案了.