社区
Delphi
帖子详情
关于重载FormCreate的问题
zdk
2003-05-17 11:09:49
首先声明:form3继承form2,form2继承form1。
每个form都有FormCreate。
不想让form3在FormCreate的时候执行form2的FormCreate。
请问高手们怎样实现?谢谢!
...全文
51
4
打赏
收藏
关于重载FormCreate的问题
首先声明:form3继承form2,form2继承form1。 每个form都有FormCreate。 不想让form3在FormCreate的时候执行form2的FormCreate。 请问高手们怎样实现?谢谢!
复制链接
扫一扫
分享
转发到动态
举报
AI
作业
写回复
配置赞助广告
用AI写文章
4 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
tobelost
2003-05-17
打赏
举报
回复
學習。
fyje
2003-05-17
打赏
举报
回复
是,等同于复制之类的
智商无下限
2003-05-17
打赏
举报
回复
当然是自己写一个覆盖了!
sysu
2003-05-17
打赏
举报
回复
在Form3的FormCreate事件中把 inherited; 那行去掉就可以了。
Delphi捕获与截获消息.rar
procedure T
Form
1.
Form
Create
(Sender: TObject); begin //用OnAppmesage过程设置应用程序的Onmessage事件过程 application.OnMessage :=OnAppmessage; //使用Checkbox.tag属性来存储与之相关的Radiobutton...
窗体间传递参数的例子
procedure T
Form
1.
Form
Create
(Sender: TObject); begin SetWindowLong(Self.Handle, GWL_WNDPROC, LongInt(Proc)); end; procedure T
Form
1.Proc(var Message: TMessage); begin inherited; if Message.Msg ...
Delphi实现QQ消息弹框.doc
- 实现无标题窗体的移动,需要
重载
窗体的`MouseDown`和`MouseMove`事件,通过计算鼠标点击时的相对位置来模拟标题栏拖动。 - 调整大小通常需要自定义处理`WM_NCHITTEST`消息,以便在窗体边缘响应鼠标拖动。 3. **...
BCB6.0 自动识别USB串口设备
在BCB6.0中,我们可以创建一个窗体类,
重载
On
Create
或OnMessage方法,以监听WM_DEVICECHANGE消息。该消息在系统设备发生变化时发送,如USB设备的插入或移除。以下是一个简单的例子: ```cpp void __fastcall T
Form
1...
Delphi 在窗体上创建自己光标的实例
`CTest_MFCDlg` 类中的`OnInitDialog` 初始化光标,`ShowSelfCaret` 函数执行创建和显示光标的操作,而
重载
的`PreTranslateMessage`方法可能用于处理键盘消息。 通过这样的实现,用户在窗体上按下的每个键都会被...
Delphi
5,930
社区成员
262,936
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章