如何用OpenDialog对话框打开文件，但要在标签上只显示它的文件名，不显示路径

Question

自己处理一下字符串，让它只显示最后一个\后的子字符串。

Answer 1

"标签"？哪里的标签？是 OpenDialog 对话框里的，还是指你要把文件名显示在你的 form 上？前者俺不知道是咋回事，后者用 StrRScan：var NamePtr: PChar; FileName: string;
...
FileName := OpenDialog1.FileName;
NamePtr := StrRScan(FileName, '\');
if NamePtr <> nil then // 如果找到 '\'，就取后面部分
  FileName := string(NamePtr+1); // 取 '\' 后面部分
Label1.Caption := FileName;
...