Re: [Lazarus] VirtualTreeView, Absoluteindex example on freepascal.org

2013-09-12 Thread wkitty42
On Thursday, September 12, 2013 11:36 AM, Jürgen Hestermann wrote: >I didn't look at the code, but usually index = -1 means that the item >was not found. So maybe AbsoluteIndex's result should actually be >signed? > And how would it ever reach the value -

Re: [Lazarus] VirtualTreeView, Absoluteindex example on freepascal.org

2013-09-12 Thread Frederic Da Vitoria
2013/9/12 Jürgen Hestermann > Am 2013-09-12 17:51, schrieb Frederic Da Vitoria: > > > My remarks only come from my memories of how VirtualTreeView worked with > Delphi 6. > > The code has obviously much changed since. > > Are you sure? The function is quite simple: > -

Re: [Lazarus] VirtualTreeView, Absoluteindex example on freepascal.org

2013-09-12 Thread Jürgen Hestermann
Am 2013-09-12 17:51, schrieb Frederic Da Vitoria: > My remarks only come from my memories of how VirtualTreeView worked with Delphi 6. > The code has obviously much changed since. Are you sure? The function is quite simple: - fu

Re: [Lazarus] VirtualTreeView, Absoluteindex example on freepascal.org

2013-09-12 Thread Frederic Da Vitoria
2013/9/12 Jürgen Hestermann > Am 2013-09-12 14:50, schrieb Frederic Da Vitoria: > > > Can someone explain what the line >> if VST.AbsoluteIndex(XNode) > -1 then >> actually means? >> > > I didn't look at the code, but usually index = -1 means that the item > was not found. So maybe AbsoluteI

Re: [Lazarus] VirtualTreeView, Absoluteindex example on freepascal.org

2013-09-12 Thread Jürgen Hestermann
Am 2013-09-12 14:50, schrieb Frederic Da Vitoria: Can someone explain what the line if VST.AbsoluteIndex(XNode) > -1 then actually means? I didn't look at the code, but usually index = -1 means that the item was not found. So maybe AbsoluteIndex's result should actually be signe

Re: [Lazarus] VirtualTreeView, Absoluteindex example on freepascal.org

2013-09-12 Thread Frederic Da Vitoria
2013/9/11 Jürgen Hestermann > On > http://wiki.freepascal.org/**VirtualTreeview_Example_for_**Lazarus > there is the following example procedure: > > --**-- > procedure TForm1.Button1Click(

[Lazarus] VirtualTreeView, Absoluteindex example on freepascal.org

2013-09-11 Thread Jürgen Hestermann
On http://wiki.freepascal.org/VirtualTreeview_Example_for_Lazarus there is the following example procedure: procedure TForm1.Button1Click(Sender: TObject); Var Data: PTreeData; XNode: PVirtualNode; Rand: Integer; Begin Randomize; Rand :=