2

我希望我的打开和保存对话框显示 XML 文件。我有这个定义:

// The save dialog
dlg := TSaveDialog.Create(nil);
dlg.Options := [ofOverwritePrompt];
dlg.Title := 'Seleccione la ubicación del archivo';
dlg.Filter := 'Xml | *.xml | Todo | *.*';
dlg.DefaultExt := 'xml';
dlg.Execute();
// The open dialog
dlg := TOpenDialog.Create(self);
dlg.Title := 'Seleccione la ubicación del archivo';
dlg.Filter := 'Xml | *.xml | Todo | *.*';
dlg.DefaultExt := 'xml';
dlg.Execute();

但它不显示 XML 文件。要显示路径中的任何 XML 文件,我需要选择“Todo”(*.*) 过滤器。为什么选择 XML 过滤器时不显示文件?

4

1 回答 1

7

删除扩展名周围的空格。该对话框正在尝试过滤"*.xml "文件,但没有。有关示例,请参阅文档

于 2013-08-19T20:14:05.613 回答