- Код: Выделить всё
procedure TfmOption.Edit1KeyDown(Sender: Tobject; var Key: Word; Shift: TShiftState);
begin
TEdit(Sender).Text:=KeyAndShiftStateToKeyString(Key, Shift);
Key:=0;
end;
В данном случае обрабатываю большинство клавиш. Но недавно пользователь пытался задать сочетание Ctrl+/ (на русской раскладке .). И тут облом. В Delphi распознает такое сочетание, а Lazarus нет. Можете подсказать выход из ситуации?