L lhony Unregistered / Unconfirmed GUEST, unregistred user! 2002-06-24 #1 我如何用OpenDialog1分别取回文件路径与文件名
Q qdyoung Unregistered / Unconfirmed GUEST, unregistred user! 2002-06-24 #2 with OpenDialgo1 do if Execute then begin ShowMessage('Path =' + ExtractFilePath(FileName)); ShowMessage('FileName=' + ExtractFileName(FileName)); end; ----- http://www.8421.org
with OpenDialgo1 do if Execute then begin ShowMessage('Path =' + ExtractFilePath(FileName)); ShowMessage('FileName=' + ExtractFileName(FileName)); end; ----- http://www.8421.org
M mlzhou Unregistered / Unconfirmed GUEST, unregistred user! 2002-06-24 #3 FileName:=ExtractFileName(Opendialog1.FileName); FilePath:=ExtractFilePath(Opendialog1.FileName)