Dear Experts

I use following command to show the location of Mouse pointer

rowloc=mrow()
colloc=mcol()
thisform.text1.value=alltrim(str(rowloc))+space(3)+alltrim(str(colloc))

Now I want to dispaly the RGB color code behind mouse pointer.
Suppose there is white color at mouse location then text2 must have
255,255,255

Please help