Back to For Beginners

BCB Mouse Click Event ?

For Beginners

Started by Redoc March 18, 2004 03:16 AM

3 comments, last by Redoc 20 years, 1 month ago

Redoc

122

Author

March 18, 2004 03:16 AM

Greetings! This should be an easy question so hopefully someone can help out. I have tried searching but can not pin point this issue. In Borland C++ Builder I have made a new form and added a few controls such as an image box and a few text boxes etc. I would like to know how to detect the mouse click no matter what the mouse is over when its on the form. Using the FORM1->onMouseDown function will work but only when the mouse is in the area of the FORM, not when its on the image box or the textbox etc! ... I know I can add the same code to all the controls->onmousedown event but surely there is a way to configure it to work over the whole form globally? Any ideas appreciated!

Useless Hacker

372

March 18, 2004 04:37 AM

You could write a recursive function to set all the OnMouseDown events to point to the same function, using the ComponentCount and Components properties of TComponent (and thus TForm). If you need to differentiate between clicks on different components, you can use the Sender parameter of the event.

Here is some equivalent Delphi code, it shouldn''t be too much bother to convert this to C++ Builder:

procedure SetMouseDownEvents(component: TComponent; event: MouseEvent);var  i: Integer;begin  if (component is TControl) then begin    TControl(component).OnMouseDown := event);  end;  for i := 0 to (component.ComponentCount - 1) do begin    SetMouseDownEvents(component.Components[i, event);  end;end;...// In form createSetMouseDownEvents(Form1, Form1.MouseDown);

Hope this helps.

"The ability to speak does not make you intelligent" - Qui-Gon Jinn
[ DGDev - The Delphi Games Development Community ] [ Help GameDev.net fight cancer ] [ Shareaza - The Ultimate P2P Client ]

[ PGD - The Home of Pascal Game Development! ] [ Help GameDev.net fight cancer ]

Useless Hacker

372

March 18, 2004 04:43 AM

An alternative solution is to create a single MouseDown event handler, and then select that method from the drop down list in the object inspector for each of the objects you wish to use that method. The disadvantage of this way is that you will need to do this for every control you add to your form.

"The ability to speak does not make you intelligent" - Qui-Gon Jinn
[ DGDev - The Delphi Games Development Community ] [ Help GameDev.net fight cancer ] [ Shareaza - The Ultimate P2P Client ]

[ PGD - The Home of Pascal Game Development! ] [ Help GameDev.net fight cancer ]

Redoc

122

Author

March 18, 2004 04:48 AM

you know, I never thought of that. I will try it soon as I get home from work