Показать сообщение отдельно
Старый 18.01.2008, 10:22   #1  
hozain is offline
hozain
Участник
 
7 / 10 (1) +
Регистрация: 09.01.2008
Задача создать дерево Товарная Категория->Тов.Группа->Товар
пытаюсь настроить Дерево
туплю на самых простых шагах
Код:
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...