直接重载WndProc过程就可以了。
解决方案 »
- 求助:使用ACM技术进行网上语音通话,发现背景噪音太大,怎么办?
- idtcpserver 和 idtcpclient有没有 ondatareceive或着 onreceive事件
- 有谁知道较好的指纹对比算法?
- 请问大家都是用什么工具制作安装程序的啊。(散分)
- 有没有高手或大虾把dcu的文件还原成pas
- 请问:MessageDlg()按扭能用中文显示吗?
- 如何判断用shellexecute调用一个外部程序是否已经执行完毕?
- 关于DLL的函数读去!
- ,各位如何在一个form上打印一些字
- 在软件中如何制作检测新版本功能?连上Internet...
- 请问各位高手知不知怎样把在NOVELL网络DOS平台上的DBASE III 数据库里的数据传送到 WINNT平台上的SQLSERVER 或 ACCESS 数据库?也就是说在
- 初学问题又送分啦!!!!!
在一个类中重载WndProc过程是否合理?
MaximStr := '宠辱不惊,看庭前花开花落,去留无意;
毁誉由人,望天上云卷云舒,聚散任风。';
if Not Assigned(I) then
I := TI.Create(Nil);
I.Maxim := MaximStr;
I.Explain := '假如上述代码中出现“OA”、“3D”等字样,改为“=”或者去掉';
I.Desire := '加不加分随你';
—————————————————————————————————
procedure WndProc(var mes: TMessage); override;这样都不行?不可能的,这样一定可以的。你的申明是不是不对?
在应用中调用MyCtrl1(假设叫这个名).SetFocus或设置为Form的ActiveControl.