>For question no. 2, I made this function

>Function getwebcolor
>Return Substr(Transform(GetColor(),'@0'),5)

>So to convert a numeric color value into hex, you can use

>lcHexColor=Substr(Transform(lnColor,'@0'),5)

>

Tore,

It would be BGR instead of RGB.