[lazarus] FPC Request

[Shane Miller]

Another request.  

Classesh.inc should contain 4 const values.

scShift = $2000
scCtrl = $4000;
scAlt = $8000
scNone = 0;

These are used to defiune the TShortCut returned in Menus.pp

Thanks
Shane