我的程序如下:
Procedure TFrom1.button1click(Sender:TObject);
var
str:string;
begin
if edit1.text <> '' then
begin
str:='FTP://192.168.10.8/'+edit1.text+'.PDF';
shellexecute(handle,'open',Pchar('Iexplore.exe'),Pchar(str),nil,SW_Show);
end;
end;可以打我想要的PDF文件。但打开文件后,文件自动关闭不知道是怎么回事,请指教~!谢谢~!
Procedure TFrom1.button1click(Sender:TObject);
var
str:string;
begin
if edit1.text <> '' then
begin
str:='FTP://192.168.10.8/'+edit1.text+'.PDF';
shellexecute(handle,'open',Pchar('Iexplore.exe'),Pchar(str),nil,SW_Show);
end;
end;可以打我想要的PDF文件。但打开文件后,文件自动关闭不知道是怎么回事,请指教~!谢谢~!
解决方案 »
- 急~~~~~~~~~~~~~关于动态线程的问题
- 我用windows server 2003,装哪个版本的delphi最合适?谢谢!
- 如何用Ping检测多太主机?
- FastReport3在delphi 控件頁面上有一個頁面fastscrip這些控件有什麼用?
- 爱你的眼睛请进 曾经问过一个WINDOWS日志的问题 当时号称200分 只给了100分 现在补上!
- (奇怪!!)不能拷贝目录!!help........
- 简单问题:用TQuery执行Delete语句出错。在线
- 向各位大大 请教网页内容 正则的问题
- 返回计算机有硬盘有几个驱动器的函数什么?
- 各位高手:在Delphi中如做帮助文件。
- 怎样将备注框Memo中的内容导入word中?
- 怎样让停靠边的窗体还能有边框?
是不是路径中用了FTP?
可以用Opendialog打开PDF文件嘛?
请帮帮忙,谢谢了~~!