*----------Function Color2rgb LPARAMETERS lnColor LOCAL lnR, lnG,lnB lnb=INT(lnColor/16^4) lnG=INT(lnColor%16^4/16^2) lnR=lnColor%16^4%16^2 return "rgb("+; ltrim(str(bitand(lnColor,0x000000ff)))+","+ ; ltrim(str(bitrshift(bitand(lnColor,0x0000ff00),8)))+","+ ; ltrim(str(bitrshift(bitand(lnColor,0x00ff0000),16)))+")">Hello Friends;
>a = GETCOLOR(255)
>
>