x:=ExtractFileName(str); //取文件名+擴展名，不包含文件路徑
y:=ExtractFileExt(str); //取文件的擴展名
Delphi 獲取文件夾路徑最后一級文件夾目錄名稱:
var
dir: string;
begin
dir := 'D:\delphi\lib';
dir := ExtractFileName(dir);
ShowMessage(dir); //結果 lib
end;
——信陽市速全網(wǎng)絡科技有限公司——
版權所有:信陽市速全網(wǎng)絡科技有限公司
豫ICP備19030104號-2
<samp id="dtglt"></samp>