当前位置: 源码素材网 » Delphi源码 » 系统相关 » 详情页

Delphi将程序放在开机启动中并添加事件处理器

Delphi将程序放在开机启动中并添加事件处理器,程序实现的功能还有打开拨号连接、为Delphi程序添加事件和事件处理器,相关程序定义:
  procedure Button4Click(Sender: TObject);{当事件触发后调用此过程}
  private
  { Private declarations }
  val1,val2,res:integer; {val1和val2存放输入的两个整数,res存放两数的积}
  FTooBig : TNotifyEvent; {定义一个指向事件处理器的指针FTooBig}
  procedure TForm1.TooBig(Sender: TObject);
  begin
   Application.MessageBox('有乘数大于200或0或为空了,你看看,快看','测试自定义事件! ',MB_OK);
  end;
  注:输入的乘数乘数不能大于200或者为0或为空,否侧,引起你自定义的事件。

  • 相关标签:开机启动 事件处理器
  • 调试环境:Delphi7+
  • 文件大小:8.88K
  • 资源评级:
  • 更新时间:2018-07-30
  • 相关链接:暂无演示

源码测试截图:

Delphi将程序放在开机启动中并添加事件处理器运行截图

相似源码:开机启动 事件处理器 Delphi源码下载:Delphi将程序放在开机启动中并添加事件处理器 测试截图

下载声明:

本站资源仅供学习参考,禁止用于非法途径。若“Delphi将程序放在开机启动中并添加事件处理器”源代码侵犯了您的权益,请尽快告诉我们。