1,184
社区成员
发帖
与我相关
我的任务
分享请发表友善的回复…
发表回复
梅青松 2004-10-11
- 打赏
- 举报
可以用SelectDirectory
uses FileCtrl;
procedure TForm1.Button1Click(Sender: TObject);
var
vDirectory: string;
begin
SelectDirectory('再选吧！',
'::{20D04FE0-3AEA-1069-A2D8-08002B30309D}', vDirectory);
end;
uses FileCtrl;
procedure TForm1.Button1Click(Sender: TObject);
var
vDirectory: string;
begin
SelectDirectory('再选吧！',
'::{20D04FE0-3AEA-1069-A2D8-08002B30309D}', vDirectory);
end;
Tronnin 2004-10-11
- 打赏
- 举报
参数为空 ?？
我指得是 TOpenDialog
我指得是 TOpenDialog
firstrose 2004-10-10
- 打赏
- 举报
参数为空
wofan 2004-10-10
- 打赏
- 举报
是不是桌面
Tronnin 2004-10-10
- 打赏
- 举报
汗，这...
那怎么让 OpenDialog 起来就处于“我的电脑”的“目录”层次
那怎么让 OpenDialog 起来就处于“我的电脑”的“目录”层次
halfdream 2004-10-10
- 打赏
- 举报
我想‘我的电脑’不是一个目录：）
