Malcolm Clark wrote: > procedure TForm1.ListView1KeyDown(Sender: TObject; > var Key: Word; > Shift: TShiftState); > begin > if (key=VK_F1) and > ((Windows.GetKeyState(VK_SHIFT) and $80)>0) then
Why use GetKeyState when you already have the Shift parameter? -- Rob _______________________________________________ Delphi mailing list -> [email protected] http://www.elists.org/mailman/listinfo/delphi
