http://www.purebasic.com
https://www.purebasic.fr/english/
Mabye because windows can't do this, because your VGA-driver will add this features.jrw wrote:Ive looked everywhere but cannot find how to change the brightness,contrast and gamma of the windows desktop. Ive looked at the win32 api help file and I still cannot find a call which will do this.
Is this possible?
So you dont like powerstrip? ...GPI wrote:Mabye because windows can't do this, because your VGA-driver will add this features.jrw wrote:Ive looked everywhere but cannot find how to change the brightness,contrast and gamma of the windows desktop. Ive looked at the win32 api help file and I still cannot find a call which will do this.
Is this possible?
And i Don't like programms, that change my complete PC...
Try looking for Get/SetDeviceGammaRamp in the WinAPIjrw wrote:Ive looked everywhere but cannot find how to change the brightness,contrast and gamma of the windows desktop. Ive looked at the win32 api help file and I still cannot find a call which will do this.
Is this possible?
Code: Select all
Procedure.s ShowAPIError(CustomError=#False, ErrorCode=0)
Protected Buffer.s
Protected NumberOfChars
If Not CustomError
ErrorCode=GetLastError_()
EndIf
Buffer.s=Space(4096)
NumberOfChars=FormatMessage_(#FORMAT_MESSAGE_FROM_SYSTEM,0,ErrorCode,0,Buffer.s,Len(Buffer.s),0)
ProcedureReturn Left(Buffer.s,NumberOfChars-2)
EndProcedure
; Mem=AllocateMemory(SizeOf(Byte)*3)
; PokeL(Mem+SizeOf(Byte)*0,140)
; PokeL(Mem+SizeOf(Byte)*0,140)
; PokeL(Mem+SizeOf(Byte)*0,140)
; Dim GammaRamp(3,256)
Mem=AllocateMemory(SizeOf(Byte)*3*256)
Debug SetDeviceGammaRamp_(GetDC_(0),@Mem)
Debug ShowAPIError()
Repeat
Delay(1)
ForEverCode: Select all
Procedure.s ShowAPIError(CustomError=#False, ErrorCode=0)
Protected Buffer.s
Protected NumberOfChars
If Not CustomError
ErrorCode=GetLastError_()
EndIf
Buffer.s=Space(4096)
NumberOfChars=FormatMessage_(#FORMAT_MESSAGE_FROM_SYSTEM,0,ErrorCode,0,Buffer.s,Len(Buffer.s),0)
ProcedureReturn Left(Buffer.s,NumberOfChars-2)
EndProcedure
value = 64
Dim iGammaRamp.w(2,255)
For i = 0 To 255
iArrayValue = i * (value + 128)
If iArrayValue > 65535
iArrayValue = 65535
EndIf
iGammaRamp(0,i) = iArrayValue
iGammaRamp(1,i) = iArrayValue
iGammaRamp(2,i) = iArrayValue
Next
Debug SetDeviceGammaRamp_(GetDC_(0),@iGammaRamp())
Debug ShowAPIError()
Repeat
Delay(1)
ForEver
The Win32.hlp file has HUNDREDS of missing APIs. It's really old. Use the online MSDN search instead.jrw wrote:Ive looked at the win32 api help file and I still cannot find a call which will do this
...so is the post you've quoted.MachineCode wrote:The Win32.hlp file has HUNDREDS of missing APIs. It's really old. Use the online MSDN search instead.jrw wrote:Ive looked at the win32 api help file and I still cannot find a call which will do this
And your point is?c4s wrote:so is the post you've quoted.
I used this code:c4s wrote: But how can I set the gamma level back to normal?
I already saw GetDeviceGammaRamp_() but it doesn't make much sense after successfully testing your code.luis wrote:I used this code:c4s wrote: But how can I set the gamma level back to normal?
http://www.nirsoft.net/vc/change_screen_brightness.html
value = 128 normal, < 128 darker, > 128 lighter
I suppose you can also use the GetDeviceGammaRamp() api to save the current settings and restore them if needed.
You can also alter RGB components separately to enhance/reduce a specific color channel.
BTW: this api was listed in the good old win32.hlp