Y yeskert1 Unregistered / Unconfirmed GUEST, unregistred user! 2002-10-13 #1 我的控件的一段代码,我希望它在设计时不执行,仅仅在运行时之行! 有什么办法知道当前时设计状态还时运行状态?
F fangfei Unregistered / Unconfirmed GUEST, unregistred user! 2002-10-13 #2 TComponent 有一人state属性,自己查一下help,看看它的几个取值就知道了。 其实你自己做VCL,如果读过delphi自带的几个VCL,应该就知道这是怎么处理的。呵呵
Y ysai Unregistered / Unconfirmed GUEST, unregistred user! 2002-10-13 #3 >>来自Delphi之未经证实的葵花宝典,好好看看这个东东有帮助的 delphi5在system.pas里声明了一个全局变量 叫debughook, procedure TForm1.Button1Click(Sender: TObject); begin ShowMessage(IntToStr(DebugHook)); end; 当显示为1时,表明运行在ide下,0时表明没有运行在ide下
>>来自Delphi之未经证实的葵花宝典,好好看看这个东东有帮助的 delphi5在system.pas里声明了一个全局变量 叫debughook, procedure TForm1.Button1Click(Sender: TObject); begin ShowMessage(IntToStr(DebugHook)); end; 当显示为1时,表明运行在ide下,0时表明没有运行在ide下
伊 伊天仇 Unregistered / Unconfirmed GUEST, unregistred user! 2002-10-13 #4 if not (csDesigning in yourComponent.ComponentState) then begin //the code of you want to execute end; 记得给分鼓励。呵呵
if not (csDesigning in yourComponent.ComponentState) then begin //the code of you want to execute end; 记得给分鼓励。呵呵