Tab-Taste abfragen

rn22 · Beiträge: 70

Ist mir fast peinlich, dass zu fragen, aber ich komm nicht weiter...

Ich will für ein TEdit den Druck der Tabulatortaste abfragen.
Hab mir gedacht, dass geht ganz einfach mit OnKeyDown - funktioniert aber nicht.

Wie würdet ihr da rangehen?

Luckie · Verfasst: Mi 30.11.11 06:17

Es gibt noch OnKeyPress.

_________________
Gruß Michael

bummi · Verfasst: Mi 30.11.11 08:39

@Luckie

Tab war ein Sonderfall, wenn ich mich recht erinnere musste man sich direkt in die Messages einhängen ...

die billige Variante

Delphi-Quelltext

markieren

1:
2:
3:
4:

procedure TForm1.ApplicationEvents1Message(var Msg: tagMSG;
  var Handled: Boolean);
begin
  if (msg.message=wm_keydown) and (Msg.wParam=9) then ...

_________________
Das Problem liegt üblicherweise zwischen den Ohren
DRY DRY KISS

rn22 · Beiträge: 70

Danke erstmal!

Ich hab mit ApplicationEvents noch nicht gearbeitet - kennt ihr ein gutes Tutorial oder könnt ihr kurz erklären, wie man die Komponente bei diesem Problem anwenden würde?

bummi · Verfasst: Mi 30.11.11 16:18

Komponente TApplicationEvents aufs Hauptformular legen, OnMessage Doppelklicken und Code einfügen ....
z.B.

Delphi-Quelltext

markieren

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

begin
 if (msg.message=wm_keydown) and (Msg.wParam=9) then
   if ActiveControl=Edit1 then
      begin
      TuEtwas;
      Handled := true; // Wenn Tab hier nicht mehr funktionieren soll
      end;

end;

_________________
Das Problem liegt üblicherweise zwischen den Ohren
DRY DRY KISS

rn22 · Beiträge: 70

genau danach hab ich gesucht - vielen Dank!


Delphi-Forum.de	Delphi-Library.de
C-Sharp-Forum.de	C-Sharp-Library.de