Well, the Headers work fine with your suggestions. But, I also want to add code to the textbox dblclick (for when the user wants to select a row), but that does not work. In fact, when that particular text box has focus on the grid, it is solid white with no data visible. Here is the code that I use to remove/add the headers and textboxes. Can you provide me with a solution?

Thanks in Advance,

Jeff Elmore


------


PARAMETERS oColumn

WITH oColumn
.RemoveObject("Header1")
.RemoveObject("Text1")
.AddObject("Header1","fwHeader")
.AddObject("Text1","fwText")
ENDWITH

DEFINE CLASS fwHeader AS Header
PROCEDURE Click
IF NOT EMPTY(This.Tag)
cTag = This.Tag
SET SAFETY OFF
INDEX ON &cTag TO tempIndex.idx
SET SAFETY ON
This.Parent.Parent.Refresh()
ENDIF
ENDPROC
ENDDEFINE


DEFINE CLASS fwText AS TextBox
BorderStyle = 0
Margin = 0
ForeColor = RGB(0,0,0)
BackColor = RGB(255,255,255)
BackStyle = 0

PROCEDURE DblClick
WAIT WINDOW
ENDPROC
ENDDEFINE