读书人

关于savedialog的保存路径显示的有关问

发布时间: 2012-03-06 20:47:55 作者: rapoo

关于savedialog的保存路径显示的问题
我想把保存的路径显示出来
memo1.Caption:=Copy(SaveDialog1.FileName,1,LastDelimiter( '\ ',SaveDialog1.FileName));
这样的话,如果我把文件abc.txt存到D:\test文件夹下,那么其路径显示就是D:\test
而我想它把文件名也显示出来,应该怎么写呢?

[解决办法]
memo1.Caption := SaveDialog1.FileName;
这样不就是既有文件名又有路径了?
[解决办法]
procedure TForm1.Button1Click(Sender: TObject);
var
mySaveDialog: TSaveDialog;
begin
mySaveDialog := TSaveDialog.Create(self);

if mySaveDialog.Execute then
begin
ShowMessage(mySaveDialog.FileName);
end;

mySaveDialog.Free;
end;

读书人网 >.NET

热点推荐