Segue abaixo o codigo gerado pelo Builder do CA do VFP 9, a linha do This.cursorfill(), eu coloquei e sem ela não funciona. E quando eu faço um arrastar e soltar a partir do Cursor Gerado, para criar um Grid no form não funciona.

Fiquei observando pelo debug e percebi que no VFP 9 o CA só é gerado após o Método Load do Form, quando no VFP 8 ele é gerado Antes do LOAD, fazendo com quem não haja o curso quando da criação do Grid no Form gerando um erro de execução.

Gostaria que mais alguem testasse e confirmasse este Bug para mim.

local llReturn
do case
	case not pemstatus(This, '__VFPSetup', 5)
		This.AddProperty('__VFPSetup', 0)
	case This.__VFPSetup = 2
		This.__VFPSetup = 0
		return
endcase
llReturn = dodefault()
*** Select connection code: DO NOT REMOVE

local loConnDataSource
set multilocks on
loConnDataSource = createobject('ADODB.Connection')
***<DataSource>
loConnDataSource.ConnectionString = [Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;I] + ;
	[nitial Catalog=Northwind;Data Source=VARZEA;]
***</DataSource>
loConnDataSource.Open()
This.DataSource = createobject('ADODB.RecordSet')
This.DataSource.CursorLocation   = 3  && adUseClient
This.DataSource.LockType         = 3  && adLockOptimistic
This.DataSource.ActiveConnection = loConnDataSource
*** End of Select connection code: DO NOT REMOVE
This.CursorFill()   && colocado por mim 

if This.__VFPSetup = 1
	This.__VFPSetup = 2
endif
return llReturn