想写个公用的函数让所有同一类的组件用(比如Edit),但是不知道怎样写能让它操作当前调用它的组件(比如修改调用他的Edit组件的Text属性)
解决方案 »
- RooyeeMessenger由Delphi开发的XMPP即时通讯客户端(开源)
- SQL语句?
- 有谁知道怎么编写DVS文件的播放器?
- showmessage方法问题
- 有关Access压缩数据库的代码问题???
- 请问已知一个窗口的handle,用sendmessage使这个窗口隐藏,该怎么设置参数,谢谢
- 我是菜鸟,我举手发问
- 一个小问题,急!!!在线等待!谢谢!!!
- 如何计算任一一个角的角度
- 我想学习OBJECT PASCAL语言,请推荐我一本OBJECT PASCAL的好书,电子版的也要!(中文版)
- 十万火急,高手赐教 如何 DBGridEh 显示数据加 序号 列 (始终是1,2,3....)??
- 关于MESSAGEDLGPOS涵数的使用?
Edit1.text:='';
self是类的指针,指向自己。
if sender is Tedit then
(sender as tedit).text := '';