centalizar forms

Question

Pessoalto 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 ...

Oscar Candido · Answer

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

Mrcdlf · Answer

[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!