Всем добрый день.
пытаюсь разобарться с КА и столкнулся с тем что не заполняется грид на форме.
Код выполняется в ините формы.
автор
set deleted on
set multilocks on
close databases all

gcDRIVER = "{MySQL ODBC 3.51 Driver}"
gcUID = "root"
gcPASSWORD = ""
gcPORT = "3306"
gcSERVER = "localhost"
gcDB = "Tp_losses"

gcODBC = ''+'DRIVER='+gcDRIVER+';UID='+gcUID+';PORT='+gcPORT+';PASSWORD='+gcPASSWORD+';SERVER='+gcSERVER+';DB='+gcDB+''

lnConnection = SQLSTRINGCONNECT(gcODBC)

lo_CA=CREATEOBJECT("CursorAdapter")
lo_CA.Alias="myCursor"
lo_CA.DataSourceType="ODBC"
lo_CA.DataSource=lnConnection
lo_CA.SelectCmd="Select spr_tp.* from spr_tp"
lo_CA.Tables="spr_tp"
lo_CA.KeyFieldList="key_tp"
lo_CA.UpdateNameList="key_tp spr_tp.key_tp,n_tp spr_tp.n_tp"
lo_CA.UpdatableFieldList="key_tp,n_tp"
IF lo_CA.CursorFill()
SELECT ttt
WITH ThisForm.Grid1
.RecordSource = null
.RecordSource = 'myCursor'
ENDWITH
ELSE
=MESSAGEBOX(err)
ENDIF

если после CursorFill() делаю BROWSE то вижу мой заполенный курсор, но когда программа доходит до заполнения RecordSource грида то курсор пропадает и в Data Session нет моего курсора. В итоге открывается форма с чистым гридом и все.
По форуму и в интернете искал ответ, но не смог найти (или плохо смотрел). Подскажите в чем проблемма может быть.

to: 12345вышелзайчикпогулять.
Ваш пример с ODBC я смотрел, но т.к. я с классами в вфп не работал, то тяжело разобраться с Вашим примером. Думал переделать под себя его, но без понимания работы класса посыпались ошибки, хотел сначала понять как работает КА в обычном виде, без классов.
Думал что самый простой вариант сделать все на форме и таблица на 500 записей всего, в DE я ничего не прописывал.
И заметил что если ставлю Browse в самый конец программы то появляется Курсор и грид заполняется, но после закрытия курсора или переключения фокуса на форму, курсор закрвывается в data session и грид снова очищается.

to: проходящий.
DataSession формы я не трогал оставил по умолчанию, т.к. что Private не может быть.

to: Galyamov Rinat
как то я слабо себе представляю что Вы мне предлагаете.
если писать
ThisForm.lo_CA=CREATEOBJECT("CursorAdapter")
то выскакивает ошибка "Property lo_CA is not found (Error 1734)".
если подставляем ThisForm перед lo_CA ниже, после создания обьекта,
то возникает ошика "Unknown member lo_CA (Error 1925)".
так что если можно напишите подробнее, что имеете ввиду.

to Dima T:
Спасибо большое дело было в видимости обьекта.
попробовал в ините формы обьявить PUBLIC lo_CA
все заработало
и через свойство/методы, доббавил свойтсво lo_CA паблик, тоже все нормально.

Всем спасибо большое за оказаное внимание и помощь!

to Dima T:
спасибо за помощь, но если буду добавлять программно thisform.AddProperty('oCA'),
то при создании второй формы с таким же свойствомо oCA, конфликтов не будет?
или для каждой формы будет свое свойство oCA?