问个关于对话框的问题(15分)

1.如何调用有'我的电脑''我的文档'……的‘打开’‘保存’对话框。
2.如何调用‘打开文件夹’对话框
3.如何让对话框在结束前判断文件是否存在，并给出提示。
几个菜鸟级的问题，望各位大虾示下。

1,如果你用的是win2k以上的操作系统,用open dialog 会自动出现你所说的东西.

2.没明白你的意思.

3.对话框结束, 既然已经结束了,当然就有个结果了, 要不就没找到,要不就找到了, 还要提示干什么?

比如当文件存在时,提醒'文件已存在,是否覆盖的对话框',而不是savedialog结束后自己控制

对于1和2你可以利用 opendialog 和 savedialog来实现
对于3 你可以设置opendialog 和 savedialog的Options属性来达到目的
比如当文件存在时,提醒'文件已存在,是否覆盖的对话框'，
需要Options属性中包含ofOverwritePrompt，这样说你明白了吗？

有关于Options属性的资料吗?谢谢

看帮助啊，帮助里解释得很详细呀

如何调用‘打开文件夹’对话框
function SelectDirectory(const Caption: string; const Root: WideString;
var Directory: string): Boolean;

对应对象：TOpenDialog
声明：TOpenOptions = set of TOpenOption;property Options: TopenOptions default[];
功能：Options属性决定了打开对话框操作的行为和显示。
对应打开对话框的有效选项值可见下表。
值 意 义
ofAllowMultiSelect 允许用户在对话框内选择多个文件。
ofCreatePrompt 如果用户在选择一个不存在的文件时，产生一个警告信息，询问是否要创建一个新的和指定的文件名相匹配的文件。
ofExtensionDifferent 运行时只要被选择的文件名存在，且扩展名不同于Defaul6xt，那么将出现这个标记。如果用户使用这个标记用来标记一个应用程序，记住要对它重新设置。
ofFileMustExist 如果使用者试图选择一个不存在的文件那么将产生一个错误信息。
ofHideReadOnly 从对话框之中删除Open As Read On1y检查框
ofNoChangeDir 在用户按击了OK按钮之后，将重新设置当前的路径为以前的目录，使用对话框时将忽略用户可能对目录的任何修改。
ofNoDereferenceLinks 不允许系统快捷方式的废弃。如果用户选择了一个快捷方式，将快捷方式本身的文件路径和文件名分配给FileNme，而不是把文件链接到快捷方式中。
ofNoLongNames 只显示8.3格式的文件名字符串。
ofNoNetworkButton 从文件选择对话框之中删除了Ne帅k按钮(用来打开一个映射网络驱动器对话框)。只有在OldStyleDialog标记为打开状态时才可以应用。
ofNoReadOnlyReturn 如果用户试图选择一个只读型的文件时，将产生一个错误信息。
ofNoTestFileCreate 废弃网络文件保护检查和拒绝磁盘驱动器的访问。只有在用户试图保存—个
文件在创造非修改的共享的网络路径内时有效。
ofNoValidate 废除检查无效的文件名的字符功能，允许用户选择文件名并保护了无效的字符。
ofOldStyleDialog 创建较老风格的文件选择对话框的形式。
ofOverwritePrompt 如果用户试图选择已经被使用了的文件时将产生一个警告信息，用来询问是否
覆盖现存的文件(使用TsaveDialog和TSavePictureDialog)。
ofPathMustExist 如果用户试图选择一个不存在的路径的文件时将发出一个错误信息。
ofReadOnly 对话框被打开时，选择Open As Read Only检查框，为缺省值。
ofShareAware 当共享冲突发生时忽略共享错误并且允许文件被选择。
ofShowHelp 在对话框内显示一个帮助按钮。
缺省时所有的标记是被关闭的。

呵呵，http://www.delphibbs.com/delphibbs/dispq.asp?lid=844029正在弄一本和Delphi帮助差不多的书。
这是我从第277页里Copy出来的。

E文学得不好,见笑了

谢谢你们,你们都是好人.
可我连接不上http://delphi.mychangshu.com/dispdoc.asp?id=461.
其它地方有吗?

我用了一下SelectDirectory，那界面好土，有没有树型列表的，W2K那种

不好意思，我调用SelectDirectory的方式不对，所以界面很土，我已经解决了。
就是Derlin兄的方法，我第一次用的是Delphi5的例子。现在好了，谢谢这么多关心我和支持我的GG、JJ、DD、MM。

差点忘结了，谢谢

多人接受答案了。