自己创建了控件,有点问题,请进:(50分)

  • 主题发起人 主题发起人 张剑波
  • 开始时间 开始时间

张剑波

Unregistered / Unconfirmed
GUEST, unregistred user!
这个控件是从customcontrol继承的,编译安装完毕,实际测试时,
ComponentState的属性一个也找不到:
procedure TForm1.Button1Click(Sender: TObject);
begin
if csdesigning in everything1.ComponentState then
showmessage('a');
if csdestroying in everything1.ComponentState then
showmessage('b');
if csfixups in everything1.ComponentState then
showmessage('c');
if csloading in everything1.ComponentState then
showmessage('d');
if csreading in everything1.ComponentState then
showmessage('e');
if csupdating in everything1.ComponentState then
showmessage('f');
if cswriting in everything1.ComponentState then
showmessage('j');
if csancestor in everything1.ComponentState then
showmessage('h');
end;
 
我猜 这些属性一些是设计期间的,一些是创建期间的,而你的这个方法是
运行期间并且所有控件创建完毕后触发的,所以……
 
beta可能给出了正确的答案。
我的水平太低,以至于无法深刻的理解,好好学吧。
 
接受答案了.
 
后退
顶部