************************************************** *-- Form: form1 (c:\vfp8app\misc\jjones1.scx) *-- ParentClass: form *-- BaseClass: form *-- Time Stamp: 03/28/04 10:55:06 AM * DEFINE CLASS form1 AS form DoCreate = .T. Caption = "Form1" Name = "Form1" ADD OBJECT text1 AS textbox WITH ; ControlSource = "x1.c1", ; Height = 23, ; Left = 12, ; TabIndex = 1, ; Top = 16, ; Width = 100, ; Name = "Text1" ADD OBJECT grid1 AS grid WITH ; Height = 158, ; Left = 24, ; TabIndex = 3, ; Top = 65, ; Width = 320, ; Name = "Grid1" ADD OBJECT text2 AS textbox WITH ; ControlSource = "x1.c2", ; Height = 23, ; Left = 163, ; TabIndex = 2, ; Top = 22, ; Width = 100, ; Name = "Text2" PROCEDURE Load create cursor x1 ( c1 c(10), c2 c(10) ) for i = 1 to 10 insert into x1 values ( transform( i ), transform( i ) ) endfor go top ENDPROC PROCEDURE grid1.AfterRowColChange LPARAMETERS nColIndex thisform.Refresh() ENDPROC ENDDEFINE * *-- EndDefine: form1 **************************************************>But the problem is, what I key in is not visible in my textbox either.