LCLType --> Virtuelle Tastencodes und Win8

[mintpc]

Hallo zusammen,

die virtuellen Tastencodes (unit LCLType) funktionieren bei meinem Zweitrechner unter
Win 8 (mit Touchscreen) nicht. Mit Win 7 läuft alles. (jeweils Lazarus 1.0.6)

Code: Alles auswählen

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
  case key of
    vk_up :   z := 1;  // oder eine Memo-Ausgabe o.ä.
end;

Komisch oder? Ich hab nun schon ein paar Tage rumprobiert, finde aber nichts. Kann doch nur
irgendwo eine kleine Ergänzung sein, oder?
Weiß jemand, was ich falsch mache?

Danke schonmal
mintpc

[Soner]

Nur so ein dumme Frage, verwendest du TForm's OnKeyDown?
Falls ja, musst du dein Formulars Keypreview True machen.

[teamnoobPDB]

Ja bei mir dasselbe Problem Laut meinem Wissensstand benutze ich keine TForm's OnKeyDown.

[mintpc]

Danke für die Hilfe.

Das mit dem "Keypreview" war ein sehr guter Tipp.

mintpc