我的程序大概是这样的
procedure TForm1.Button1Click(Sender: TObject);
var
p:string;
begin
p:=adoquery1.Fieldbyname('filename').AsString;
//p的值得到的是'备份\test.doc'
ShellExecute(handle,'open',p,null,null,SW_SHOW);
end;
正常打开都好用,可是我用程序删除这个文档,在用程序从新添加文档的时候,就在打不开了,但是把程序关掉,又能打开了,这是什么原因呢?
procedure TForm1.Button1Click(Sender: TObject);
var
p:string;
begin
p:=adoquery1.Fieldbyname('filename').AsString;
//p的值得到的是'备份\test.doc'
ShellExecute(handle,'open',p,null,null,SW_SHOW);
end;
正常打开都好用,可是我用程序删除这个文档,在用程序从新添加文档的时候,就在打不开了,但是把程序关掉,又能打开了,这是什么原因呢?
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货