procedure Tlmzkpj.ActivateEvent(Sender: TObject);
begin
if FEvents <> nil then FEvents.OnActivate;
end;procedure Tlmzkpj.ClickEvent(Sender: TObject);
begin
if FEvents <> nil then FEvents.OnClick;
end;procedure Tlmzkpj.CreateEvent(Sender: TObject);
begin
if FEvents <> nil then FEvents.OnCreate;
end;procedure Tlmzkpj.DblClickEvent(Sender: TObject);
begin
if FEvents <> nil then FEvents.OnDblClick;
end;procedure Tlmzkpj.DeactivateEvent(Sender: TObject);
begin
if FEvents <> nil then FEvents.OnDeactivate;
end;
定義了就一定要執行嗎?沒定議的話肯定不用執行了,
這好像是多餘的吧?
就好像你定义了Form的mousedown事件处理程序,难道你不是希望他一定执行吗?
就是在打开EXE程序以后,
一直等待,
当EXE执行完后
ASP继续执行下面的代码。谢谢!