T Temp Unregistered / Unconfirmed GUEST, unregistred user! 2001-10-26 #1 弱弱送分问题——如何使得“selectdirectory('Select Intial Local Directory','My computer',Dir)”的对话框居中？(50分)<br />我使用这个选择文件对话框总是出现在屏幕的右下角，如何使它居中显示呢？
弱弱送分问题——如何使得“selectdirectory('Select Intial Local Directory','My computer',Dir)”的对话框居中？(50分)<br />我使用这个选择文件对话框总是出现在屏幕的右下角，如何使它居中显示呢？
T Temp Unregistered / Unconfirmed GUEST, unregistred user! 2001-10-26 #3 faint,我看了selectdirectory的帮助，未发现有指定对话框位置的选项阿，大侠能<br>不能具体说说？
卷 卷起千堆雪tyn Unregistered / Unconfirmed GUEST, unregistred user! 2001-10-29 #4 在C盘下建立一个目录 ：MYDIR<br><br>procedure TForm1.Button1Click(Sender: TObject);<br>var<br> Dir: string;<br><br>const<br> SELDIRHELP = 1000;<br><br>begin<br> Dir := 'C:/MYDIR';<br> if SelectDirectory(Dir, [sdAllowCreate, sdPerformCreate, sdPrompt],SELDIRHELP) then<br> Label1.Caption := Dir;<br>end;<br><br>去试试，绝对中间～～～～
在C盘下建立一个目录 ：MYDIR<br><br>procedure TForm1.Button1Click(Sender: TObject);<br>var<br> Dir: string;<br><br>const<br> SELDIRHELP = 1000;<br><br>begin<br> Dir := 'C:/MYDIR';<br> if SelectDirectory(Dir, [sdAllowCreate, sdPerformCreate, sdPrompt],SELDIRHELP) then<br> Label1.Caption := Dir;<br>end;<br><br>去试试，绝对中间～～～～
T Temp Unregistered / Unconfirmed GUEST, unregistred user! 2001-10-29 #5 to 卷起千堆雪tyn:<br><br> 我用的这个函数的参数和你所提出的不同的，我得这个显示得是以treeview控件<br>的形式显示，你提出的那个我用过，的确是居中的，但是用我提的这个参数就不行的。
to 卷起千堆雪tyn:<br><br> 我用的这个函数的参数和你所提出的不同的，我得这个显示得是以treeview控件<br>的形式显示，你提出的那个我用过，的确是居中的，但是用我提的这个参数就不行的。
小 小人物 Unregistered / Unconfirmed GUEST, unregistred user! 2001-10-29 #6 还是用构件吧，"目录选择对话框"构件很多网站都有下载。<br>你实在找不到，我可以发给你.
T Temp Unregistered / Unconfirmed GUEST, unregistred user! 2001-10-29 #7 谢谢小人物大侠，我的email是monoxide@163.net 请大侠发送一个完全限制的控件给我～～<br>万分感谢!
T Temp Unregistered / Unconfirmed GUEST, unregistred user! 2001-10-29 #9 to小人物大侠：<br><br> 还没有收到阿，faint，可以确定是发到 monoxide#163.net 吗？
