■■■我要怎么样才能弹出一个WINDOWS标准的文件夹浏缆对话框呀!!(10分)

3

3333W

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-05

• #1

■■■我要怎么样才能弹出一个WINDOWS标准的文件夹浏缆对话框呀!!

 

P

Passion

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-05

• #2

procedure TForm1.ButtonBrowseDirClick(Sender: TObject);
var
sRoot, sDir: String;
begin
sRoot := '';
if SelectDirectory('请选择目录', sRoot , sDir) then
Self.LabeledEdit1.Text := sDir;
end;

 

P

Passion

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-05

• #3

好像要uses FileCtrl

 

S

shbjkl

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-06

• #4

你可以先用标准打开文件对话框控件
再用extracfilepath 搞定！

 

S

shbjkl

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-06

• #5

还可用win32控件稍烦一些啦

 

L

Lyte Zeng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-28

• #6

Passion说的是对的！

 

D

delphiandoracle

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-29

• #7

passion两次说的加起来就是对的

 

3

3333W

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-03-14

• #8

KO