[Gambas-user] A question to a control

Dag-Jarle Johansen dag.jarle.johansen at ...626...
Mon Sep 19 14:59:45 CEST 2011


Hi,

I have defined

PRIVATE YYY as Control

and want to set some data from a Database, like this
For I=0 to RS.Count -1
For Each yyy In panTB.Children
              If yyy.Name = RS!CtrlName Then
                  Select Case RS!typ
                  Case "PictureBox", "Button"
                      yyy.Tooltip = RS!Tooltip
                      yyy.Picture = Picture[RS!graphik]

                    Case "TextBox"
                      yyy.Tooltip = RS!Tooltip
                  Case Else
                      yyy.Text = RS!CtrlInhalt
                      yyy.Tooltip = RS!Tooltip
                    End Select

              Endif
          Next
Next
RS is Result, and the content is ok, just one record. I get NO PICTURE on
the Button, but as everybody knows, Buttons can have Pictures.
Where is my stupid error this time?

I am grateful for any help.

Thanks in advance and regards,
Dag-Jarle



More information about the User mailing list