标题:edit中输出opendialog的文件名
只看楼主
aaron52088
Rank: 1
等 级:新手上路
帖 子:130
专家分:0
注 册:2007-1-24
 问题点数:0 回复次数:3 
edit中输出opendialog的文件名
想在edit中输出opendialog所打开的那个文件的文件名,怎么做啊?
麻烦大家看看的。谢谢先

procedure TForm1.Button1Click(Sender: TObject);
begin
if opendialog1.Execute then
edit1.Text:=opendialog1.FileName;
end;

这样写完会把整个路径都显示出来,如何只显示文件名啊
搜索更多相关主题的帖子: edit opendialog 文件名 输出 
2008-04-01 23:20
provoke
Rank: 2
来 自:广州
等 级:新手上路
威 望:5
帖 子:175
专家分:0
注 册:2007-6-14
得分:0 
F:\新建文件夹\abc.txt

文件名,如abc.txt
Edit1.Text:=ExtractFileName(Opendialog1.FileName);

路径名,如F:\新建文件夹\,以“\”结尾
Edit2.Text:=ExtractFilePath(Opendialog1.FileName);

ExtractFilePath(Opendialog1.FileName)+ExtractFileName(Opendialog1.FileName)=Opendialog1.FileName

Extract意为提取

爱我至爱,至死不渝!
2008-04-01 23:34
aaron52088
Rank: 1
等 级:新手上路
帖 子:130
专家分:0
注 册:2007-1-24
得分:0 
谢谢哦,顺便问一下,有没有关于这些函数用法的书推荐一下哦

2008-04-03 00:07
sky_yang_sky
Rank: 3Rank: 3
等 级:论坛游民
威 望:8
帖 子:481
专家分:16
注 册:2007-5-30
得分:0 
网上查下,很多的

你微笑的面對整個世界,整個世界也將會微笑的面對你。
2008-04-03 08:43



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-206641-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.071385 second(s), 8 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved