Thema: Delphi NUMLOCK einschalten

Einzelnen Beitrag anzeigen

Benutzerbild von Lantis
Lantis

Registriert seit: 13. Mär 2003
16 Beiträge
 
Delphi 6 Personal
 
#1

NUMLOCK einschalten

  Alt 15. Jun 2003, 15:02
Hi Leute,
Wie kann ich eigendlich den Zustand der NUMLOCK-Taste umschalten?
Also sicherstellen daß NUMLOCK immer An ist.
Delphi-Quellcode:
...
var
  KBstate: TKeyboardState;
begin
  GetKeyboardState(KBstate);
  if KBstate[VK_NUMLOCK]=0 then ShowMessage('bitte NUMLOCK einschalten');
 ...
end;
Statt der ShowMessage-Meldung sollte dann sowas rein wie NUMLOCK:=1
Hat jemand 'ne Idee für mich?
  Mit Zitat antworten Zitat