求教:如何获得打开文件的路径名?(50分)

  • 主题发起人 zgxzgx2002
  • 开始时间
Z

zgxzgx2002

Unregistered / Unconfirmed
GUEST, unregistred user!
Form1中有一OpenDialog1、一个Label1,一个Botton1,点击Botton1后,
如何实现能打开文件并使Label1显示所选文件的路径名?
谢谢
 
主要想取得打开网络邻居中的文件的路径。
50分敬上,谢谢。
 
Label1.Caption := ExtractFilePath(OpenDialog1.FileName)
 
label1.caption:=OpenDialog1.filename;
 
procedure TForm1.Button1Click(Sender: TObject);
begin
if OpenDialog1.execute then
Label.caption:=OpenDialog1.FileName;
end;
 
同意楼上的,网络路径时返回时在字符串前边是‘//’,没别的区别
 
谢谢大家
wab的答案能够实现,敬上40分
jsxjd的答案多包括了文件名可能是我没说明白,敬上10分
谢谢大家

 
顶部