C confidentbb Unregistered / Unconfirmed GUEST, unregistred user! 2002-10-09 #1 动态生成一个控件， 第二次调用时，判断是否存在， 存在改变其属性，不存在则动态生成，再改变其属性。
A Aiirii Unregistered / Unconfirmed GUEST, unregistred user! 2002-10-09 #2 if assigned(XXXX) then show else XXXX := TXXXX.Create()
R rym Unregistered / Unconfirmed GUEST, unregistred user! 2002-10-09 #3 if not Assigned(ObjectName) then ObjectName := TClassName.Create();
J jsxjd Unregistered / Unconfirmed GUEST, unregistred user! 2002-10-09 #4 据说assigned的判断不可靠，你可以直接赋值，不管它存在与否！ try MyControl.Prop:=... .......... except end;
C confidentbb Unregistered / Unconfirmed GUEST, unregistred user! 2002-10-09 #5 to jsxjd assigned 不正确，举个例子，恩。
J jsxjd Unregistered / Unconfirmed GUEST, unregistred user! 2002-10-09 #6 这里有很多这方面的讨论。 要提高 assigned判断的有效性。在Free后加一句。 MyForm.free; MyForm:=nil;
W wql Unregistered / Unconfirmed GUEST, unregistred user! 2002-10-09 #7 主要是在定义全局变量的时候就要赋值了! Var PP : TPanel = Nil; Procedure ShowPP; Begin If (PP=Nil) Then Begin PP:=TPanel.Create(Form1); PP.Left:=0; End; PP.Left:=PP.Left+1; End;
主要是在定义全局变量的时候就要赋值了! Var PP : TPanel = Nil; Procedure ShowPP; Begin If (PP=Nil) Then Begin PP:=TPanel.Create(Form1); PP.Left:=0; End; PP.Left:=PP.Left+1; End;
3 328xy Unregistered / Unconfirmed GUEST, unregistred user! 2002-10-09 #8 例如 Edit1:TEdit if Edit1=nil then Edit1:=TEdit1.create(Form1);
