Pfeiltasten abfragen?

[corado]

Ich finde im Eventmanager von Form KEyup and KeyDown, aber warum gibt es kein left and riht?
Muss man das dann händisch machen, doer bin ich nur zu blind die Option zu finden?
Hat jemand einen Codeschnipsel, wie man das handisch macht?
Irgenwie war da awas mit einer 0 und dann kommt der eigentlich Char?!

[Bullykiffer]

Hallo.

Ich glaube da hast du etwas falsch verstanden.

OnKeyDown wird ausgelöst,wenn du eine Taste drückst,
OnKeyUp wird dann meines Wissens ausgelöst,wenn du die Taste wieder loslässt

Deswegen gibt es auch kein Left oder Right, In den oben genannten Ereignissen,musst du selber auswerten,welche Taste gedrückt wurde und
wie du auf was reagierst

Cya de Helge.

[corado]

ah ok, ja das macht Sinn:-)

[theo]

Kannst du so machen:

Code: Alles auswählen

uses LCLType....

procedure TForm1.FormKeyDown(Sender: TObject; var Key: word; Shift: TShiftState);
begin
  if Shift = [] then
    case Key of
      VK_LEFT: Caption := 'Left';
      VK_RIGHT: Caption := 'Right';
      VK_UP: Caption := 'Up';
      VK_DOWN: Caption := 'Down';
    end;
end;  

OnKeyUp geht auch, kommt aber erst beim Loslassen der Taste.

[Zvoni]

Kannst du so machen:

Code: Alles auswählen

uses LCLType....

procedure TForm1.FormKeyDown(Sender: TObject; var Key: word; Shift: TShiftState);
begin
  if Shift = [] then
    case Key of
      VK_LEFT: Caption := 'Left';
      VK_RIGHT: Caption := 'Right';
      VK_UP: Caption := 'Up';
      VK_DOWN: Caption := 'Down';
    end;
end;  

OnKeyUp geht auch, kommt aber erst beim Loslassen der Taste.

Ein ganz grosser Unterschied zwischen OnKeyDown und OnKeyUp:
Hälst du eine Taste gedrückt, feuert OnKeyDown wie bescheuert (halt so oft wie der Interrupt von der Tastatur ans OS gesendet wird).
OnKeyUp feuert pro Taste immer nur einmal (wobei ich mir gerade nicht sicher bin, ob OnKeyUp für alleinige SHIFT/STRG/ALT-Taste feuert)

[corado]

ah ok, ja danke.
Aber das bedeutet das das Beispiel nicht so gut geeignet wäre, mit FormKeyDown?
Wie würde man es eleganter lösen?

[theo]

Aber das bedeutet das das Beispiel nicht so gut geeignet wäre, mit FormKeyDown?

Warum?
Es kommt darauf an, was du damit machen willst.
Das sagtest du bisher ja nicht.

Wie würde man es eleganter lösen?

Was ist hier nicht elegant?