分類: uniGUI |
用uniGUI開發的項目中,不免要遇到動態創建一個Form,再釋放掉,與傳統Delphi項目不同,這是從forum轉貼過來的,要這樣寫://創建方法if Frm = nil then Frm := TUniForm1.Create(UniApplication);//調用及釋放方法Frm.ShowModal( Procedure(Sender: TComponent; AResult:Integer) begin //Frm := nil;//做者這樣寫的 FreeAndNil(Frm);//應這樣寫. end );