Centralizar MDI filho

Delphi

10/08/2009

Vi em outro forum sobre isso.
É um prob que estou tendo tbm.

Marco os MDI-filhos.position = poMainFormCenter;
Mas em vez de ficar bem no meio ele fica um pouco abaixo.

Pelo que percebi ele se perde qdo temos, status bar, coolBar, coisas do tipo na tela principal

Essa foi a solução passada, eu testei e funciona.
procedure TFrmBairro.FormCreate(Sender: TObject);
begin
Top:=trunc((frmPrincipal.Height - (sender as Tform).Height)/2)-(frmPrincipal.ToolBar1.Height + frmprincipal.ToolBar2.Height+frmprincipal.StatusBar1.Height);
Left:=trunc((frmPrincipal.Width - (sender as Tform).Width)/2);
end; 


Mas quero saber se não esta faltando configurar alguma certo no projeto ou nos formularios para isso funcionar corretamente sem ter q usar este codigo acima.

Obrigado.


Osocram

Osocram

Curtidas 0
POSTAR