edit中输出opendialog的文件名
想在edit中输出opendialog所打开的那个文件的文件名,怎么做啊?麻烦大家看看的。谢谢先
procedure TForm1.Button1Click(Sender: TObject);
begin
if opendialog1.Execute then
edit1.Text:=opendialog1.FileName;
end;
这样写完会把整个路径都显示出来,如何只显示文件名啊
2008-04-01 23:20

2008-04-01 23:34
2008-04-03 00:07
2008-04-03 08:43