Fórum MDI Forms #222832
27/03/2004
0
Como faço para diminuir o tamanho de um form MDI quando for criado.
Através do comando frm_form1.height := 152
Através do comando frm_form1.height := 152
Adorador
Curtir tópico
+ 0
Responder
Posts
27/03/2004
Poeta Noturno
Como vai adorador?
Bom, o caminho é esse, mas usa esse comando no evendo OnCreate do Form, ok?
Um abraço
Poeta Noturno
Bom, o caminho é esse, mas usa esse comando no evendo OnCreate do Form, ok?
Um abraço
Poeta Noturno
Responder
Gostei + 0
27/03/2004
Asa_mcmf
[color=darkblue:7c057d7673][i:7c057d7673]procedure TForm1.FormCreate(Sender: TObject);
begin
Height := 50;
Width := 50;
end;[/i:7c057d7673][/color:7c057d7673]
ou, utilizando o ClientHeight e ClientWidth, você fornece o espaço utilizado sem a barra de título, só o espaço ´cliente´ do Formulário,
como no código abaixo....
[color=darkblue:7c057d7673][i:7c057d7673]procedure TForm1.FormCreate(Sender: TObject);
begin
ClientHeight := 50;
ClientWidth := 50;
end;[/i:7c057d7673][/color:7c057d7673]
begin
Height := 50;
Width := 50;
end;[/i:7c057d7673][/color:7c057d7673]
ou, utilizando o ClientHeight e ClientWidth, você fornece o espaço utilizado sem a barra de título, só o espaço ´cliente´ do Formulário,
como no código abaixo....
[color=darkblue:7c057d7673][i:7c057d7673]procedure TForm1.FormCreate(Sender: TObject);
begin
ClientHeight := 50;
ClientWidth := 50;
end;[/i:7c057d7673][/color:7c057d7673]
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)