[Webinar] Streamline your web hosting managementRegister Today

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 177
  • Last Modified:

Can't perform event OnMouseDown on Form1

...because all the form1 is covered by many ( no way to click directly on Form1)shapes.

Haw  can i start a procedure:

OpenFolder('C:\PC1');

 by clicking on my form window?


procedure TForm1.FormMouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
    OpenFolder('C:\PC1');
end;

Open in new window

0
pr2501
Asked:
pr2501
1 Solution
 
ziolkoCommented:
you can assign form's event handler to specific component like:

Panel1.OnMouseDown := Form1.OnMouseDown;

ziolko.
0

Featured Post

Learn to develop an Android App

Want to increase your earning potential in 2018? Pad your resume with app building experience. Learn how with this hands-on course.

Tackle projects and never again get stuck behind a technical roadblock.
Join Now