Trenger du å slå av skjermen for å spare strøm under kjøring av programmet? I denne artikkelen vil jeg forklare hvordan du kan manipulere skjermen strøm gjennom Delphi kode.
Trinn 1
Forstå WM_SYSCOMMAND melding. Før jeg forklarer trinnene som kreves for å slå skjermen strøm, vil jeg forklare litt om WM_SYSCOMMAND meldingen. WM_SYSCOMMAND sendes til vinduet for å informere om at brukeren gjør et systemnivå kommando. Slå av skjermen er en av systemet kommandoer som WM_SYSCOMMAND generert.
Trinn 2
Slå på skjermen. Det er tre tilstander av skjermen strøm: På
, Av Hotell og Stand By (low power mode)
. For å slå skjermen på, sender du WM_SYSCOMMAND med wParam satt til SC_MONITORPOWER og lParam satt til $ FFFFFFFF (eller -1). Følgende kode er et eksempel på hvordan du gjør det
//strøm på monitor Sendmessage (Application.Handle, WM_SYSCOMMAND, SC_MONITORPOWER, $ FFFFFFFF.);
Trinn 3
Slå av skjermen. For å slå av skjermen, du sender WM_SYSCOMMAND med wParam satt til SC_MONITORPOWER og lParam satt til 2.
//strømmen monitor Sendmessage (Application.Handle, WM_SYSCOMMAND, SC_MONITORPOWER, 2);
Trinn 4
Strøm skjermen til hvilemodus. Og sist, for å sette skjermen i strømsparingsmodus (stand by), sende deg WM_SYSCOMMAND med wParam satt til SC_MONITORPOWER og lParam satt til 1.
//strømmen monitor Sendmessage (Application.Handle, WM_SYSCOMMAND, SC_MONITORPOWER, 1);
Trinn 5
Inkluder nødvendige enheter i din bruker klausulen. For å gjøre det arbeidet, må du ta med nødvendige enheter i bruker
klausulen. Funksjon Sendmessage () er deklarert i windows.pas
enhet og WM_SYSCOMMAND er deklarert i messages.pas
enhet, så du må sikre at det er inkludert i bruker
klausulen.