Hallo zusammen,
ich habe unter Firemonkey in meiner Form die IsDialogKey Procedure überschrieben.
procedure IsDialogKey(const Key: Word; const KeyChar: WideChar; const Shift: TShiftState;var IsDialog: boolean); override;
Warum wird in der Unit FMX.Platform.Win beim Abfangen der KeyDown-Message der Code für Key gelöscht, wenn nicht Alt, Strg, Command gedrückt wurde?
In der WndProc bei WM_KEYDOWN wird
Code:
CurrentChar(Msg, Key, Ch, Shift);
aufgerufen. Und darin steht:
Delphi-Quellcode:
if (([ssAlt, ssCtrl, ssCommand] * Shift) = []) then
Key := 0;
Der Char-Code wird normal geliefert, aber leider nicht der Key-Code. Ich möchte gerne den Nummernblock mit gewissen Funktionen ausstatten.
Gibt es einen Grund dafür?
Danke
VG Thomas