* fix for mantis #22283, Wrong bit shift in ListView_GetCheckState (shl instead of shr)

git-svn-id: trunk@22979 -

packages/winunits-base/src/commctrl.pp

@@ -10966,7 +10966,7 @@ end;
 Function ListView_GetCheckState( hwndLV : hwnd; i : WPARAM):UINT;
 
 Begin
- Result:=(SendMessage((hwndLV), LVM_GETITEMSTATE, (i), LVIS_STATEIMAGEMASK) shl 12) -1;
+ Result:=(SendMessage((hwndLV), LVM_GETITEMSTATE, (i), LVIS_STATEIMAGEMASK) shr 12) -1;
 end;