Also:
GetKeyboardState liefert bei meinem Funktionsaufruf niemals 0 zurück, erzeugt demnach auch keinen Fehler, welchen ich mit GetLastError hätte abfragen können (habs trotzdem versucht, aber logischer weise halt nichts bekommen)...
Der Tipp aus dem VBArchiv sieht ziemlich ähnlich aus wie das, was ich bereits in SetLED geschrieben habe.
Und die Funktion SetLED lässt sich wie gesagt mithilfe von Buttons zum Ein- und Ausschalten vollkommen fehlerfrei ansprechen:
Delphi-Quellcode:
procedure TForm_Debug.Btn_LEDOnClick(Sender: TObject);
begin
SetLED(3, True);
end;
Delphi-Quellcode:
procedure TForm_Debug.Btn_LEDOffClick(Sender: TObject);
begin
SetLED(3, False);
end;
Auch mehrmaliges Klicken auf den On-Button führt nicht zu dem Blinkeffekt, welcher beim Thread auftritt... (Mehrmaliges drücken von Off blinkt ebenfalls nicht, sondern bleibt halt einfach aus)
Ich bin leider ratlos