很简单的，Delphi中得到一个文件的文件名（带路径），怎样获得纯粹的文件名（就
- 开发者的家园
很简单的，Delphi中得到一个文件的文件名（带路径），怎样获得纯粹的文件名（就
Extracts the name and extension parts of a file name. UnitSysutilsCategoryfile name utilitiesfunction ExtractFileName(const FileName: string):
其他回答 (3)
ExtractFileName可以解出带后缀的文件名，然后再用ChangeFileExt把后缀去掉，例如——ChangeFileExt(ExtractFileName(Application.ExeName), '');
哇啊，怎么这么多人回答了？
我试试看.....
等待您来回答
该问题来自：Delphi乐园致力于让Delphi变的更简单，更便捷，更快乐。在这里，您可以是初学者，每一次求知您可以体验学习的快乐，您可以是进阶者，每一次攀登您可以获得成功的喜悦，您可以是资深者，每一次分享您可以铸就人生的辉煌。
Delphi乐园，开发者的家园。编程领域专家：转载时请以超链接形式标明文章原始出处和作者信息及本声明
事情有时候就是这样．．．绕了一圈之后你发现自己其实又回到了原先一直试图离开的地方．．．于是．．．只好站在那里傻傻的笑．．．就这样．．．一切偷偷回到起点．．．那么，好吧，让白天拥抱黑夜，让太阳拥抱月亮去吧．．．也许．．．我只是一个适合独自行走的小孩．．．就这样．．．一直走下去偶尔回过头,看着窗外车来人往的一切繁杂都离我远去鸟^^^^^^各位亲爱的们，要继续幸福的生活下去啦．．．
牛牛：牛牛：小多o(∩_∩)o...：月：月：ＢＯＢＯ：牛牛：：月：
小小的L寻找大大的幸福
ブログパーツ『SkyClock』：/Hi，这是的腾讯微博，别吝惜你的关注，赶紧登录，和TA互动吧！
正在加载...
Copyright & 1998 - 2014 Tencent. All Rights Reserved很简单，很纯粹_南部吧_百度贴吧
&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&签到排名：今日本吧第个签到，本吧因你更精彩，明天继续来努力！
本吧签到人数：0成为超级会员，使用一键签到本月漏签0次！成为超级会员，赠送8张补签卡连续签到：天&&累计签到：天超级会员单次开通12个月以上，赠送连续签到卡3张
关注：21,932贴子：
很简单，很纯粹收藏
就想在南部交朋友，很平常的朋友，很普通的朋友，有意就回帖，我之后再说QQ
<div class="clearfix BAIDU_CLB_AD BAIDU_CLB_AD_pb" id="BAIDU_CLB_AD_">
你加我。注明是南部吧的。
登录百度帐号我的游戏推荐游戏
后查看最近玩过的游戏
使用签名档&&
为兴趣而生，贴吧更懂你。或温馨提示！由于新浪微博认证机制调整，您的新浪微博帐号绑定已过期，请重新绑定！&&|&&
祝你开心快乐每一天！
LOFTER精选
用微信&&“扫一扫”
将文章分享到朋友圈。
用易信&&“扫一扫”
将文章分享到朋友圈。
历史上的今天
id:'fks_',
blogTitle:'幸福，很纯粹，也很简单',
blogAbstract:'　　文字，记录的是自己的
{if x.moveFrom=='wap'}
{elseif x.moveFrom=='iphone'}
{elseif x.moveFrom=='android'}
{elseif x.moveFrom=='mobile'}
${a.selfIntro|escape}{if great260}${suplement}{/if}
{list a as x}
推荐过这篇日志的人：
{list a as x}
{if !!b&&b.length>0}
他们还推荐了：
{list b as y}
转载记录：
{list d as x}
{list a as x}
{list a as x}
{list a as x}
{list a as x}
{if x_index>4}{break}{/if}
${fn2(x.publishTime,'yyyy-MM-dd HH:mm:ss')}
{list a as x}
{if !!(blogDetail.preBlogPermalink)}
{if !!(blogDetail.nextBlogPermalink)}
{list a as x}
{if defined('newslist')&&newslist.length>0}
{list newslist as x}
{if x_index>7}{break}{/if}
{list a as x}
{var first_option =}
{list x.voteDetailList as voteToOption}
{if voteToOption==1}
{if first_option==false},{/if}&&“${b[voteToOption_index]}”&&
{if (x.role!="-1") },“我是${c[x.role]}”&&{/if}
&&&&&&&&${fn1(x.voteTime)}
{if x.userName==''}{/if}
网易公司版权所有&&
{list x.l as y}
{if defined('wl')}
{list wl as x}{/list}}