本文整理自网络,侵删。
var dir: string;begin dir := 'D:\delphi\lib'; dir := ExtractFileName(dir); ShowMessage(dir); //结果 libend;
相关阅读 >>
更多相关阅读请进入《Delphi》频道 >>
本文整理自网络,侵删。
var dir: string;begin dir := 'D:\delphi\lib'; dir := ExtractFileName(dir); ShowMessage(dir); //结果 libend;
相关阅读 >>
更多相关阅读请进入《Delphi》频道 >>
管理员已关闭评论功能...