mariuszmaximus / zeddbtreeview Goto Github PK

I use your component in your project, such as in the form of reference books to 
show the hierarchy. In the edit form groups provided an opportunity to change 
the parent. When I change the parent, it is immediately reflected in the tree. 
But I have not confirmed the change. When I cancel the changes, the group does 
not return to the place. In your component when the parent does save the record 
in the dataset.
So you can be by design, but it is not very convenient. I think, more properly 
reflect the change in the parent in the tree only after you save the record.

Я использую Ваш компонент в своем проекте, 
а именно в форме-справочнике для 
отображения иерархии групп. В форме 
редактирования группы предусмотрена 
возможность изменить родителя. Когда я 
изменяю родителя, это немедленно 
отражается в дереве. Но я еще не подтвердил 
изменения. Когда же я отменяю изменения, 
группа не возвращается на место. В вашем 
компоненте при изменении родителя 
делается сохранение записи в датасете.
Может быть так Вами и задумано, но это не 
очень удобно. Мне кажется, более правильно 
изменение родителя отражать в дереве 
только после сохранения записи.

Hi, there.

Got a problem using your component.

When the table is empty, everything is ok. 
When the table has some data - parent node, more child nodes etc. it's still 
ok. 
But when the table has only one node (parent node) without any child nodes, the 
program crashes (SigSegv).
Searching for the cause i found out that the problem is at the method 
TZedDBTreeView.CheckAppend.
As it seems this happens because there's no parent for the node...

Using the version 0.8

Resolved by correcting the ZedDBTreeView.CheckAppend method, checking the 
assignment for FParentDataLink.Field before using it.

Attached the fixed .pas.


Cheers!

- Magno.GSt -

just applied the changes from laguna's post here:

http://forum.lazarus.freepascal.org/index.php/topic,16104.msg104820.html?PHPSESS
ID=bda1c2b741a531b96b74ca858b18cb86#msg104820

"Hello,
I updated the procedure because the loop "FOR" did not read the entire DataSet"