Есть экранная форма в которой формируется выборка. Из формы запускается ....prg, формирующая grid по выборке (Do "......prg" WITH ThisForm), вот её содержание:
-------------------------------------------------------------------------------
LPARAMETERS _Object
_Object.AddObject("_Grid1", "_Grid1")

WITH _Object._Grid1
.ColumnCount = 5
.GridLineColor = RGB(192,192,192)
.Height = 122
.Left = 12
.Visible = .T.
.Width = 595
ENDWITH

DEFINE CLASS _Grid1 As _Grid OF "...............\_base.vcx"
PROCEDURE Init()
ENDPROC
ENDDEFINE
-------------------------------------------------------------------------------
Никак не могу прописать процедуру LostFocus() 1-ой колонки grid. Как только вставляю

PROCEDURE Column1.Text1.LostFocus()
ENDPROC

в DEFINE/ENDDEFINE, выдаёт ощибку "Unknown member Column1"... Как добраться до программирования методов в колонках?

Колонки описаны в With/EndWith. Хорошо, как описать это количество в DEFINE/ENDDEFINE чтобы уйти от ошибки?

проходящий....И полностью помещаться между Define class и Enddefine. И ColumnCount = 5 тоже должно быть между этими строчками.

Как это описать в define?????????????? Пример описания 5-ти колонок в define!

Лисапед тут такой:
- выборка идёт в cursor, напр. "ААА", который прописывается в grid, как ControlSource, но при повторном запросе cursor пересоздаётся и grid погибает. Мне надо чтоб grid (со свойствами и методами) программно [b]пере создавался после каждой выборки[/b]. Вариант:

ThisForm._Grid1.ControlSource = ""
выборка
ThisForm._Grid1.ControlSource = "AAA"

мне знаком и не подходит!

проходящий.[quot Валентин Н.Карелин][quot проходящий.]Это требование? Вам все надо выложить на блюдечке с каемочкой?Не горячись, просто вместо длинной переписки можно сразу было вставить

DEFINE CLASS _Grid1 As _Grid OF "...............\_base.vcx"
ColumnCount = 5
ENDDEFINE

Но это мне знакомо. Мне надо добраться до _Grid1.Column1.Text1.LostFocus() и _Grid1.Column1.Text1.RightClick() в DEFINE/ENDDEFINE

Ясно, спасибо.

прошелмимопример дать? или найдете? За пример скажу отдельное спасибо!!!

ВладимирМПочему?Дело в том, что я мало занимался "ручным" программированием и хотелось "с нуля" программно создавать/пересоздавать Grid. Но теперь вижу это геморройно, особенно, если учесть, что мой Grid (я об этом не писал!) ещё и населён кучей CheckBox, CommandButton и ListBox в колонках. Поэтому перепрописывать весь этот мотлох вручную слишком много времени. Проще "отпускать" Grid перед выброркой, чтоб он не погибал. А потом возвращать назад ControlSource... Нууу, и заказчик не будет ждать, пока я натешусь!

Спасибо за примерчики...