Maximizar form via código.
Como faço para maximizar um from via codigo.
Delphi 7
Frigorifico Sa
Curtidas 0
Respostas
Ricardo Boaro
20/01/2009
Ola..
Faça o seguinte:
No OnShow ou onde vc quiser maximizar digite:
Form1.WindowState := wsMaximized
Aguardo seu retorno!
Abraço
Faça o seguinte:
No OnShow ou onde vc quiser maximizar digite:
Form1.WindowState := wsMaximized
Aguardo seu retorno!
Abraço
GOSTEI 0
Frigorifico Sa
20/01/2009
Da um erro no onshow do codigo abaixo.
procedure AbreForm(aClasseForm: TComponentClass; aForm: TForm);
begin
{: método para abrir form}
Application.CreateForm(aClasseForm, aForm);
try aForm.ShowModal;
finally
aForm.Free;
end;
end;
procedure AbreForm(aClasseForm: TComponentClass; aForm: TForm);
begin
{: método para abrir form}
Application.CreateForm(aClasseForm, aForm);
try aForm.ShowModal;
finally
aForm.Free;
end;
end;
GOSTEI 0
Ricardo Boaro
20/01/2009
OLá
Seu código esta assim:
procedure AbreForm(aClasseForm: TComponentClass; aForm: TForm);
begin
{: método para abrir form}
Application.CreateForm(aClasseForm, aForm);
try aForm.ShowModal;
finally
aForm.Free;
end;
end;
Altere para:
begin
{: método para abrir form}
aForm:= TForm.Create(Application);
try
aForm.ShowModal;
finally
aForm.Free;
end;
end;
Isso resolve o seu problema
Aguardo o seu retorno..
Abraço
Seu código esta assim:
procedure AbreForm(aClasseForm: TComponentClass; aForm: TForm);
begin
{: método para abrir form}
Application.CreateForm(aClasseForm, aForm);
try aForm.ShowModal;
finally
aForm.Free;
end;
end;
Altere para:
begin
{: método para abrir form}
aForm:= TForm.Create(Application);
try
aForm.ShowModal;
finally
aForm.Free;
end;
end;
Isso resolve o seu problema
Aguardo o seu retorno..
Abraço
GOSTEI 0
Frigorifico Sa
20/01/2009
Esta criando um formulario em branco.
Abraços.
GOSTEI 0
Ricardo Boaro
20/01/2009
Olá
Sim, mas é isso que deveria fazer. Se vc criar um formulário com componentes, precisa incrementar o código para cada componente que deseja, definir o Owner o Parent etc.
Me explique melhor para que vc precisa desse formulário? Por que ele precisa ser criado dinamicamente?
Abraço
Sim, mas é isso que deveria fazer. Se vc criar um formulário com componentes, precisa incrementar o código para cada componente que deseja, definir o Owner o Parent etc.
Me explique melhor para que vc precisa desse formulário? Por que ele precisa ser criado dinamicamente?
Abraço
GOSTEI 0
Frigorifico Sa
20/01/2009
Olá
Não estou tentado criar o formulario dinamicamente.
Tirei de avaliable forms e parou de dar erro, mas assim não maximizava.
Achei a propriedade windowsStates desta forma funcionou.
Fiz da forma abaixo e o codigo FormSQL.WindowState := wsMaximized; funcionou.
//AbreForm(TFormSQL,FormSQL);
Application.CreateForm(TFormSQL,formsql);
FormSQL.ShowModal;
Pode encerrar o chamado. Obrigado e abraços.
FormSQL.ShowModal;
Pode encerrar o chamado. Obrigado e abraços.
GOSTEI 0