一个继承控件的小问题! (100分)

  • 主题发起人 主题发起人 yesky123
  • 开始时间 开始时间
Y

yesky123

Unregistered / Unconfirmed
GUEST, unregistred user!
比如我要在一个项目很多地方要用到一个 lable ,这个lable需要鼠标移动时让label字体颜色改变!
(我不想在每个lable的mouseenter和mouserexit里面写,我想做一个通用的lable,但我有不想做成控件 ,我只想在整个项目里面定义一个个新类 ,属于TLable,然后再里面写入我想要的事件 (鼠标移入移出改变颜色),然后再在窗体里的lable直接属于我的那个类.不知道这个想法是不是太另类了!)
请各位给点意见!难道这样的想法只能做成一个控件才能做到>??
 
既然你不想从TLABLE继承再做一个控件,其实这是很简单的,那就在程序里给LABLE那个两个事件动态赋值吧。我个人一点想法。
 
在程序里给LABLE那个两个事件动态赋值????

hehe 拜托,请先看清楚我的意思,我是说一个项目中有非常多的lable需要同样的事件 !

当然我也不想用(sender as TLable).font.color来改变! 我是想做个通用的单元来实现
大部分同样功能的代码。
 
kao,真tmd高手都到哪去了! 难道碰见这种问题,都在每个项目写这种垃圾代码?或者干脆写N多条语句来实现这功能? 唉 ~
 
能把它做成类,比把它做成控件,(纠正一下,应该是组件)还差多远呢?
定义两个TFONT作为他的属性,一个是普通的TFONT,另一个是在指向它时的TFONT,也就是HATOTRACK时的TFONT。利用消息,当鼠标指向它的时候,就把HOTTRACK时的TFONT副给它,
离开时再把普通TFONT副给它。
这样就可以实现HOTTRACK的效果了
 
跟(sender as TLable).font.color 没什么区别! 我就是不想做成控件 (做成控件多郁闷呀,不能为了一些简单的功能,两三句代码就能搞定的东西都做成控件吧 ,每次安装delphi或者移到其他机器上编译还必须把人家的delphi安装控件,不把你骂死才怪!!!)

算了,估计如果不用(sender as TLable).font.color 没其他的方法!
 
>>难道这样的想法只能做成一个控件才能做到>??
做成一个控件是最好的方法。
楼主知道有个Dede软件么?用Delphi写的程序很容易就被它给。。。
所以别人一般都是非标控件用的越多越好,还有公司居然把所有的标准控件都加了一层壳。。。
 
做成Frame就行了嘛。
唉……
 
就用(sender as TLable).font.color 搞那么复杂作什么?
 
做成Frame就行了嘛。???? 怎么做呀! 偶没用过frame呢! :(
 
后退
顶部