Form Em Tempo De Execução

[Arlon]

Alguém sabe me dizer como criar um form em tempo de execução.

Mais ou menos assim: quando eu clicar no Buttom ele gera um form.

Agradeço a quem puder me ajudar... Valeu!!

[bolomaster]

procedure TForm1.Button1Click(Sender: TObject);

begin

  application.createForm(Tform2,form2);

    Form2.ShowModal;

 

Ok espero ter ajudado, entre no link onde você pode pegar varios exemplos sobre isto

EXEMPLOS

[Arlon]

Essa rotina que você me passou é a mesma que tem no ClubeDelphi. Ele pede pra declarar "TForm2" e "Form2", o "TForm" eu declarei como TComponentClass, não sei se tá certo mas também não tá acusando erro e Form2 eu declaro como que variável??

De qualquer forma valeu pela ajuda...

[bolomaster]

{Para você economizar memória, pode-se criar os forms de sua aplicação somente no momento da execução. Na criação do Form você define se ele é MODAL ou NÃOMODAL. Para Isso observe os seguintes códigos: }

//MODAL- Mostra form em modo exclusivo

procedure TForm1.Button1Click(Sender: TObject);

begin

Application.CreateForm(TForm2, Form2);{Carrega form na memória}

Form2.ShowModal;{Mostra form em modo exclusivo}

Form2.Free; {Libera Memória}

end; //NÃO MODAL - Mostra form em modo não exclusivo

procedure TForm1.Button1Click(Sender: TObject);

begin

Application.CreateForm(TForm2, Form2);{Carrega form na memória}

Form2.ShowModal;{Mostra form em modo exclusivo}

end; //No evento OnClose do Form2 coloque o seguinte código.

procedure TForm2.FormClose (Sender: Tobject; var Action : TCloseAction);

begin

Action:= caFree;

end; {Aliado a este código, deve deve alterar no delphi, no menu Options, opção Project. Mudando os forms a serem criados dinamicamente da coluna Auto-Create Forms para Avaliable Forms.}

[KeitaroSan]

Uma forma bem simples di fazeh issow é assim:

declara essa variavel como global, pode ser local, mas acho que local perde o sentido, assim:

Formulario: TForm;

Depois faix assim pra usah:

  Formulario := TForm.Create(nil); //inicializando o formulario
  Formulario.ShowModal; //mostrando o form, podi se usando também o show
  Formulario.Free; //Descarregando da memoria o form...

Simples issow, não é?? ^__^

mas tipow, porque vuce keh criah um form em tempu di exec? nom intendi o motivo ainda