C
chyzpc1
Unregistered / Unconfirmed
GUEST, unregistred user!
关于Delphi下的OCX控件问题
我在Delphi是写了一个控件,大致如下:
TMyTest = class( TCustomControl )
public
constructor Create(AOwner: TComponent); override;
constructor TMyTest.Create(AOwner: TComponent);
begin
...
if csDesigning in ComponentState then SHOWMESSAGE('csDesigning' ) ;
...
end
现在问题是:
在Dephi标准模式下,生成上述类的对象,执行构造函数时,SHOWMESSAGE('csDesigning' ) 这个信息框将会显示出来,但我把此
控件转化成OCX控件后,再生成上述类的对象,执行构造函数时,SHOWMESSAGE('csDesigning' ) 这个信息框将不再显示出,不知什么
原因,请DWF们帮帮忙.
我在Delphi是写了一个控件,大致如下:
TMyTest = class( TCustomControl )
public
constructor Create(AOwner: TComponent); override;
constructor TMyTest.Create(AOwner: TComponent);
begin
...
if csDesigning in ComponentState then SHOWMESSAGE('csDesigning' ) ;
...
end
现在问题是:
在Dephi标准模式下,生成上述类的对象,执行构造函数时,SHOWMESSAGE('csDesigning' ) 这个信息框将会显示出来,但我把此
控件转化成OCX控件后,再生成上述类的对象,执行构造函数时,SHOWMESSAGE('csDesigning' ) 这个信息框将不再显示出,不知什么
原因,请DWF们帮帮忙.
