Vassili,

it should look something like this


PUBLIC SUB Form_Open()
 DIM i AS Integer
 DIM rsThesi AS Result

   'connect to the database
   MODMain.Connect()

   'Execute the SQL QueryI hope this helps.

   rsThesi = MODMain.$Con.EXEC("select * from egrafes where elenchosAnax = 0
AND thesi <> 0 ")

   'move to the first record
   rsThesi.MoveFirst



   'while the record index is less than the total count of records
   WHILE rsThesi.Index < rsThesi.Count

   'change the background color of the label that's in a position reported
in rsThesi!thesi
   change_bgcolor("Label" & CStr(rsThesi!thesi))

   PRINT "Record: " & CStr(rsThesi.Index) & "   Result: " &
CStr(rsThesi!thesi)

   'if we haven't reached the last record, move to the next one
   IF rsThesi.Index < rsThesi.Count THEN
      rsThesi.MoveNext()
   ENDIF

   WEND
END


Not sure if it will work (I might be missing a few key elements of your
code) but theoretically it should do the job

I hope this helps.
Keep up the good work

Regards,
Dimitris


On Sat, Oct 17, 2009 at 4:56 PM, Kad Mann <[email protected]>wrote:

> On Sat, 2009-10-17 at 22:46 +0300, Vassilis K wrote:
>
> > Dimitri I don't understand
>
> Why don't you take a look at the database example in Gambas?
>
> After creating the test table, if you type in an SQL command and click
> the run button, you will see a gridview with a myriad colours that can
> be changed based on the data. Surely something like that has to be
> easier than trying to work out how to manage a hundred labels on a
> screen, and surely it will offer you much better and easier control of
> future UI changes, and surely it will offer a more pleasing and
> intuitive presentation to your user.
>
>
>
> ------------------------------------------------------------------------------
> Come build with us! The BlackBerry(R) Developer Conference in SF, CA
> is the only developer event you need to attend this year. Jumpstart your
> developing skills, take BlackBerry mobile applications to market and stay
> ahead of the curve. Join us from November 9 - 12, 2009. Register now!
> http://p.sf.net/sfu/devconference
> _______________________________________________
> Gambas-user mailing list
> [email protected]
> https://lists.sourceforge.net/lists/listinfo/gambas-user
>
------------------------------------------------------------------------------
Come build with us! The BlackBerry(R) Developer Conference in SF, CA
is the only developer event you need to attend this year. Jumpstart your
developing skills, take BlackBerry mobile applications to market and stay 
ahead of the curve. Join us from November 9 - 12, 2009. Register now!
http://p.sf.net/sfu/devconference
_______________________________________________
Gambas-user mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/gambas-user

Reply via email to