Re: [MSEide-MSEgui-talk] treeitemedit

2018-08-14 Thread Martin Schreiber
On Wednesday 15 August 2018 07:14:45 Martin Schreiber wrote: > On Tuesday 14 August 2018 20:29:45 mohamed hamza wrote: > > Hi Martin > > > >Your sample/tree2 is an excellent project to manage tree in a db > > context. I managed tree with recursive sql but now I will change to > > nested.

Re: [MSEide-MSEgui-talk] treeitemedit

2018-08-14 Thread Martin Schreiber
On Tuesday 14 August 2018 20:29:45 mohamed hamza wrote: > Hi Martin > >Your sample/tree2 is an excellent project to manage tree in a db > context. I managed tree with recursive sql but now I will change to > nested. > > There is one thing that can make it better, I suppose : > >

Re: [MSEide-MSEgui-talk] treeitemedit

2018-08-14 Thread mohamed hamza
Hi Martin Your sample/tree2 is an excellent project to manage tree in a db context. I managed tree with recursive sql but now I will change to nested. There is one thing that can make it better, I suppose : There is always the ( + ) at left of the node even if this one is

Re: [MSEide-MSEgui-talk] treeitemedit

2018-08-10 Thread Martin Schreiber
On Friday 10 August 2018 12:34:10 mohamed hamza wrote: > I read with interest the articles you sent me. Particularly : > http://mikehillyer.com/articles/managing-hierarchical-data-in-mysql > > I filled the tree.fdb with the data of the example that the author gives. I > used 'flamerobin' as editor

Re: [MSEide-MSEgui-talk] treeitemedit

2018-08-10 Thread mohamed hamza
I read with interest the articles you sent me. Particularly : http://mikehillyer.com/articles/managing-hierarchical-data-in-mysql I filled the tree.fdb with the data of the example that the author gives. I used 'flamerobin' as editor of database. I executed the tree.prj but the tree is not gene

Re: [MSEide-MSEgui-talk] treeitemedit

2018-08-08 Thread Martin Schreiber
On Tuesday 07 August 2018 07:47:48 Martin Schreiber wrote: > On Monday 06 August 2018 19:16:53 mohamed hamza wrote: > > > this sql statement is inserted to tsqlresult.sql . > > I think that the procedure addchildren in mseuniverse example is no > > longer valid? > > Correct, the order of the ret

Re: [MSEide-MSEgui-talk] treeitemedit

2018-08-07 Thread Martin Schreiber
On Tuesday 07 August 2018 09:50:48 mohamed hamza wrote: > The database is dynamic but the tree is not auto expanded. It is > expanded step by step, when dataset record changes ( after scroll). Its > about maximum 30. What method do you suggest ? Maximum 30 records in tree? Then a tmsesqlquery

Re: [MSEide-MSEgui-talk] treeitemedit

2018-08-07 Thread mohamed hamza
The database is dynamic but the tree is not auto expanded. It is expanded step by step, when dataset record changes ( after scroll). Its about maximum 30. What method do you suggest ? find is not possible may be locate , is it applicable in recursive procedure ? Regards. Med --

Re: [MSEide-MSEgui-talk] treeitemedit

2018-08-06 Thread Martin Schreiber
On Monday 06 August 2018 19:16:53 mohamed hamza wrote: > I think we can do more with recursive query like: > > with recursive CTE (nKey,caption ,nkeyp) AS ( > select id,name,pid FROM persons WHERE pid=:n >union all >select id,name,pid from persons >join CTE t >on t.nKey= persons.p

Re: [MSEide-MSEgui-talk] treeitemedit

2018-08-06 Thread mohamed hamza
I think we can do more with recursive query like: with recursive CTE (nKey,caption ,nkeyp) AS ( select id,name,pid FROM persons WHERE pid=:n union all select id,name,pid from persons join CTE t on t.nKey= persons.pid) select * from cte ; this sql statement is inserted to tsqlresu

Re: [MSEide-MSEgui-talk] treeitemedit

2018-08-06 Thread Martin Schreiber
On Monday 06 August 2018 17:02:59 mohamed hamza wrote: > You suggest to use tsqlresult but in this case we can not set primary > key even less use find ( nkey, ) ? > There one uses the functions in the server with queries and SQL statements. https://stackoverflow.com/questions/4048151/wh

Re: [MSEide-MSEgui-talk] treeitemedit

2018-08-06 Thread mohamed hamza
You suggest to use tsqlresult but in this case we can not set primary key even less use find ( nkey, ) ? Regards Med -- Check out the vibrant tech community on one of the world's most engaging tech sites, Sla

Re: [MSEide-MSEgui-talk] treeitemedit

2018-07-31 Thread Martin Schreiber
On Tuesday 31 July 2018 22:15:05 mohamed hamza wrote: > I am studying your source especially procedure tmainmo.insertingev(...) > In a SQL database one probably would use the method with nested sets. Martin -- Check out t

Re: [MSEide-MSEgui-talk] treeitemedit

2018-07-31 Thread mohamed hamza
I am studying your source especially procedure tmainmo.insertingev(...) Regards Med -- Check out the vibrant tech community on one of the world's most engaging tech sites, Slashdot.org! http://sdm.link/slashdot__

Re: [MSEide-MSEgui-talk] treeitemedit

2018-07-31 Thread Martin Schreiber
On Sunday 29 July 2018 18:32:27 Martin Schreiber wrote: > On Sunday 29 July 2018 11:02:24 mohamed hamza wrote: > > At this time I am working with an array of record: > > [...] > > I'll make an example. > Here: https://gitlab.com/mseide-msegui/mseuniverse/tree/master/samples/db/tree Needs MSEide+MS

Re: [MSEide-MSEgui-talk] treeitemedit

2018-07-29 Thread Martin Schreiber
On Sunday 29 July 2018 11:02:24 mohamed hamza wrote: > At this time I am working with an array of record: > > [...] I'll make an example. Martin -- Check out the vibrant tech community on one of the world's most engagin

Re: [MSEide-MSEgui-talk] treeitemedit

2018-07-29 Thread mohamed hamza
ploading this example to mseuniverse. Regards. Med De : Martin Schreiber Envoyé : samedi 28 juillet 2018 17:59 À : mseide-msegui-talk@lists.sourceforge.net Objet : Re: [MSEide-MSEgui-talk] treeitemedit On Saturday 28 July 2018 19:34:58 mohamed hamza wrote: > You propose a

Re: [MSEide-MSEgui-talk] treeitemedit

2018-07-28 Thread Martin Schreiber
On Saturday 28 July 2018 19:34:58 mohamed hamza wrote: > You propose a recursive procedure > > > procedure loadchildren(anode: ); > > > Then while <..> loop must be deleted and replaced with (if not end of data) > > is'nt it? > "if not end of child data of current node". What do you want to achie

Re: [MSEide-MSEgui-talk] treeitemedit

2018-07-28 Thread mohamed hamza
msegui-talk@lists.sourceforge.net Objet : Re: [MSEide-MSEgui-talk] treeitemedit On Saturday 28 July 2018 17:33:06 mohamed hamza wrote: > Hi Martin, > > I read msedatanodes.pas to find any method to give current node in the > tree without success. > What is the "current node"? >

Re: [MSEide-MSEgui-talk] treeitemedit

2018-07-28 Thread Martin Schreiber
On Saturday 28 July 2018 17:33:06 mohamed hamza wrote: > Hi Martin, > > I read msedatanodes.pas to find any method to give current node in the > tree without success. > What is the "current node"? > > I tried > > grid.rowcount:=1; > node:=tmynode(treeedit[0]); > tmynode(treeedit[0]).caption:='ROO

Re: [MSEide-MSEgui-talk] treeitemedit

2018-07-28 Thread mohamed hamza
the basic. But now I want to write something to save and restore a tree from db file. Regards. De : Martin Schreiber Envoyé : vendredi 27 juillet 2018 20:18 À : mseide-msegui-talk@lists.sourceforge.net Objet : Re: [MSEide-MSEgui-talk] treeitemedit O

Re: [MSEide-MSEgui-talk] treeitemedit

2018-07-27 Thread Martin Schreiber
On 07/27/2018 11:18 AM, mohamed hamza wrote: > I did not find a property level of a node. Do you think we do not need it? > Please use " ttreelistitem = class(tlistitem) [...] property treelevel: integer read ftreelevel; " Martin --

Re: [MSEide-MSEgui-talk] treeitemedit

2018-07-27 Thread mohamed hamza
I did not find a property level of a node. Do you think we do not need it? Regards. Med De : mohamed hamza Envoyé : jeudi 26 juillet 2018 15:11 À : General list for MSEide+MSEgui Objet : Re: [MSEide-MSEgui-talk] treeitemedit I Had an error. Deleting sta

Re: [MSEide-MSEgui-talk] treeitemedit

2018-07-26 Thread mohamed hamza
I Had an error. Deleting sta file corrected this. Regards. Med De : Martin Schreiber Envoyé : jeudi 26 juillet 2018 06:38 À : mseide-msegui-talk@lists.sourceforge.net Objet : Re: [MSEide-MSEgui-talk] treeitemedit On Wednesday 25 July 2018 19:28:26

Re: [MSEide-MSEgui-talk] treeitemedit

2018-07-25 Thread Martin Schreiber
On Wednesday 25 July 2018 19:28:26 mohamed hamza wrote: > if grid.rowcount = 0 then > >   begin >    For i := 0 to 1 do >    begin >    grid.rowcount:=grid.rowcount+1; >    with tmynode(treeedit[i]) do begin >     caption:= chr(65+i); >      for j := 0 to 2  do begin >      add(1,tmynode ); >      

Re: [MSEide-MSEgui-talk] treeitemedit

2018-07-25 Thread mohamed hamza
to tmynode(treeedit[i]) end;end; end; end; end Regards De : Martin Schreiber Envoyé : mercredi 25 juillet 2018 17:00 À : mseide-msegui-talk@lists.sourceforge.net Objet : Re: [MSEide-MSEgui-talk] treeitemedit On 07/25/2018 05:03 PM, mohamed hamza wrote: > How t

Re: [MSEide-MSEgui-talk] treeitemedit

2018-07-25 Thread Martin Schreiber
On 07/25/2018 05:03 PM, mohamed hamza wrote: > How to add a child item to a parent item. > > > In the msuniverse there are examples but with a known numbers of nodes. > > { > with tmynode(treeedit[0]) do begin >caption:= 'A'; >add(3,tmynode); >items[0].caption:= 'A0'; >items

[MSEide-MSEgui-talk] treeitemedit

2018-07-25 Thread mohamed hamza
How to add a child item to a parent item. In the msuniverse there are examples but with a known numbers of nodes. { with tmynode(treeedit[0]) do begin caption:= 'A'; add(3,tmynode); items[0].caption:= 'A0'; items[1].caption:= 'A1'; items[2].caption:= 'A2'; end; } I want t

Re: [MSEide-MSEgui-talk] treeitemedit weird behaviour

2016-10-04 Thread Martin Schreiber
On Tuesday 04 October 2016 10:19:45 code dz wrote: > Hi Matrin > i create 2 ttreeitemedit , the problem is when trying to expanding > tree1 , the tree2 expanded instead . A ttreeitemeditnode can only be mapped into a single ttreeitemedit. The reason is that the datalist in ttreeitemedit only has

[MSEide-MSEgui-talk] treeitemedit weird behaviour

2016-10-04 Thread code dz
Hi Matrin i create 2 ttreeitemedit , the problem is when trying to expanding tree1 , the tree2 expanded instead . test.7z Description: Binary data -- Check out the vibrant tech community on one of the world's most engag