Scroll-Lock-Taste

[CReber]

Ich hab jetzt schon ne Weile gesucht aber leider nichts gefunden. Wie kann man die Scroll-Lock-LED an der Tastatur steuern? Es gibt hier ja so ein Tastaturfunktionstesttool ;) Aber da sieht ja kein Mensch durch!

[Robert Marquardt]

Eigentlich kann man das nicht.
Was willst du eigentlich erreichen?

[CReber]

http://www.ttecx.de/softwarereports/...d_led/main.php

das ;)

[Bowler]

Meinst du sowas (siehe Link):

http://www.delphi-forum.de/viewtopic...&highlight=led

[neolithos]

Also ich würde es ja so machen...

Delphi-Quellcode:

  keybd_event(VK_SCROLL, 0, KEYEVENTF_EXTENDEDKEY, 0); // WM_KEYDOWN
  keybd_event(VK_SCROLL, 0, KEYEVENTF_EXTENDEDKEY or KEYEVENTF_KEYUP, 0); // WM_KEYUP

[Bowler]

Aber wird durch Deine Lösung nicht auch der Tasten-Status (ScrollLock an, ScollLock aus) gesetzt? Ich dachte, es ging nur um die LEDs unabhängig von der Taste.

[fkerber]

Hi!

Wie wär das:

Zitat:

Easy Delphi Helper 2000 - EDH online
Rollen LED
Hits: 497
Modul für den EDH: modul10.edu Download
Eingesendet von: Delphi-Treff/EDH-Team Mail Homepage



Rollen-LED aktivieren

Folgende Procedure aktiviert das Rollen-LED der Tastatur. Diese Procedure niemlas in einen Timer mit kurzen Intervallen oder in eine Schleife schreiben. Davon kann die Tastatur kaputt gehen.

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  KeyboardState: TKeyboardState;
begin
  GetKeyboardState(KeyboardState);
  KeyboardState[VK_SCROLL]:=1;
  SetKeyboardState(KeyboardState);
end;

KeyboardState[VK_SCROLL]:=1; aktiviert das LED. Würde der Parameter auf 0 gesetzt, wird das Lämpchen wieder deaktiviert. Über diese Eigenschaft kann man auch herausfinden, ob die Rollen Taste aktiviert ist oder nicht:

Delphi-Quellcode:

if KeyboardState[VK_SCROLL]=1 then
  Showmessage('Rollen ist aktiviert')
else
  Showmessage('Rollen ist deaktiviert');

Ciao fkerber

[neolithos]

Zitat:

Zitat von Bowler

Aber wird durch Deine Lösung nicht auch der Tasten-Status (ScrollLock an, ScollLock aus) gesetzt? Ich dachte, es ging nur um die LEDs unabhängig von der Taste.

Ja, dafür funktioniert es unter allen NT-Systemen.

@fkerber:

Deine Lösung läuft nur unter Win9x-Systemen.

[fkerber]

Hi!

@neolithos:
Das kann sein, ich habe es nicht getestet, war nuc Copy&Paste.


Ciao fkerber

[FastJack2]

hy ...
ich hab son Programm mal geschrieben ;)
du findest es auf http://fastjack2.homeip.net
das Proggi heisst kb_hdd und die Sourcen liegen natürlich bei ;)

greetz
-FastJack2

PS: jaja ich weiss das der Quelltext nicht kommentiert ist aber SOOO umständlich isser nun auch wieder nicht ;)

PPS: es gibt einen Bug in dem Proggi, da ich die Lese/Schreibzugriffe in einem Integer hochcounte ... is klar, dass der Wertebereich dann irgendwann überschritten is ...