Color Command

[rich]

What is the syntax for changing the background and font colors in JustBasic 2.0?

[B+]

From IDE Help see graphics > graphics commands > Color and Backcolor

[rich]

Thanks!

[rich]

Can you show me an example for defining the handle?

[tsh73]


   nomainwin

   WindowWidth = 392
   WindowHeight = 170

   UpperLeftX=int((DisplayWidth-WindowWidth)/2)
   UpperLeftY=int((DisplayHeight-WindowHeight)/2)

   graphicbox #main.graphicbox1, 26, 16, 100, 100
   graphicbox #main.graphicbox2, 142, 16, 100, 100
   graphicbox #main.graphicbox3, 254, 16, 100, 100
   open "untitled" for window as #main
   global colors$
   colors$="red green blue"

   for i = 1 to 3
       'make a sting containing handle. Like, "#main.graphicbox1"
       handle$="#main.graphicbox";i
       'use it
        print #handle$, "down; fill ";word$(colors$,i);"; flush"
        print #handle$, "when leftButtonUp click"  'set sub handler
   next

   print #main, "trapclose [quit.main]"

   print #main, "font ms_sans_serif 10"

   wait

[quit.main]
   Close #main
   END

sub click handle$, x, y
   'report handle passed
   notice "you've clicked ";handle$
   'get number from it, use it to report
   num = val(right$(handle$,1))
   notice "you've clicked ";    word$(colors$,num)
   'use it to draw
   #handle$, "size 10; set "; x; " "; y
end sub