Article ID: 168835
Article Last Modified on 6/29/2004
** This code places text values in the Grid object **
Thisform.OleControl1.Row=1
ThisForm.OleControl1.Col=1
Thisform.Olecontrol1.Text="Test1"
ThisForm.OleControl1.Row=1
ThisForm.Olecontrol1.Col=2
ThisForm.OleControl1.Text="Test2"
Thisform.OleControl1.Row=1 && Resets focus to first cell.
ThisForm.OleControl1.Col=1
Command1
Caption="Copy to Grid"
Click Event:
Thisform.OleControl1.Text=ThisForm.Text1.Value
Command2
Caption="Copy From Grid"
ThisForm.Text1.Value=Thisform.OleControl1.Clip
Command3
Caption="Cut From Grid"
Click Event:
ThisForm.Text1.Value=ThisForm.OleControl1.Text
ThisForm.OleControl1.Text=""
Keywords: kbhowto KB168835