FiveTech Software tech support forums

... nPelWidth AS DWORD MEMBER nPelHeigh AS DWORD MEMBER nDisFlags AS DWORD MEMBER nDisFreq AS DWORD ENDSTRUCT cBuffer := oDevMode:cBuffer lPosible := EnumDisplaySettings(0, 0, @cBuffer) IF lPosible oDevMode:nFields := nOr(DM_PELSWIDTH, DM_PELSHEIGHT ) oDevMode:nPelWidth := nAncho oDevMode:nPelHeigh ...

... nPelWidth AS DWORD MEMBER nPelHeigh AS DWORD MEMBER nDisFlags AS DWORD MEMBER nDisFreq AS DWORD ENDSTRUCT cBuffer := oDevMode:cBuffer lPosible := EnumDisplaySettings(0, 0, @cBuffer) IF lPosible oDevMode:nFields := nOr(DM_PELSWIDTH, DM_PELSHEIGHT ) oDevMode:nPelWidth := nAncho oDevMode:nPelHeigh ...

... if it is possible, to change the Resolution in silent-mode. Maybe somebody found a working Solution ? // get existing Resolution Declare Function EnumDisplaySettings Lib "user32" Alias "EnumDisplaySettingsA" _ (ByVal lpszDeviceName As Long, ByVal iModeNum As Long, lptypDevMode ...

... nDisFlags AS DWORD Member nDisFreq AS DWORD Endstruct cBuffer := oDevMode : cBuffer // Comprueba si es posible cambiar la resolución lPosible := EnumDisplaySettings(0, 0, @cBuffer) // Si es posible cambiar la resolución If( lPosible ) If( lPreguntar ) If( !MsgYesNo("Desea cambiar la resolución?", ...

... nDisFlags AS DWORD Member nDisFreq AS DWORD Endstruct cBuffer := oDevMode : cBuffer // Comprueba si es posible cambiar la resolución lPosible := EnumDisplaySettings(0, 0, @cBuffer) // Si es posible cambiar la resolución If( lPosible ) If( lPreguntar ) If( !MsgYesNo("Desea cambiar la resolución?", ...

... nDisFlags AS DWORD MEMBER nDisFreq AS DWORD ENDSTRUCT cBuffer := oDevMode:cBuffer // Comprueba si es posible cambiar la resolución lPosible := EnumDisplaySettings(0, 0, @cBuffer) // Si es posible cambiar la resolución IF lPosible if lPreguntar if MsgYesNo("Desea cambiar la resolución?", "Atención") ...

... un poco distorsionado. 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 ...

... MEMBER nPelWidth AS DWORD MEMBER nPelHeigh AS DWORD MEMBER nDisFlags AS DWORD MEMBER nDisFreq AS DWORD ENDSTRUCT cBuffer:=oDevMode:cBuffer uRet := EnumDisplaySettings(0, 0, @cBuffer) oDevMode:cBuffer:=cBuffer IF uRet // Descomente o ultimo parametro se quer trocar as cores, so que nao recomendo ...