有一个程序,我想点击某个按钮时执行打开某个文件的功能,代码如是下:
procedure TCform.EditClick(Sender: TObject);
var
path: String;
s:string;
begin
path := 'write '+ExtractFilePath(Application.Exename)+ '\text\'+11.txt;
Winexec(PChar(path) ,SW_RESTORE);
end;
结果这个文件以写字板的形式打开了,当我对文件进行修改时,弹出是否保存对话框,
现在我想当我修改了文件时,我按是否保存对话框的“是”时保存文件并执行某个事件,我应该怎样捕获这个事件?
procedure TCform.EditClick(Sender: TObject);
var
path: String;
s:string;
begin
path := 'write '+ExtractFilePath(Application.Exename)+ '\text\'+11.txt;
Winexec(PChar(path) ,SW_RESTORE);
end;
结果这个文件以写字板的形式打开了,当我对文件进行修改时,弹出是否保存对话框,
现在我想当我修改了文件时,我按是否保存对话框的“是”时保存文件并执行某个事件,我应该怎样捕获这个事件?
解决方案 »
- 在界面上添加fastreport4.0报表出错,谁能帮忙看看,困扰几天了
- 在Delphi DBgrid 控件中编辑数据,保存到数据库相关操作
- 求高手指教关于RzOpenDialog的问题
- 关于显示字段的问题
- 动态连接数据库时如何获取数据库中的表单?相当于ADODataSet1中的CommandText
- 抓屏问题
- 请问Delphi7里用什么做报表啊,我好象没有看到以前的报表控件了!(NULL)
- 怎么没人理我?
- DELPHI的哪几个函数与VB中的(mid,left,right)函数对应
- 大虾们帮帮忙了
- delphi 2007 {$include common.pas} 这句无效?
- 我的图片存取有错吗?
不过你可以换个思路去实现
你为什么不借用类似与memo的中间控件呢???
管它保存没保存,都把文件重新装载一遍得了。
这样的话比Hook简单多了。