Information générale
Catégorie:
Codage, syntaxe et commandes
Titre:
Changing methods in grid programatically
I am creating a new grid class to be used for searching tables. I am able to bring up the form, and display the grid. I can modify the init method etc. What I am having problems with is trying to code a method on Column1.Text1
Specifically I am trying to write a procedure to modify Column1.Text1.DblClick. I keep getting the message 'Unknown method Text1' I am including my class define, with the Column1.Text1.DblClick procedure included.
Any help accessing these methods would be appreciated.
Define Class CSrchGrid as GRID
Caption = "CUSTOMER SEARCH"
Top = 9
Left = 5
Width = 350
Columncount = 2
Visible = .T.
DeleteMark = .f.
Column1.ControlSource = "CUSTMAST.CUSTNO"
Column2.ControlSource = "CUSTMAST.CUSTNAME"
**************
Procedure Init
With This.Column1
.Width = 15
.Readonly = .T.
.Header1.Caption = "Customer #"
EndWith
With this.Column2
.Width = 50
.Readonly = .T.
.Header1.Caption = "Name"
.Enabled = .F.
Endwith
EndProc
Procedure Column1.Text1.DblClick
this.parent.cmdExit.click()
Endproc
EndDefine
TIA
Robert Srodulski
New Generation Computing Inc.
Suivant
Répondre
Voir le fil de ce thread
Voir le fil de ce thread à partir de ce message seulement
Voir tous les messages de ce thread
Voir tous les messages de ce thread à partir de ce message seulement