Entwickler-Ecke

Delphi Language (Object-Pascal) / CLX - Tasten loggen


Jakez - Mi 03.09.03 08:41
Titel: Tasten loggen
Hi,
Ich möchte gerne auf Tastaturereignisse reagieren, d.h.:

Wenn Taste="a" then ......
Wenn Taste="b" then ......

Weiß jemand wie ich das realisieren könnte!?

Gruß
Dennis


ErnestoChe - Mi 03.09.03 08:53

Hi,

im OnKeyPress-Ereignis die Taste abfragen und darauf reagieren:


Delphi-Quelltext
1:
2:
3:
4:
5:
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
  if key = 'H' then
    caption := 'Hello World';
end;


MFG

- Ernesto -


Delete - Mi 03.09.03 08:54

Hi

Dies kannst du ganz eifach tun.


Quelltext
1:
2:
3:
4:
5:
6:
7:
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word);
begin
  if Key=ord('a')) then  Showmessage('a');
  if Key=ord('b')) then  Showmessage('b');
  if Key=ord('c')) then  Showmessage('c');

end;


Ich hoffe, ich habe dir gedient... :D


Jakez - Mi 03.09.03 09:17
Titel: Klappt!
Dankeschön..... :idea: :wink: :D