Backcolor de un control

No deberias tener problemas, quizas te falte un Refresh del control. Mira
este breve ejemplo haciendo click en el formulario:

PUBLIC oForm
oForm = NEWOBJECT("MiForm")
oForm.SHOW
RETURN

DEFINE CLASS MiForm AS FORM
DOCREATE = .T.
CAPTION = "Ejemplo BackColor"
NAME = "MiForm"
PROCEDURE CLICK
THIS.BACKCOLOR = GETCOLOR()
ENDPROC
ENDDEFINE

Si quieres convertir el valor devuelto por GETCOLOR() a formato RGB():

RGB(nR,nG,nB) --
http://www.portalfox.com/article.php?sid&


Luis María Guayán
Tucumán, Argentina
________________________________
SysOp de www.PortalFox.com
Microsoft Visual FoxPro MVP
________________________________
La palabra imposible solo figura
en el diccionario de los tontos


"Enrique Carmona" escribió en el mensaje
news:

Hola Grupo:

Quiero que el usuario pueda seleccionar el backcolor de un control.

lcbackcolor = getcolor()

el resultado es un número. Pero cuando hago

thisform.txtmicontrol.backcolor = lcbackcolor

no lo pinta del color. ¿Será porque es un número y no rgb(...,,)?
¿Cómo puedo hacer que en mi variable tenga un valor rgb(...,...,...)?

Saludos cordiales.

Enrique Carmona
Sevilla - España