FiveTech Software tech support forums

... http://forums.fivetechsupport.com/viewtopic.php?f=6&t=31204&p=180565&hilit=CamReso&sid=d14c66447766519bf63ba89f31b43fda&sid=4e043eeb6afc332310628e35560d3d7a#p180565 http://forums.fivetechsupport.com/viewtopic.php?f=6&t=9865&p=158592&hilit=CamReso&sid=d14c66447766519bf63ba89f31b43fda&sid=4e043eeb6afc332310628e35560d3d7a#p158592 ...

... muy bien AjustaResolucion() // al inicio de la aplicacion FUNCTION AjustaResolucion() LOCAL nResoAncho := GetSysMetrics(0) IF nResoAncho > 1024 CamReso ( 1024, 768) ENDIf RETURN nil //***************************************************************** Function CamReso(nAncho, nAlto) Local DM_PELSWIDTH ...

... #Include "dll.ch" #Include "Struct.ch" FUNCTION MAIN() LOCAL nResoAncho := GetSysMetrics(0) IF nResoAncho > 800 CamReso ( 800, 600) MSGINFO('HECHO. AQUI PUEDES INICIAR TU PROGRAMA ELABORADO PARA 800 X 600') ENDI RETU nil Function CamReso(nAncho, nAlto) Local DM_PELSWIDTH ...

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.

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

... foro de FW-Brasil: http://www.fivewin.com.br/forum/topic.asp?TOPIC_ID=10465 En segundo lugar que en base a dicha función, he elaborado la función CamReso() para xHarbour, que cambia la resolución de la pantalla y automaticamente vuelve a la resolución original al cerrar la aplicación. A mi me ...