本文整理自网络,侵删。
FileList.Strings[i] 是文件路径(含文件名):
StringReplace(FileList.Strings[i],ExtractFilePath(FileList.Strings[i]),'',[rfReplaceAll])
相关阅读 >>
Delphi windows 编程[17] - 更换菜单: loadmenu、destroymenu、setmenu
Delphi stringgrid 实例5 本例功能:字体修改为居中,红色,20号
Delphi 自定义colorbox只显示指定颜色项目 colorbox显示中文颜色名称
更多相关阅读请进入《Delphi》频道 >>