>Hi All,
>
>Is there a formula / function that, given a particular row and col coordinate, I can use to return the RGB color values as they are displayed in the color picker in VFP going from left to right and then top to bottom?
CLEAR
lnStep = 51
_SCREEN.DRAWSTYLE = 0
_SCREEN.FILLSTYLE = 0
lnX = 0
lnY = 0
FOR lnR = 0 TO 255 STEP lnStep
lnX = lnX + 16
lnY = 0
FOR lnG = 0 TO 255 STEP lnStep
FOR lnB = 0 TO 255 STEP lnStep
lnY = lnY + 16
_SCREEN.FILLCOLOR = RGB(lnR,lnG,lnB)
_SCREEN.BOX(lnX,lnY,lnX+16,lnY+16)
ENDFOR
ENDFOR
ENDFOR
Luis María Guayán
Tucumán, Argentina
________________________________
SysOp de
www.PortalFox.comNada corre como un zorro
________________________________