Tastensimulation

rolli2 · Hält's aus hier Beiträge: 5

Hallo zusammen,

also ich veruchse die Tastenkomination von linke Windows Taste und L zum pc Sperren einem Click zu hinterlegen.

Jedoch ob ich mit Ord('L') mit Hex $4c oder $6c oder oder arbeite nichts aus sicher 100 unterschiedlichen Threads funtzt.
Hab auch mal mit Postmessage für L versuchht ging auch nicht also das ist mein Code VK_L etc sidn alle nicht definiert auch wenn ich VK_L := was auch immer mache geht nicht.

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:

procedure TSDIAppForm.Test2Click(Sender: TObject);
begin
  keybd_event(VK_LWIN, 0, 0, 0);    { Drückt die linke Windows Taste }
  keybd_event ($4c, 0, 0, 0 );
  keybd_event ($4c, 0, KEYEVENTF_KEYUP, 0);
  keybd_event(VK_LWIN, 0, KEYEVENTF_KEYUP, 0);    { Läßt die linke Windows Taste wieder los }
end;

Hoffe jemand kann helfen vielleicht fehlt ja nur ne uses obwohl die Win Taste bzw Sondertasten oder Shortcuts funktionieren alle so, nur nicht normale Buchstaben. Scancode etc auch schon versucht Hex dezimalzahlen etc..

Moderiert von Narses: Delphi-Tags hinzugefügt
Moderiert von Narses: Topic aus VCL (Visual Component Library) verschoben am Fr 11.12.2009 um 11:42

Narses · Verfasst: Fr 11.12.09 12:44

Moin!

Ich denke, du suchst Suche in: Delphi-Forum, Delphi-Library

LOCKWORKSTATION. :idea:

cu
Narses

_________________
There are 10 types of people - those who understand binary and those who don´t.

rolli2 · Hält's aus hier Beiträge: 5

Jo das ist das jedoch möchte ich wissen wie ich dieses Manuel s.o auch für andere Tasten anschläge mache.

thepaine91 · Verfasst: Fr 11.12.09 17:49

Tja
im Keydown
if key <> 0 then Lockworkstation(Wie auch immer der Befehl dazu lautet)
usw... wenn ich dich richtig verstehe....

rolli2 · Hält's aus hier Beiträge: 5

Nein genau wie oben alle Tasten gehen mit den Virtual Key Codes jedoch nicht 0..9 A..Z obwohl dieses in vielen Tutorial geschrieben wird. Oder es liegt an Win Vista oder Delphi 2k7.

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme