Page 1 of 1

Alterar Resolução do Vídeo

PostPosted: Mon May 07, 2007 2:01 pm
by Valdir
Olá...

Existe algum comando que permita alterar a Resolução do Vídeo em Run Time ?

EX:

Function Main()
Local oWnd, aCoor:={}, Resolucao:=""

aCoor := GetCoor(GetDesktopWindow())
Resolucao := aCoor[4]+"x"+aCoor[3]

Do case
case Resolucao = "1024x768"
** comando para mudar para 800 x 600
case resolucao = "1152x864"
** comando para mudar para 800 x 600
case resolucao = "1280x600"
** comando para mudar para 800 x 600
case resolucao = "1280x720"
** comando para mudar para 800 x 600
case resolucao = "1280x768"
** comando para mudar para 800 x 600
case resolucao = "1280x960"
** comando para mudar para 800 x 600
case resolucao = "1280x1024"
** comando para mudar para 800 x 600
case resolucao = "1400x1050"
** comando para mudar para 800 x 600
case resolucao = "1600x900"
** comando para mudar para 800 x 600
case resolucao = "1600x1200"
** comando para mudar para 800 x 600
case resolucao = "1856x1392"
** comando para mudar para 800 x 600
case resolucao = "1920x1080"
** comando para mudar para 800 x 600
case resolucao = "1920x1200"
** comando para mudar para 800 x 600
case resolucao = "1920x1440"
** comando para mudar para 800 x 600
case resolucao = "2048x1536"
** comando para mudar para 800 x 600
endcase


Grato

Saludos.

PostPosted: Mon May 07, 2007 7:44 pm
by Patricio Avalos Aguirre