Search found 11 matches: changedisplaysettings

Return to advanced search

Re: Resolucion en pantalla

... oDevMode:nFields := nOr(DM_PELSWIDTH, DM_PELSHEIGHT ) oDevMode:nPelWidth := nAncho oDevMode:nPelHeigh := nAlto cBuffer:=oDevMode:cBuffer TRY ChangeDisplaySettings(@cBuffer, 4) lCamReso := .T. CATCH MsgAlert("Modo no soportado", "Error" ) END else MsgAlert("Modo no ...
by russimicro
Thu Aug 13, 2015 1:25 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Resolucion en pantalla
Replies: 7
Views: 2568

Re: CAMBIO RESOLUCION PANTALLA

... oDevMode:nFields := nOr(DM_PELSWIDTH, DM_PELSHEIGHT ) oDevMode:nPelWidth := nAncho oDevMode:nPelHeigh := nAlto cBuffer:=oDevMode:cBuffer TRY ChangeDisplaySettings(@cBuffer, 4) lCamReso := .T. CATCH MsgAlert("Modo no soportado", "Error" ) END else MsgAlert("Modo no ...
by Maggiro
Sat Apr 19, 2014 9:00 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: CAMBIO RESOLUCION PANTALLA
Replies: 28
Views: 8606

Change/save Screen-resolution to Applic.-resol. at Runtime ?

... _ (ByVal lpszDeviceName As Long, ByVal iModeNum As Long, lptypDevMode As Any) As Boolean // Change Resolution Declare Function ChangeDisplaySettings Lib "user32" Alias "ChangeDisplaySettingsA" _ (lptypDevMode As Any, ByVal dwFlags As Long) As Long // Exit ...
by ukoenig
Wed Mar 30, 2011 7:09 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: Change/save Screen-resolution to Applic.-resol. at Runtime ?
Replies: 20
Views: 4627

... end oDevMode:nFields := nOr( DM_PELSWIDTH, DM_PELSHEIGHT ) oDevMode:nPelWidth := nAncho oDevMode:nPelHeigh := nAlto cBuffer:=oDevMode:cBuffer Try ChangeDisplaySettings(@cBuffer, 4) lCamReso := .T. Catch MsgStop("Modo no soportado", "Error" ) End else MsgStop("Modo no soportado", "Error" ) end ...
by jaba
Mon Oct 27, 2008 11:50 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Ajustar resolucion
Replies: 10
Views: 2726

... end oDevMode:nFields := nOr( DM_PELSWIDTH, DM_PELSHEIGHT ) oDevMode:nPelWidth := nAncho oDevMode:nPelHeigh := nAlto cBuffer:=oDevMode:cBuffer Try ChangeDisplaySettings(@cBuffer, 4) lCamReso := .T. Catch MsgStop("Modo no soportado", "Error" ) End else MsgStop("Modo no soportado", "Error" ) end ...
by horacio
Mon Oct 27, 2008 2:58 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Ajustar resolucion
Replies: 10
Views: 2726

FWHISHOW wrote:HARBOUR EXCEPTION:
CALLED FROM CALLDLL(0)
CALLED FROM CHANGEDISPLAYSETTINGS(0)
CALLED FROM CAMRESO(89)


A mi me funciona perfectamente. Me gustaría saber si otros lo han probado y les funciona.
by Manuel Valdenebro
Fri Feb 08, 2008 11:49 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: CAMBIO RESOLUCION PANTALLA
Replies: 28
Views: 8606

Manuel Valdenebro, fiz um teste e usando FWH7.01 + XHARB 99.71 + WINXP, e funcionou, porem aconteceu o seguinte erro depois de trocar a resolução:

HARBOUR EXCEPTION:

CALLED FROM CALLDLL(0)
CALLED FROM CHANGEDISPLAYSETTINGS(0)
CALLED FROM CAMRESO(89)


Grato
by FWHISHOW
Fri Feb 08, 2008 10:08 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: CAMBIO RESOLUCION PANTALLA
Replies: 28
Views: 8606

... endi oDevMode:nFields := nOr(DM_PELSWIDTH, DM_PELSHEIGHT ) oDevMode:nPelWidth := nAncho oDevMode:nPelHeigh := nAlto cBuffer:=oDevMode:cBuffer TRY ChangeDisplaySettings(@cBuffer, 4) lCamReso := .T. CATCH MsgAlert("Modo no soportado", "Error" ) END else MsgAlert("Modo no soportado", "Error" ) endif ...
by Manuel Valdenebro
Fri Feb 08, 2008 9:38 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: CAMBIO RESOLUCION PANTALLA
Replies: 28
Views: 8606

... Seguramente habrá algun parámetro que habrá que cambiar tambien. Segun un código que he visto en Delphi, en las funciones EnumDisplaySettings y ChangeDisplaySettings repetimos las variables y no coinciden con las funciones de Windows. Quizas algun entendido en "C" pueda ayudarnos un poquito ...
by Manuel Valdenebro
Thu Feb 07, 2008 10:28 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: CAMBIO RESOLUCION PANTALLA
Replies: 28
Views: 8606

... esta linha para trocar as cores so que nao recomendo * oDevMode:nBitsPPel := 16 //(could be 8, 16, 32 or even 4) cBuffer:=oDevMode:cBuffer uRet := ChangeDisplaySettings(@cBuffer, CDS_TEST) oDevMode:cBuffer:=cBuffer DO CASE Case uRet = DISP_RESTART if MsgYesNo("Deseja reiniciar para aplicar as alteracoes?", ...
by horacio
Wed Feb 06, 2008 10:15 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: CAMBIO RESOLUCION PANTALLA
Replies: 28
Views: 8606

CAMBIO RESOLUCION PANTALLA

... en Delphi lo que hacen es cambiar directamente la resolución de la pantalla, a través de las funciones del API-WINDOWS EnumDisplayDevices y ChangeDisplaySettings.- ¿Como podría hacerlo desde FWH?
by Manuel Valdenebro
Wed Feb 06, 2008 10:31 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: CAMBIO RESOLUCION PANTALLA
Replies: 28
Views: 8606

Return to advanced search