Задача создать дерево Товарная Категория->Тов.Группа->Товар
пытаюсь настроить Дерево
туплю на самых простых шагах
Код:
Form - OnOpenForm()
InitTempTable;
Код:
Form - OnFindRecord(Which : Text[1024]) : Boolean
TempItemDesc.COPY(Rec);
Found := TempItemDesc.FIND(Which);
Rec := TempItemDesc;
EXIT(Found);
Код:
InitTempTable()
TempItemDesc.DELETEALL;
IF ExItem.FIND('-') THEN
REPEAT
TempItemDesc.Description := ExItem.Description;
TempItemDesc.INSERT;
UNTIL
ExItem.NEXT = 0;
ExItem тип рекорт субтип Item Category
TempItemDesc тип рекорд субтип Item
Источник формы Итем
поидее это должно выводщить все дескрипшены в TextBox из таблицы Item Category...