centalizar forms

24/08/2004

2

Pessoal

to com um problema para centralizar forms...

quero que na resolução 800x600 os forms fiquem exatamente no tamanho da tela e com resolução superior fiquem centralizados...

o problema é que quando a gente usa a propriedade para centralizar, o form é centralizado no tamanho da tela, ou seja, em 800x600 fica no centro da tela com um pedaço superior vago e um pedaço inferior utrapassando... isso pq é centralizado não levando em conta a barra Iniciar do windows!

alguem tem alguma sugestão?


Responder

Posts

25/08/2004

Oscar Candido

Colega, não sei se é isso mesmo que vc quer, mas tente usar o segunte :
procedure TForm1.FormCreate(Sender: TObject);
begin
   if (Screen.Height = 600) and (Screen.Width = 800) then
     Form1.WindowState := wsMaximized
   else
     Form1.Position := poScreenCenter;
end;

Espero ter ajudao
Um Abraço


Responder

25/08/2004

Mrcdlf

[quote:6b07234c69=´oscar candido´]Colega, não sei se é isso mesmo que vc quer, mas tente usar o segunte :
procedure TForm1.FormCreate(Sender: TObject);
begin
   if (Screen.Height = 600) and (Screen.Width = 800) then
     Form1.WindowState := wsMaximized
   else
     Form1.Position := poScreenCenter;
end;

Espero ter ajudao
Um Abraço[/quote:6b07234c69]


pois é, estava pensando que talvez pudesse haver outra forma... alguma configuração das propriedades coisa do tipo...

mais vou fazer dessa forma mesmo!!!!

valeu pela força!


Responder

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários. Para saber mais sobre o uso de cookies,
consulte nossa política de privacidade. Ao continuar navegando em nosso site, você concorda com a nossa política.

Aceitar