Помогите пожалуйста,опыта работы с деревом совсем мало.
В интерфейсе только первая строчка выходит.
Подскажите, что не так?
create view
var
nnrec:comp
curOwner : word
as select *
from
KatKau
, SpKau
where
((
KatKau.Nrec == SpKau.cMain
and curOwner == SpKau.cNode
and word(137) == KatKau.kodGroup
))
order by SpKau.Code;
parameters nnrec
tree br1 '' ;
table SpKau;
fields
SpKau.Code ' Полный код ';
SpKau.Name ' Наименование КАУ ';
end; //End Browse
handleEvent
cmDefault :
{
nnrec:=spkau.nrec;
}
cmTreeTop : { curOwner := 0; }
cmTreeDown : { curOwner := spkau.nrec;}
cmTreeUp : { curOwner := spkau.cnode; }
cmTreeNodeType : {
if (SpKau.cNode<>0) then
TreeSetNodeType (br1,ntfText);
else TreeSetNodeType (br1,ntfOpen);
}
cmInit:
{
curOwner := 0;
}
end
Буду очень благодарна за ответы.
Проблемы с деревом
Модераторы: m0p3e, edward_K, Модераторы
-
- Заслуженный деятель интернет-сообщества
- Сообщения: 5188
- Зарегистрирован: 29 мар 2005, 17:49
- Откуда: SPB galaxy spb
Re: Проблемы с деревом
В from
,spkau spkaui
в where
spkau.nrec == spkaui.cnode
события переписать типа того
cmTreeNodeType :
{ if GetFirst SpkauI<>tsOk
TreeSetNodeType( br1, 2); // это чтобы если не было подчинения показать без папочки
}
cmTreeNeedOwner :
{
if spkuau.cnode <> 0
TreeJumpToRecord( br1, spkau.cnode)
else
TreeJumpToRecord( br1, 0);
}
интересно как у вас показывается эта первая запись - как папочка или техт?
,spkau spkaui
в where
spkau.nrec == spkaui.cnode
события переписать типа того
cmTreeNodeType :
{ if GetFirst SpkauI<>tsOk
TreeSetNodeType( br1, 2); // это чтобы если не было подчинения показать без папочки
}
cmTreeNeedOwner :
{
if spkuau.cnode <> 0
TreeJumpToRecord( br1, spkau.cnode)
else
TreeJumpToRecord( br1, 0);
}
интересно как у вас показывается эта первая запись - как папочка или техт?
Re: Проблемы с деревом
Спасибо за ответ. С одной записью я уже справилась, убрала order by. Показывалась она как папка.
-
- Заслуженный деятель интернет-сообщества
- Сообщения: 5188
- Зарегистрирован: 29 мар 2005, 17:49
- Откуда: SPB galaxy spb
Re: Проблемы с деревом
да сортировка нужна как cnode+code
Re: Проблемы с деревом
У меня все получилось.
Большое спасибо, Edward_K
Большое спасибо, Edward_K