Array
(
)

centalizar forms

Mrcdlf
   - 24 ago 2004

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?


Oscar Candido
   - 25 ago 2004

Colega, não sei se é isso mesmo que vc quer, mas tente usar o segunte :
#Código


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


Mrcdlf
   - 25 ago 2004


Citação:
Colega, não sei se é isso mesmo que vc quer, mas tente usar o segunte :
#Código


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


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!