delphi SelectDirectory问题

来源:百度知道 编辑:UC知道 时间:2024/06/03 06:44:05
我想获得一个文件夹的路径可是报错,请高手看看
var
Dir: string;
begin
Dir:=edit2.Text;
if SelectDirectory('选择备份文件存放目录','',Dir) then
edit2.Text:=Dir;
end;

错误提示:[Error] Unit1.pas(39): Types of actual and formal var parameters must be identical

var
Dir: string;
这里类型不同,改为
var
Dir: WideString;
另外如楼上所说,必须引用QDialogs单元

怎么说呢 单独运行这段程序我已经运行成功了 就用了一个EDIT和button来测试的,可以获取路径
不知道是不是还有些别的代码影响的起
你应该添加了单元QDialogs吧,看你的错误提示似乎是类型不一致引起的

啊 忘记了还有个widestring类型,楼主应该是在获取较长的路径时报错吧,获取个什么C:\ c:\windows用这段代码是没有问题的
隐藏那么深的路径 难道楼主是在写病毒??