Sign in Join

Live chat for Free Pascal, Lazarus, Delphi and every Pascal programmer.

Mailing lists / lazarus / 2015-09

Custom control clicks

5 messages · 3 people · –

Reply by email Subscribe to this list Your subscription

Read-only archive. Use j and k to move between messages.

Fabio Luis Girardi

Someone know how catch clicks on a control (TCustomControl) at design time?

I override the methods Click and MouseDown, but these events are not called at design time and I don?t know a workaround to do this.

The idea is construct a polyline control that can be edited at design time through a Component Editor.

The best regards, Fabio Luis Girardi PascalSCADA Project http://sourceforge.net/projects/pascalscada http://www.pascalscada.com -------------- next part -------------- An HTML attachment was scrubbed... URL: <http://lists.lazarus.freepascal.org/pipermail/lazarus/attachments/20150909/abff1b0c/attachment.html>

Reply by email

Mattias Gaertner
to Fabio Luis Girardi
Show quoted text 7 lines
Someone know how catch clicks on a control (TCustomControl) at design time? I override the methods Click and MouseDown, but these events are not called at design time and I don?t know a workaround to do this. The idea is construct a polyline control that can be edited at design time through a Component Editor.

This should do the trick:

http://wiki.lazarus.freepascal.org/Extending_the_IDE#Disabling_the_designer_mouse_handler

Mattias

Reply by email

Mattias Gaertner
to Martin Frb
Show quoted text 10 lines
On 09/09/2015 22:53, Mattias Gaertner wrote: > This should do the trick: > > http://wiki.lazarus.freepascal.org/Extending_the_IDE#Disabling_the_designer_mouse_handler > Should TControlStyleType = ( csDesignInteractive, // wants mouse events in design mode do the trick too?

Ehm. Yes. But it was not implemented.
I implemented it.

Strange, it was used by TCustomControlBar, TCDCustomTabControl and TCDTabSheet.

Mattias

Reply by email

Fabio Luis Girardi
to Mattias Gaertner

Perfect!!

"Mattias Gaertner" wrote 29 lines
On Wed, 9 Sep 2015 23:16:09 +0100 Martin Frb wrote: > On 09/09/2015 22:53, Mattias Gaertner wrote: > > This should do the trick: > > > > http://wiki.lazarus.freepascal.org/Extending_the_IDE#Disabling_the_designer_mouse_handler > > > Should > TControlStyleType = ( > csDesignInteractive, // wants mouse events in design mode > > do the trick too? Ehm. Yes. But it was not implemented. I implemented it. Strange, it was used by TCustomControlBar, TCDCustomTabControl and TCDTabSheet. Mattias -- _______________________________________________ Lazarus mailing list http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.lazarus.freepascal.org/pipermail/lazarus/attachments/20150910/b4c6affe/attachment.html>

Reply by email