[Lazarus] Platform dependent modifier for common shortcut-keys?
Flávio Etrusco
flavio.etrusco at gmail.com
Sat Oct 8 16:46:22 CEST 2011
> Another approach might be to have a widgetset function like:
>
> function KeyCombo_IsCut(const Key: Word; const Shift: TShiftState): Boolean
>
> or something like:
>
> type
> TCommonShortCut = (tcsUnknown,tcsCut, tcsPaste, tcsCopy, tcsBof, tcsEof);
>
> function KeyComboToCommonShortcut(const Key: Word; const Shift:
> TShiftState): TCommonShortCut;
> begin
> //default to tcsUnKnown;
> Result := tcsUnKnown;
> ...
> end;
>
> Bart
This is a very good idea.
Check/Test/IsStandardShortCut? ;-)
-Flávio
More information about the Lazarus
mailing list