Mudar Resolução de Video - Run Time

Delphi

12/03/2003

Estou desenvolvendo um sistema que necessita trabalhar em resolução 640x480. Descobri que ´ ChangeDisplaySettings ´ muda a resolução em Run Time, porem não consigo descobrir como verificar que é a atual resolução de video.
Se alguem tiver algo similar, por favor me indique, estou precisando muito disso.


Anonymous

Anonymous

Curtidas 0

Respostas

Evandro Massini

Evandro Massini

12/03/2003

Tente o seguinte:

messagedlg(´A resolução do vídeo é ´ + inttostr(screen.width) + ´ X ´ + inttostr(screen.Height),mtinformation,[mbok],0);

Espero ter ajudado.
Até mais...


GOSTEI 0
POSTAR