B BlueKnife Unregistered / Unconfirmed GUEST, unregistred user! 2002-09-01 #1 请问如何让控件在运行时才发挥作用？ 比如我想做一个简单的控件，这个控件放到一个Form上时该Form一运行就最大化， 而在设计时Form保持不变，该怎么做？
B BlueKnife Unregistered / Unconfirmed GUEST, unregistred user! 2002-09-01 #4 我的意思是如何写这个控件。 再比如有些商业控件你在设计时可以随便使用，但程序一运行时首先会提示你没 有注册，这个功能在控件中是如何实现的？
W whitehorse Unregistered / Unconfirmed GUEST, unregistred user! 2002-09-01 #5 设计一个.ini文件，里面记录注册信息，或自定义一个文件格式，存储注册信息，这个文件 可以放在window/system目录下，安装时产生，运行时检查。 可以在注册表里建一个key值，记录注册信息。
B BlueKnife Unregistered / Unconfirmed GUEST, unregistred user! 2002-09-02 #6 老大，我是要问如何些控件啊。难道是我说的不清楚么？ 我的问题就是如何编写控件，达到设计时不发挥作用，运行时才发挥作用。 比如我要写一个TTest控件，如果我在TTest.Create(AOwner:TComponent)中这样写： (AOwner as TForm).Caption := 'test'; 结果就是一将此控件放到Form上，Form的Caption就变成了test，而这不是我想要的结果， 我想要的结果是当点击运行后，Form的Caption才改变。
老大，我是要问如何些控件啊。难道是我说的不清楚么？ 我的问题就是如何编写控件，达到设计时不发挥作用，运行时才发挥作用。 比如我要写一个TTest控件，如果我在TTest.Create(AOwner:TComponent)中这样写： (AOwner as TForm).Caption := 'test'; 结果就是一将此控件放到Form上，Form的Caption就变成了test，而这不是我想要的结果， 我想要的结果是当点击运行后，Form的Caption才改变。
H hfbsn Unregistered / Unconfirmed GUEST, unregistred user! 2002-09-02 #7 在TTest.Create(AOwner:TComponent)中这样写： inherited Create(AOwner); ............ if not (csDesigning in ComponentState) then (AOwner as TForm).Caption := 'test'; ............
在TTest.Create(AOwner:TComponent)中这样写： inherited Create(AOwner); ............ if not (csDesigning in ComponentState) then (AOwner as TForm).Caption := 'test'; ............
