特急！！请问dephi中在一过程中如何调用另一过程；

Question

我想程式退出exit 事件中调用 filesave 事件，请问如何调用！！ 谢谢各位大虾！

Answer 1

我做的是一个小编辑器，如果文件改动过，在程序退出时，要询问是否存盘！如存，我想调一下filesave事件过程。多谢kxy ,

Answer 2

>>>我想调一下filesave事件过程
那你就调用不就可以了。有何问题？

Answer 3

thank Kxy very much!
I should call 'filesave(application)' but i use 'tform.filesave(application)'.I already add 50 dot for you !thank!!
 

Answer 4

procedure a;
begin
end;
procedure b;
begin
a;//调用过程a
end;

Answer 5

先定义type procedure a;
//注意里边的全局变量

Answer 6

在FormOnClose事件中加以下代码:if 文件未更改 then Exit;
if MessageDlg('文件已更改,是否保存?',mtConfirmation,[mbYes,mbNo,0)=mrYes then
   FileSave;就可以了.

Answer 7

如果是同一个单元中或同一个类中,则用函数名直接调用(在同类中可加Self或类名前缀),
如果是其它单元中的,则要引用该单元再调用。