继承来的AdoQuery对象如何重载某个事件,如AfterInsert 我从TADOQuery继承了一个自己的对象TMyAdoQuery,想要在这个对象的AfterInsert事件中执行一些代码,如何写 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 TMyAdoQuery = class(TADOQuery) protected procedure DoAfterInsert; override; end;procedure TMyAdoQuery.DoAfterInsert;begin ShowMessage('在TMyADOQuery的AfterInsert事件处理程序之前触发!'); inherited; ShowMessage('在TMyADOQuery的AfterInsert事件处理程序之后触发!');end; 菜鸟的疑问 珠海招DELPHI数据库开发2人,顺便散分 黑龙江软通国际这个公司到底怎么样,怎么总是在招人? 大家帮帮忙,看一下该怎么复制 查询语句过长 程序运行中如何能用鼠标操作选择多个控件(比如shape)并能在鼠标右键中添加命令(实现思想) 急!!!大牛们,来看看啊~~~ 在Quick Report上放得控件怎么一拖就没有了? 急急急急——关于界面怎样随分辨率的不同而自动改变的问题! DataModule模板问题? 如何让整个treeview的每个节点都不可编辑? 有没有把delphi原代码转换成c++builder代码的工具?
protected
procedure DoAfterInsert; override;
end;procedure TMyAdoQuery.DoAfterInsert;
begin
ShowMessage('在TMyADOQuery的AfterInsert事件处理程序之前触发!');
inherited;
ShowMessage('在TMyADOQuery的AfterInsert事件处理程序之后触发!');
end;