求助:我们需要得到文件路径时,可以单击一个浏览安钮,然后可以一级一级,找到这个文件,得到这个文件的路径,这是怎么做的啊?谢谢! 求助:我们需要得到文件路径时,可以单击一个浏览安钮,然后可以一级一级,找到这个文件,得到这个文件的路径,这是怎么做的啊?(比如,就是当我们安装软件时,可以单击浏览按钮,可把路径得到)谢谢! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 在控件页“Dialogs”中有一个“OpenDialog”控件,用这个应该就可以实现,仔细看看帮助,那里有具体的帮助吧 谢谢 gulf1234 大哥procedure TForm1.Button1Click(Sender: TObject);var ss:string ;begin if OpenDialog1.Execute then begin ss:=OpenDialog1.FileName; end; showmessage(ss);end;我需要的是直到文件夹,而 OpenDialog1.FileName 是文件了啊?是不是我做错了?谢谢! OpenDialog1.FileName本来返回的就是路径+文件名啊;如果只要路径:ExtractFilepath(OpenDialog1.FileName)如果只要文件名:ExtractFileName(OpenDialog1.FileName) uses filectrlif SelectDirectory('','',Path) then 高手大家帮忙啊!看看这个值怎么取出来判断? 100分问个问题 - pb写的dll,delphi调用问题。 紧急求助!请教ListView的一些使用方法和技巧? 临时表的查询 Delphi7和Delphi6能通用吗? 请问如何调用telnet窗口? 迷你记事本,欢迎大家下载使用,内有地址. ******** 小弟要找工作了,请大家帮帮忙!散分!!!******** 关于Tchart,请各位大侠指导!!! 请问:如何在数据库中取数然后在WEBBROWSER中显示成树状结构(类似于TREEVIEW) Delphi中如何自动找到光区的路径??????? 如何获取文件的完整路径?
var
ss:string ;
begin
if OpenDialog1.Execute then
begin
ss:=OpenDialog1.FileName;
end; showmessage(ss);
end;我需要的是直到文件夹,而 OpenDialog1.FileName 是文件了啊?是不是我做错了?谢谢!
如果只要路径:
ExtractFilepath(OpenDialog1.FileName)
如果只要文件名:
ExtractFileName(OpenDialog1.FileName)