Alterar Resolução do Vídeo

Alterar Resolução do Vídeo

Postby Valdir » Mon May 07, 2007 2:01 pm

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.
Valdir - Jundiaí - S.P. - Brasil
Fivewin 16.08
Valdir
 
Posts: 20
Joined: Fri Feb 10, 2006 5:21 pm

Postby Patricio Avalos Aguirre » Mon May 07, 2007 7:44 pm

User avatar
Patricio Avalos Aguirre
 
Posts: 1060
Joined: Fri Oct 07, 2005 1:56 pm
Location: La Serena, Chile


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot] and 40 guests