Memo OnKeyDown + VK_TAB

[-187-]

Moin

Wie kann ich im OnKeyDown vom Memo den "Tab Tastendruck" abfangen?

Das klappt nicht:

Delphi-Quellcode:

procedure TForm1.Memo1KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if Key=VK_TAB then
  begin
    Showmessage('test');
  end;
end;

[rollstuhlfahrer]

Mit TAB kann man von einem Control zum nächsten springen. Du musst also zuerst dem Memo sagen, dass man überhaupt TABs eingeben kann (WantTabs := true) und dann kannst du die TABs auch wieder abfangen.

Bernhard

[himitsu]

Tja, da hast du ein Problem, denn der Tab wird nicht vom Memo, sondern von der Dialog-Behandlung der VCL verarbeitet/abgefangen.
Also da, wo die Interaktionen zwischen den Formkomponenten behandelt werden.

Im OnMessage von Application könnte man es versuchen, also bevor die DialogKeya dort verrbeitet werden.
Ob man da jetzt woanders auch noch rechtzeitig und "kompfortabel" rankommt, fällt mir jetzt, so auf die Schnelle, nicht ein.

[edit]
WantTabs klingt besser.

[-187-]

@rollstuhlfahrer, das bringt mir nichts. Damit kann ich den Tastendruck nicht abfangen.
WantTabs hat wohl nur was mit den Einrückungen zu tun

Hmm Mist, und ich dachte es wäre einfacher

[rollstuhlfahrer]

Dann bringt nur noch Form.KeyPreview := true und das abfangen in der Form was.

Bernhard

[Lannes]

Zitat von himitsu:

Ob man da jetzt woanders auch noch rechtzeitig und "kompfortabel" rankommt, fällt mir jetzt, so auf die Schnelle, nicht ein.

ich glaube Dir fällt das nicht ein, die Message CM_DIALOGKEY abfangen:
http://www.delphipraxis.net/523834-post6.html

[-187-]

Hey Lannes, saubere Sache! Dankeschön