Color on grid cell

[webmonger]

I am placing the textbox on field one ( leftmost ) in a grid and wish to make the 'button' more visible. Is it possible to use something like

this.Set("dynamicbackcolor"RGB(192,192,192)")

At present this has no effect?

DEFINE CLASS gstxt1 AS  TextBox

	Height = 17
	ReadOnly =.f.
        this.Set("dynamicbackcolor"RGB(192,192,192)")

	PROCEDURE Click
	EDIT  NEXT 1
	REPLACE up_dated with .t.
ENDPROC

ENDDEFINE

Thanks

 

[ramani]

HI

Since you are making a class, there is no need for use of DynamicBackColor. Also the syntax is wrong.

Simple code..

DEFINE CLASS gstxt1 AS  TextBox

    Height = 17
    ReadOnly =.f.
    BackColor = RGB(192,192,192)

    PROCEDURE Click
       EDIT  NEXT 1
       REPLACE up_dated with .t.
    ENDPROC

ENDDEFINE

Make sure this is the Active control of the column in which you place this.. OR else, the regular Text1 will be in control and this class will not be visible.

____________________________________________
ramani - (Subramanian.G)

http://winnersoft.coolfreepages.com/