Form em determinada posição da tela

Delphi

09/01/2009

Boa tarde pessoal...


eu tenho um form e gostaria q esse form sempre aparecesse no lado inferior direito da tela....isso em qualquer resolução.....

E a resolução mínima q estou adotando é 1024x768...

alguém teria alguma idéia??

Obrigado


Wdrocha

Wdrocha

Curtidas 0

Respostas

Woinch

Woinch

09/01/2009

Para isso utilize o seguinte código:

  if not SystemParametersInfo(SPI_GETWORKAREA, 0, @rTela, 0) then
    rTela := Rect(0, 0, Screen.Width, Screen.Height);

    Self.Left := rTela.Right - Width;
    Self.Top := rTela.Bottom - Height;
  end;


[i:286a0586b7]*Onde <rTela> é uma variável do tipo TRect.[/i:286a0586b7]
OBS.: Não esqueca de declarar a lib Windows.


GOSTEI 0
Woinch

Woinch

09/01/2009

Favor desconsiderar o [b:999ca18b6d]end[/b:999ca18b6d] ao final do código.
Obrigado...


GOSTEI 0
Wdrocha

Wdrocha

09/01/2009

Bom dia...mt obrigado pela sua ajuda....



Funcionou perfeitamente.....



vlw


GOSTEI 0
Woinch

Woinch

09/01/2009

De nada! ;)


GOSTEI 0
POSTAR