General information
Category:
Coding, syntax & commands
Title:
Grid custom class problem
Hi,all
I have a problem about creating column in grid by DEFINE CLASS command,the column only visible one row at a time.Rather than fills in all grid rows.
My code as following...
WITH THISFORM.MYGRID
.RECORDSOURCE = "MY.DBF"
.COLUMNCOUNT = 0
.ADDOBJECT("COL","MYCOLUMN")
ENDWITH
DEFINE CLASS MYCOLUMN AS COLUMN
CONTROLSOURCE="MY.CODE"
MOVABLE = .F.
RESIZABLE = .F.
WIDTH=90
VISIBLE = .T.
ADD OBJECT HEADER1 AS MYHEADER
ENDDEFINE
DEFINE CLASS MYHEADER AS HEADER
CAPTION="Code"
PROCEDURE CLICK
WAIT "CLICKED" WINDOW NOWAIT
ENDPROC
ENDDEFINE
Pls kindly help
Thanks
Arnold
Reply
View the map of this thread
View the map of this thread starting from this message only
View all messages of this thread
View all messages of this thread starting from this message only