[Gambas-user] make Label background from Database field

[Werner]

Vassilis K wrote:
> After a more accurate control I discovered that the last record was not 
> included with red color. But when I put the LOOP up to rsThesi.Count it shows 
> up the same old error.
> so I put just after the LOOP the line :
>  change_bgcolor("Label" & CInt(rsThesi!thesi))
> AND everything is OK at last !!
> Here's the code with the extra line:
>
> DO WHILE rsThesi.Index < rsThesi.Count - 1
>       change_bgcolor("Label" & CInt(rsThesi!thesi))
>       rsThesi.MoveNext()
> LOOP
> change_bgcolor("Label" & CInt(rsThesi!thesi))
>   
Hmm, maybe this would work:

FOR EACH rsThesi
      change_bgcolor("Label" & CInt(rsThesi!thesi))
NEXT

We'll make a program out of this yet!  :-D 

Werner