[Gambas-user] A question to a control

[Jussi Lahtinen]

Cannot see error in this part of the code.
What happens if you add "Debug yyy.Name;;RS!typ" under 'Case "PictureBox",
"Button"'?
Does it get executed?

Send the project with sample database if possible.

Jussi



On Mon, Sep 19, 2011 at 15:59, Dag-Jarle Johansen <
dag.jarle.johansen at ...626...> wrote:

> 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
>
> ------------------------------------------------------------------------------
> BlackBerry® DevCon Americas, Oct. 18-20, San Francisco, CA
> Learn about the latest advances in developing for the
> BlackBerry® mobile platform with sessions, labs & more.
> See new tools and technologies. Register for BlackBerry® DevCon today!
> http://p.sf.net/sfu/rim-devcon-copy1
> _______________________________________________
> Gambas-user mailing list
> Gambas-user at lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/gambas-user
>