> >   if (key=VK_F1) and
> >     ((Windows.GetKeyState(VK_SHIFT) and $80)>0) then
> 
> Why use GetKeyState when you already have the Shift
> parameter?
'Cos I wasn't awake. I actually realised the stupidity a couple of hours later. 
The subconcious is a strange thing. So, for Robert, try this instead:

  if (key=VK_F1) and (ssShift in Shift) then
    ShowMessage('Bingo!');

-malcolm
_______________________________________________
Delphi mailing list -> [email protected]
http://www.elists.org/mailman/listinfo/delphi

Reply via email to