Determining Shift Button State

Question:
How can I determine if is down or up while dragging an object within my app? The goal is to detect if something is being copied or moved.

Answer:
In the MouseDown event handler of a control, you'll see that the event handler is declared as follows:

procedure TForm1.SpeedButton2MouseDown(Sender: TObject; Button: TMouseButton;
 Shift: TShiftState; X, Y: Integer);
begin

end;

The Shift argument will tell you what shift button is pressed (Shift, Ctrl, or Alt). You can use it to detect the Shift state. For more details, look in the online help.

DevX Pro

Submit a Tip

Browse "Delphi And Pascal" Tips

Browse All Tips

0 Comments (click to add your comment)

Comment and Contribute