Entwickler-Ecke

Grafische Benutzeroberflächen (VCL & FireMonkey) - Tastendruck simulieren (ASCII)


icedre - Sa 21.01.06 19:10
Titel: Tastendruck simulieren (ASCII)
Hi,

ich möchte einige Tastendrcuke (?) simulieren, z.B. setzte ich den Cursor in ein Editor Fenster und dann sollen Tastendrucke anhand der ASCII Tabelle simuliert werden, ich hab leider keine Ahnung, wie ich es anstellen soll, dass ich z.B. den Tastendruvk für das "A" simulieren kann...
Vielleicht kann mir jemand weiter helfen, Danke !


andras - So 22.01.06 13:55

hallo

Delphi-Quelltext
1:
2:
3:
4:
5:
procedure druecken;
begin
keybd_event(Ord('A'), 000); //Taste drücken
keybd_event(Ord('A'), 0, KEYEVENTF_KEYUP, 0); //loslassen
end;

wenn du großbuchstaben drücken willst einfach vorher di shifttaste drücken:

Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
procedure druecken;
begin
keybd_event(VK_SHIFT, 000); //Taste drücken
keybd_event(Ord('A'), 000); //Taste drücken
keybd_event(Ord('A'), 0, KEYEVENTF_KEYUP, 0); //loslassen
keybd_event(VK_SHIFT, 0, KEYEVENTF_KEYUP, 0); //loslassen
end;

hoffe es hilft dir!!

p.s.: bin mir zimlich sicher, dass ich den gleichen code vor einiger zeit schon einmal gepostet hab...