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@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/gambas-user
