Create uniForm In Runtime

[ariopax]

Hi

 

 

How to i can create a uniForm in runtime?

Please guide me!

 

 

 

 

Best Regards.

[ariopax]

Hi

 

I Find it,

procedure TMainForm.CreateFormRT(FormClassName, FormCaption, FormHint: string;
                                 FormWidth,FormHeight:Integer);
var
  Form : TUniForm;
Begin
   Form := TUniFormClass(FindClass('T'+FormClassName)).Create(UniApplication);
   Form.Caption:=FormCaption;
   Form.Hint:=FormHint;
   Form.Width:=FormWidth;
   Form.Height:=FormHeight;
   Form.ShowModal();
End;

But First Declare a class for you'r form and in initialization Register that class

  RegisterClass(TForm1);

And for call

CreateFormRT('Form1','CaptionForform','HintForForm',300,400 );

 

Best Regards.

Ario.