我只想按资源页面上所述测试“ SelectDirectoryDialog”:TSelectDirectoryDialog
,链接的doc page当前关闭。但是我收到一个异常“ External:SIGSEGV”。不知道我在做什么错。我将“ SelectDirectoryDialog”放在窗体上,并创建了一个执行以下代码的按钮:
procedure TForm1.Button1Click(Sender: TObject);
begin
if SelectDirectoryDialog1.Execute then ShowMessage(SelectDirectoryDialog1.FileName);
end;
我查看了一些示例(here,here和here),但是我找不到我的代码有问题的地方。我尝试过TOpenDialog
,但没有问题。
有什么办法解决此问题吗?是否有其他对话框可以让我选择目录作为快速修复?
更新: 问题似乎出在调试器上,这里是thread的描述。执行Exe文件工作正常。有谁知道最新的版本是否对此有修复? (我正在使用2016年的Lazarus V1.6,FPC-V.3.0.0,SVN-Revision 51630-64位版本)。
答案 0 :(得分:0)
不确定是否是问题,但是您是否尝试过菜单->工具->选项->调试器->选中DisableLoadSymbolsForLibraries的复选框?