[Gambas-user] Issue with ColorChooser

[Bruce Steers]

Charlie can you test something for me?

open /usr/bin as root in a file manager and right click gambas3.gambas and
select the "Make Link" option

Then drag the link to your desktop.

Tell me if running gambas from the linkfixes the proplem.

Cheers bud.

BruceS.

On Tue, 23 Feb 2021 at 17:51, Charlie Ogier <charlie at cogier.com> wrote:

> Hi,
>
> Am I missing something or is there a problem? I can't get the
> ColorChooser to trigger events for MouseUp, MouseDown, GotFocus &
> LostFocus.
>
> If you run the code below can you let me know if you also see the issue.
>
> Thanks,
>
> Charlie
>
> *******************************************************
>
> HBox1 As HBox
> TextBox1 As TextBox
> ColorChooser1 As ColorChooser
>
> Public Sub Form_Open()
>
>    With Me
>      .H = 400
>      .W = 400
>      .Arrangement = Arrange.Vertical
>      .Padding = 5
>    End With
>
>    With ColorChooser1 = New ColorChooser(Me) As "ColorChooser1"
>      .Expand = True
>      .Tracking = True
>      .Tooltip = "Hello world!"
>    End With
>
>    With HBox1 = New HBox(Me)
>      .H = 28
>      .W = 100
>    End With
>
>    With TextBox1 = New TextBox(HBox1) As "TextBox1"
>      .H = 28
>      .W = 100
>      .Expand = True
>      .Background = Color.White
>      .Text = "Move and click things, should the events not trigger?"
>    End With
>
> End
>
> Public Sub TextBox1_GotFocus()
>
>    Me.Text = "TextBox has focus"
>
> End
>
> Public Sub TextBox1_LostFocus()
>
>    Me.Text = "TextBox has lost focus"
>
> End
>
> Public Sub ColorChooser1_MouseDown()
>
>    Stop
>
> End
>
> Public Sub ColorChooser1_MouseUp()
>
>    Stop
>
> End
>
> Public Sub ColorChooser1_GotFocus()
>
>    Stop
>
> End
>
> Public Sub ColorChooser1_LostFocus()
>
>    Stop
>
> End
>
>
> ----[ http://gambaswiki.org/wiki/doc/netiquette ]----
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.gambas-basic.org/pipermail/user/attachments/20210223/b7d66947/attachment.htm>