Fellipe .... eu não sei qual é melhor opção mas eu uso assim:

procedure AbreForm (aClasseForm : TComponentClass; aForm: TForm);
 
procedure AbreForm(aClasseForm: TComponentClass; aForm: TForm);
begin
  {: método para abrir form}
  Application.CreateForm(aClasseForm, aForm);
  try
    aForm.ShowModal;
  finally
    aForm.Free;
  end;
end;

no clique do botão:

AbreForm(TFrmCadProduto, FrmCadProduto) ;


Espero ter ajudado ....

Luciano Angelini
Prefeitura de Lupionópolis-Pr



Fellipe Henrique escreveu:
>
> Olá amigos, quero criar um tela de localizar, sempre que o usuário 
> clica no
> botão... tenho o FrmLocalizar, e tenho os dois codigos, gostaria de saber
> qual deles é o melhor e o correto de ser usado, se é que há diferença 
> entre
> eles..
>
> Desde já agradeço.
>
> Código1:
> FrmLocalizar := TFrmLocalizar.Create(nil);
> try
> FrmLocalizar.ShowModal;
> finally
> FrmLocalizar.Release;
> end;
>
> Código 2:
>
> Type
> tLocalizar = TFrmLocalizar;
> (..)
>
> ButtonClick():
> var
> vTelaLoc: tLocalizar;
> begin
> vTelaLoc := vTelaLoc.Create(nil);
> try
> vTelaLoc.ShowModal;
> finally
> vTelaLoc.Release;
> end;
>
> -- 
> _________________________________
> T.·.F.·.A.·.
> Fellipe Henrique
> [EMAIL PROTECTED] <mailto:fellipeh%40gmail.com>
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>  

Responder a