问题标签 [tsavedialog]

Windows 7 上的 Delphi 2007 对 saveDialog.Execute 调用没有任何作用。几周前我看到另一个人提到了这一点，但它是在 Borland c++ 中。

我有一个由 Delphi 7 编写的应用程序，该应用程序在 Windows XP 中运行良好。

现在我已经将我的电脑升级到 Windows 7 并且一切都适用于这个应用程序，除非我单击将执行 TOpenDialog 和 TSaveDialog 然后挂起的按钮。

在 Windows 7 中使用 delphi 7 时有人遇到过这个问题吗？

我想在 TSaveDialog 中添加一个复选框或其他 VCL 组件。

坎图说，

新的 Vista 打开和保存对话框（由 IFileOpenDialog 和
IFileSaveDialog 接口实现）由新的 FileOpenDialog 和
FileSaveDialog 组件直接映射，而且标准的 OpenDialog 和 SaveDialog 组件
在设置全局 UseLatestCommonDialogs 时使用新样式。

我不知道这意味着什么（我从来没有做过任何接口编程......）

而且我不想使用第三方工具。

刚才在网上搜索看到有提示，我看了一下TOpenPictureDialog的代码，复制一下。

在尝试任何路径之前，我想我会在这里寻求一些指导。关于通过 Win7 解决方案的 XP 以独立于 Windows 版本的方式将复选框添加到现代文件、打开对话框的任何建议？

汤姆

我有一个带有 TSaveDialog 的表单。当调用 Execute 函数时，从 IDE 运行时它不会弹出。单机运行时会弹出。对其进行更多测试，我发现所有 TSave/TOpen 对话框都不起作用。不工作意味着 Execute 在False没有弹出窗口的情况下返回（请参阅更新的代码示例：总是弹出消息“False”而前面没有对话框）。其他对话框（字体/颜色/等）确实有效。

当运行而不调试时，对话框都不会出现。选择 Release 或 Debug 配置也无关紧要。

显然 IDE 做了一些奇怪的事情。表单上有两个 TSaveDialog 组件，它们都显示相同的行为。

知道有什么问题吗？

在 Windows 7 上使用 Delphi XE更新 1。使用 TSaveDialogs 的其他项目工作正常。

更新 2发现关于 TSaveDialog 的原始问题适用于所有 TSave/TOpen 对话框。问题已被编辑以包含此知识。

更新 3我发现了类似错误的这个链接。但是，我检查了注册表，但找不到上述的可执行文件。并且将兼容性更改为 XP 的提示不适用于 imho，因为 TSaveDialog 在 IDE 之外可以正常工作。

我想实现传统的打开和保存对话框（以及正在处理的底层项目是文件），但我想控制显示的内容来代替文件名，并包含一些图形 - 即我需要一个“ownerdraw”对话风格。除了这方面，我希望对话框的外观和感觉尽可能像传统的打开/保存对话框。

我想我自己也面临着实现这个，我只是想知道最好的起点是哪里。

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

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

我在 Windows 8 上使用 Delphi XE2。我已将 D2009 应用程序移植到 XE2，突然保存对话框 (TSaveDialog) 非常慢。

当 Project/Options/Application/Runtime Themes 设置为 Enable Runtime Themes 时：

=>

当我打开保存对话框时，窗口会冻结大约一分钟（有时我可以关闭窗口但必须等待大约一分钟才能再次打开对话框（或另一个 TOpenDialog）。显示新的 Vista 风格的保存对话框。

如果我尝试在装有 Windows 7 的 PC 上运行此 exe，该应用程序会在启动时挂起（我也尝试过使用 XP 兼容模式但没有成功）。

当 Project/Options/Application/Runtime Themes 设置为 none 时：

=>

保存对话框运行良好（快速），但显示了旧样式对话框，参见下面的示例：

此 exe 在装有 Windows 7 的 PC 上运行良好（尽管使用旧式对话框）。

附言。我在 Win 7 PC 上使用 D2009 编译的旧 exe 文件在 Win 7 和 8 PC:s 上运行良好，并且使用新的 Vista 对话框样式正确显示对话框。

可能是 Win 8/7 中的某些权限导致了这种情况吗？我使用 IDE FIX PACK 5.4，

谢谢，托马斯

我想获得由我的 Delphi 应用程序打开的新 vista 样式 Open/SaveDialog 的窗口句柄。

通过解析 OnShow 可以使用旧样式对话框，但使用新样式对话框没有这样的事件。

是否有可能遍历 Windows 中的所有窗口句柄并以这种方式获得它？

谢谢！

编辑：我知道 OpenDialog.Handle 将返回句柄，但仅当对话框可见时（否则为 0）。在显示对话框后，我需要一个事件来直接捕获句柄（无需任何用户操作，即：在对话框中选择一个项目，更改文件类型等）。

关于 TSaveDialog 和 Delphi 的 [ofOverwritePromt] 的想法已经有一个简单的问题覆盖现有文件 on save dialog。

所以我的问题/场景如下：

• 我有一个TSaveDialog
• 我设置[ofOverwritePromt]了Options
• 我将过滤器设置为“PDF (*.pdf)|*.pdf”
• 过滤器索引设置为 1

所以现在我执行程序并调用对话框。如果我选择 WITH MOUSE 或 KEYBOARD（不输入）的文件存在，则保存对话框会要求我用以下消息覆盖：

但是，如果我执行相同的操作，但在没有指定扩展名的情况下键入“Test”之类的文件名，则保存对话框不会确认覆盖。我知道它实际上返回另一个文件名“C:\Users\xxx\Desktop\Test”而不是“C:\Users\xxx\Desktop\Test.pdf”。如果对话框要求您保存文件，这有点不太好，但您需要输入扩展名。所以通常我会这样处理：

有没有办法在不自定义标准对话框的情况下更优雅地做到这一点？

我需要用户能够从保存对话框中选择现有的只读文件。我认为您可以通过明智地选择TSaveDialog 选项来做到这一点，但我无法做到。如果我选择一个 R/O 文件，当我点击Save按钮时，我会收到以下消息：

我想象选项位ofNoReadOnlyReturn会控制这一点，但它似乎没有效果。

我错过了什么？

-

-