Difference between revisions of "Unit UltiboClasses"

From Ultibo.org
Jump to: navigation, search
 
(7 intermediate revisions by the same user not shown)
Line 5: Line 5:
 
----
 
----
  
−
'''Ultibo classes unit'''
+
'''Ultibo Classes unit'''
−
 
+
−
''To be documented''
+
  
 
=== Constants ===
 
=== Constants ===
 
----
 
----
  
−
''To be documented''
 
  
−
=== Type definitions ===
+
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 20px; padding-bottom: 15px;">
−
----
+
<div style="font-size: 14px; padding-left: 12px;">'''Error constants''' <code> *_Error </code></div>
−
 
+
−
''None defined''
+
−
 
+
−
=== Public variables ===
+
−
----
+
−
 
+
−
''None defined''
+
−
 
+
−
=== Function declarations ===
+
−
----
+
−
 
+
−
 
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TimerExEvent(TimerEx:TTimerEx);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
 
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
{| class="wikitable" style="font-size: 14px; background: white;"
 
{| class="wikitable" style="font-size: 14px; background: white;"
 
|-
 
|-
−
! '''Note'''
+
| <code>SListIndexError = 'List index out of bounds (%d)';</code>
−
| None documented
+
| style="width: 50%;"|&nbsp;
 
|-
 
|-
−
|}
+
| <code>SFCreateError = 'Cannot create file %s';</code>
−
</div></div>
+
| &nbsp;
−
<br />
+
−
 
+
−
'''TThreadEx'''
+
−
 
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TThreadEx.Execution;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
 
|-
 
|-
−
! '''Note'''
+
| <code>SFOpenError = 'Cannot open file %s';</code>
−
| None documented
+
| &nbsp;
 
|-
 
|-
 
|}
 
|}
 
</div></div>
 
</div></div>
−
<br />
+
<br />
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 20px; padding-bottom: 15px;">
−
<pre style="border: 0; padding-bottom:0px;">procedure TThreadEx.AfterExecution;</pre>
+
<div style="font-size: 14px; padding-left: 12px;">'''B-Tree constants''' <code> btree_* </code></div>
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
 
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
{| class="wikitable" style="font-size: 14px; background: white;"
 
{| class="wikitable" style="font-size: 14px; background: white;"
 
|-
 
|-
−
! '''Note'''
+
| <code>btreeCompareLess = -1;</code>
−
| None documented
+
| style="width: 50%;"|&nbsp;
 
|-
 
|-
−
|}
+
| <code>btreeCompareEqual = 0;</code>
−
</div></div>
+
| &nbsp;
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TThreadEx.BeforeExecution;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
 
|-
 
|-
−
! '''Note'''
+
| <code>btreeCompareGreater = 1;</code>
−
| None documented
+
| &nbsp;
 
|-
 
|-
 
|}
 
|}
 
</div></div>
 
</div></div>
 
<br />
 
<br />
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 20px; padding-bottom: 15px;">
−
<pre style="border: 0; padding-bottom:0px;">procedure TThreadEx.Execute;</pre>
+
<div style="font-size: 14px; padding-left: 12px;">'''Hash constants''' <code> *_Hash* </code></div>
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
 
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
{| class="wikitable" style="font-size: 14px; background: white;"
 
{| class="wikitable" style="font-size: 14px; background: white;"
 
|-
 
|-
−
! '''Note'''
+
| <code>stringHashSize = 8;</code>
−
| None documented
+
| style="width: 50%;"|&nbsp;
 
|-
 
|-
−
|}
+
|colspan="2"|&nbsp;
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TThreadEx.TerminateAndWaitFor;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
 
|-
 
|-
−
! '''Note'''
+
| <code>listHashBits = 8;</code>
−
| None documented
+
| &nbsp;
 
|-
 
|-
−
|}
+
| <code>treeHashBits = 3;</code>
−
</div></div>
+
| &nbsp;
−
<br />
+
−
 
+
−
'''TTimerEx'''
+
−
 
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">constructor TTimerEx.Create;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
 
|-
 
|-
−
! '''Note'''
+
|colspan="2"|&nbsp;
−
| None documented
+
 
|-
 
|-
−
|}
+
| <code>keyHashMinBits = 1;</code>
−
</div></div>
+
| &nbsp;
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">destructor TTimerEx.Destroy;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
 
|-
 
|-
−
! '''Note'''
+
| <code>keyHashMaxBits = 16;</code>
−
| None documented
+
| Maximum of 16 bit hash mask (65535 buckets) due to memory usage
 
|-
 
|-
−
|}
+
| <code>keyHashMasks:array[keyHashMinBits..keyHashMaxBits] of LongWord = (</code>
−
</div></div>
+
| &nbsp;
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TTimerEx.SetEnabled(Value:Boolean);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
 
|-
 
|-
−
! '''Note'''
+
| <code>$00000001,$00000003,$00000007,$0000000F,</code>
−
| None documented
+
| &nbsp;
 
|-
 
|-
−
|}
+
| <code>$0000001F,$0000003F,$0000007F,$000000FF,</code>
−
</div></div>
+
| &nbsp;
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TTimerEx.Timer;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
 
|-
 
|-
−
! '''Note'''
+
| <code>$000001FF,$000003FF,$000007FF,$00000FFF,</code>
−
| None documented
+
| &nbsp;
 
|-
 
|-
−
|}
+
| <code>$00001FFF,$00003FFF,$00007FFF,$0000FFFF);</code>
−
</div></div>
+
| &nbsp;
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TTimerEx.StartTimer;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
 
|-
 
|-
 
|}
 
|}
 
</div></div>
 
</div></div>
−
<br />
+
<br />
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 20px; padding-bottom: 15px;">
−
<pre style="border: 0; padding-bottom:0px;">procedure TTimerEx.StopTimer;</pre>
+
<div style="font-size: 14px; padding-left: 12px;">'''Delta constants''' <code> *_Delta </code></div>
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
 
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
{| class="wikitable" style="font-size: 14px; background: white;"
 
{| class="wikitable" style="font-size: 14px; background: white;"
 
|-
 
|-
−
! '''Note'''
+
| <code>memoryStreamDelta = $2000;</code>
−
| None documented
+
| style="width: 50%;"|&nbsp;
 
|-
 
|-
−
|}
+
| <code>memoryStreamShift = 13;</code>
−
</div></div>
+
| &nbsp;
−
<br />
+
−
 
+
−
'''TObjList'''
+
−
 
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">constructor TObjList.Create;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
 
|-
 
|-
−
! '''Note'''
+
|colspan="2"|&nbsp;
−
| None documented
+
 
|-
 
|-
−
|}
+
| <code>stringListDelta = $2000;</code>
−
</div></div>
+
| &nbsp;
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">destructor TObjList.Destroy;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TObjList.DestroyListObjects;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TObjList.ClearList;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
 
|-
 
|-
 
|}
 
|}
Line 230: Line 107:
 
<br />
 
<br />
  
−
'''TThreadObjList'''
+
=== Type definitions ===
 +
----
  
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
''None defined''
−
<pre style="border: 0; padding-bottom:0px;">constructor TThreadObjList.Create;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">destructor TThreadObjList.Destroy;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TThreadObjList.DestroyListObjects;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TThreadObjList.ClearList;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
  
−
'''TLinkedList'''
+
=== Class definitions ===
 +
----
  
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">constructor TLinkedList.Create;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| None documented
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">destructor TLinkedList.Destroy;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| None documented
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedList.GetCount:Integer;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| None documented
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedList.Link(AValue:TListObject):Boolean;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Link AValue to Prev,Next Siblings and Adjust First/Last</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| None documented
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedList.LinkEx(APrev,AValue:TListObject):Boolean;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Link AValue after APrev Sibling and Adjust First/Last/Prev/Next</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| If APrev is nil then Link as first value in list
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedList.Unlink(AValue:TListObject):Boolean;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Unlink AValue from Prev,Next Siblings and Adjust First/Last</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| None documented
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedList.Add(AValue:TListObject):Boolean;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Add AValue to List and link with Siblings</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| None documented
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedList.Remove(AValue:TListObject):Boolean;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Unlink AValue from Siblings and Remove from List</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| None documented
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedList.Insert(APrev,AValue:TListObject):Boolean;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| None documented
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">procedure TLinkedList.Clear;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| None documented
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
  
−
'''TLinkedObjList'''
+
'''Ultibo specific classes'''
  
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
−
<pre style="border: 0; padding-bottom:0px;">destructor TLinkedObjList.Destroy;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
 
|-
 
|-
−
! '''Note'''
+
| [[TThreadEx|<code>TThreadEx = class(TThread)</code>]]
−
| None documented
+
 
|-
 
|-
 
|}
 
|}
−
</div></div>
+
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TLinkedObjList.ClearList;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
 
|-
 
|-
−
! '''Note'''
+
| [[TTimerEx|<code>TTimerEx = class(TObject)</code>]]
−
| None documented
+
 
|-
 
|-
 
|}
 
|}
−
</div></div>
+
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
−
<br />
+
−
 
+
−
'''TThreadLinkedObjList'''
+
−
 
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">constructor TThreadLinkedObjList.Create;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
 
|-
 
|-
−
! '''Note'''
+
| [[TObjList|<code>TObjList = class(TList)</code>]]
−
| None documented
+
 
|-
 
|-
 
|}
 
|}
−
</div></div>
+
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">destructor TThreadLinkedObjList.Destroy;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
 
|-
 
|-
−
! '''Note'''
+
| [[TThreadObjList|<code>TThreadObjList = class(TThreadList)</code>]]
−
| None documented
+
 
|-
 
|-
 
|}
 
|}
−
</div></div>
+
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TThreadLinkedObjList.ClearList;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
 
|-
 
|-
−
! '''Note'''
+
| [[TListObject|<code>TListObject = class(TObject)</code>]]
−
| None documented
+
 
|-
 
|-
 
|}
 
|}
−
</div></div>
+
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TThreadLinkedObjList.LockList;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
 
|-
 
|-
−
! '''Note'''
+
| [[TLinkedList|<code>TLinkedList = class(TObject)</code>]]
−
| None documented
+
 
|-
 
|-
 
|}
 
|}
−
</div></div>
+
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TThreadLinkedObjList.UnlockList;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
 
|-
 
|-
−
! '''Note'''
+
| [[TLinkedObjList|<code>TLinkedObjList = class(TLinkedList)</code>]]
−
| None documented
+
 
|-
 
|-
 
|}
 
|}
−
</div></div>
+
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
−
<br />
+
−
 
+
−
'''TLinkedTree'''
+
−
 
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">constructor TLinkedTree.Create;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
 
|-
 
|-
−
! '''Note'''
+
| [[TThreadLinkedObjList|<code>TThreadLinkedObjList = class(TLinkedList)</code>]]
−
| None documented
+
 
|-
 
|-
 
|}
 
|}
−
</div></div>
+
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">destructor TLinkedTree.Destroy;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
 
|-
 
|-
−
! '''Note'''
+
| [[TTreeObject|<code>TTreeObject = class(TListObject)</code>]]
−
| None documented
+
 
|-
 
|-
 
|}
 
|}
−
</div></div>
+
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedTree.GetCount:Integer;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
 
|-
 
|-
−
! '''Note'''
+
| [[TLinkedTree|<code>TLinkedTree = class(TObject)</code>]]
−
| None documented
+
 
|-
 
|-
 
|}
 
|}
−
</div></div>
+
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedTree.Link(AValue,AParent:TTreeObject):Boolean;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
 
|-
 
|-
−
! '''Note'''
+
| [[TLinkedObjTree|<code>TLinkedObjTree = class(TLinkedTree)</code>]]
−
| None documented
+
 
|-
 
|-
 
|}
 
|}
−
</div></div>
+
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedTree.LinkEx(APrev,AValue,AParent:TTreeObject):Boolean;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Link AValue after APrev Sibling and Adjust FirstChild/LastChild/Prev/Next</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
 
|-
 
|-
−
! '''Note'''
+
| [[TBtreeObject|<code>TBtreeObject = class(TObject)</code>]]
−
| If APrev is nil then Link as first child in parent or first value if Parent is nil
+
 
|-
 
|-
 
|}
 
|}
−
</div></div>
+
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedTree.Unlink(AValue:TTreeObject):Boolean;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
 
|-
 
|-
−
! '''Note'''
+
| [[TLinkedBtree|<code>TLinkedBtree = class(TObject)</code>]]
−
| None documented
+
 
|-
 
|-
 
|}
 
|}
−
</div></div>
+
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedTree.Add(AValue,AParent:TTreeObject):Boolean;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Add AValue to List and Link with Parent and Siblings</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
 
|-
 
|-
−
! '''Note'''
+
| [[TLinkedObjBtree|<code>TLinkedObjBtree = class(TLinkedBtree)</code>]]
−
| None documented
+
 
|-
 
|-
 
|}
 
|}
−
</div></div>
+
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedTree.Remove(AValue:TTreeObject):Boolean;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Unlink AValue from Parent and Siblings, Remove from List</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
 
|-
 
|-
−
! '''Note'''
+
| [[THashListObject|<code>THashListObject = class(TListObject)</code>]]
−
| None documented
+
 
|-
 
|-
 
|}
 
|}
−
</div></div>
+
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedTree.Insert(APrev,AValue,AParent:TTreeObject):Boolean;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
 
|-
 
|-
−
! '''Note'''
+
| [[THashLinkedList|<code>THashLinkedList = class(TLinkedList)</code>]]
−
| None documented
+
 
|-
 
|-
 
|}
 
|}
−
</div></div>
+
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TLinkedTree.Move(AValue,AParent:TTreeObject);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
 
|-
 
|-
−
! '''Note'''
+
| [[THashLinkedObjList|<code>THashLinkedObjList = class(THashLinkedList)</code>]]
−
| None documented
+
 
|-
 
|-
 
|}
 
|}
−
</div></div>
+
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TLinkedTree.Clear;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
 
|-
 
|-
−
! '''Note'''
+
| [[THashTreeObject|<code>THashTreeObject = class(TTreeObject)</code>]]
−
| None documented
+
 
|-
 
|-
 
|}
 
|}
−
</div></div>
+
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedTree.FirstChild(AParent:TTreeObject):TTreeObject;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
 
|-
 
|-
−
! '''Note'''
+
| [[THashLinkedTree|<code>THashLinkedTree = class(TLinkedTree)</code>]]
−
| None documented
+
 
|-
 
|-
 
|}
 
|}
−
</div></div>
+
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedTree.LastChild(AParent:TTreeObject):TTreeObject;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
 
|-
 
|-
−
! '''Note'''
+
| [[THashLinkedObjTree|<code>THashLinkedObjTree = class(THashLinkedTree)</code>]]
−
| None documented
+
 
|-
 
|-
 
|}
 
|}
−
</div></div>
+
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
−
<br />
+
−
 
+
−
'''TLinkedObjTree'''
+
−
 
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">constructor TLinkedObjTree.Create;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
 
|-
 
|-
−
! '''Note'''
+
| [[TStringObject|<code>TStringObject = class(TListObject)</code>]]
−
| None documented
+
 
|-
 
|-
 
|}
 
|}
−
</div></div>
+
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">destructor TLinkedObjTree.Destroy;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
 
|-
 
|-
−
! '''Note'''
+
| [[TLinkedStringList|<code>TLinkedStringList = class(TStrings)</code>]]
−
| None documented
+
 
|-
 
|-
 
|}
 
|}
−
</div></div>
+
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TLinkedObjTree.ClearListItems(AParent:TTreeObject);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
 
|-
 
|-
−
! '''Note'''
+
| [[TStringBlock|<code>TStringBlock = class(TListObject)</code>]]
−
| None documented
+
 
|-
 
|-
 
|}
 
|}
−
</div></div>
+
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TLinkedObjTree.ClearList;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
 
|-
 
|-
−
! '''Note'''
+
| [[TStringObjectEx|<code>TStringObjectEx = class(TStringObject)</code>]]
−
| None documented
+
 
|-
 
|-
 
|}
 
|}
−
</div></div>
+
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
−
<br />
+
−
 
+
−
'''TBtreeObject'''
+
−
 
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TBtreeObject.Clear;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
 
|-
 
|-
−
! '''Note'''
+
| [[TLinkedStringListEx|<code>TLinkedStringListEx = class(TLinkedStringList)</code>]]
−
| None documented
+
 
|-
 
|-
 
|}
 
|}
−
</div></div>
+
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
−
<br />
+
−
 
+
−
'''TLinkedBtree'''
+
−
 
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">constructor TLinkedBtree.Create;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
 
|-
 
|-
−
! '''Note'''
+
| [[THashStringObject|<code>THashStringObject = class(TStringObjectEx)</code>]]
−
| None documented
+
 
|-
 
|-
 
|}
 
|}
−
</div></div>
+
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">destructor TLinkedBtree.Destroy;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
 
|-
 
|-
−
! '''Note'''
+
| [[THashLinkedStringList|<code>THashLinkedStringList = class(TLinkedStringListEx)</code>]]
−
| None documented
+
 
|-
 
|-
 
|}
 
|}
−
</div></div>
+
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TLinkedBtree.SetOrder(AOrder:LongWord);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Set a new Order and calculate a new Median value</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
 
|-
 
|-
−
! '''Note'''
+
| [[TIntegerList|<code>TIntegerList = class(TObject)</code>]]
−
| Minimum Order is 5 and minimum Median is 3
+
 
|-
 
|-
 
|}
 
|}
−
</div></div>
+
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.PropogateDrop(AEntry:TBtreeObject):Boolean;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
 
|-
 
|-
−
! '''Note'''
+
| [[TDateTimeList|<code>TDateTimeList = class(TObject)</code>]]
−
| None documented
+
 
|-
 
|-
 
|}
 
|}
−
</div></div>
+
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.PropogateMerge(AEntry:TBtreeObject):Boolean;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
 
|-
 
|-
−
! '''Note'''
+
| [[TMemoryBlock|<code>TMemoryBlock = class(TListObject)</code>]]
−
| None documented
+
 
|-
 
|-
 
|}
 
|}
−
</div></div>
+
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.PropogateSplit(AEntry:TBtreeObject):Boolean;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
 
|-
 
|-
−
! '''Note'''
+
| [[TMemoryStreamEx|<code>TMemoryStreamEx = class(TStream)</code>]]
−
| This is currently not used by insert and must be tested before use
+
 
|-
 
|-
 
|}
 
|}
−
</div></div>
+
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.GetCount(AEntry:TBtreeObject):LongWord;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Get the count of entries in the node of the supplied entry</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
 
|-
 
|-
−
! '''Note'''
+
| [[TStreamEx|<code>TStreamEx = class(TStream)</code>]]
−
| Does not include the blank key
+
 
|-
 
|-
 
|}
 
|}
−
</div></div>
+
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.GetDepth(AEntry:TBtreeObject):LongWord;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Get the depth of the supplied entry in the btree</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
 
|-
 
|-
−
! '''Note'''
+
| [[THandleStreamEx|<code>THandleStreamEx = class(TStreamEx)</code>]]
−
| None documented
+
 
|-
 
|-
 
|}
 
|}
−
</div></div>
+
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.GetEnd(AEntry:TBtreeObject):TBtreeObject;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Get the end entry in the node of the supplied entry</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
 
|-
 
|-
−
! '''Note'''
+
| [[TFileStreamEx|<code>TFileStreamEx = class(THandleStreamEx)</code>]]
−
| Includes the blank key which may be the only key
+
 
|-
 
|-
 
|}
 
|}
−
</div></div>
+
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.GetStart(AEntry:TBtreeObject):TBtreeObject;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Get the start entry in the node of the supplied entry</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
 
|-
 
|-
−
! '''Note'''
+
| [[TStringItemEx|<code>TStringItemEx = class(TObject)</code>]]
−
| Includes the blank key which may be the only key
+
 
|-
 
|-
 
|}
 
|}
−
</div></div>
+
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.GetBlank(AEntry:TBtreeObject):TBtreeObject;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Get the blank entry in the node of the supplied entry</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
 
|-
 
|-
−
! '''Blank'''
+
| [[TStringListEx|<code>TStringListEx = class(TStrings)</code>]]
−
| Blank entry is always the last entry in every node
+
 
|-
 
|-
 
|}
 
|}
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.GetMedian(AEntry:TBtreeObject):TBtreeObject;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Get the median entry in the node of the supplied entry</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| Does not include the blank key
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.GetDrop(AEntry:TBtreeObject; var ALeft:Boolean):TBtreeObject;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Get the neighbour with appropriate number of keys to drop</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Drop'''
 
−
| Always drop with the Righthand neighbour if available
 
−
|-
 
−
! '''Note'''
 
−
| Only supported by descendant classes with non balanced nodes
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.GetMerge(AEntry:TBtreeObject):TBtreeObject;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Get the neighbour with appropriate number of keys to merge</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Merge'''
 
−
| Always merge with the Righthand neighbour if available
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.GetBorrow(AEntry:TBtreeObject):TBtreeObject;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Get the neighbour with sufficient keys to borrow one</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Borrow'''
 
−
| Always borrow from the Righthand neighbour if available
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.GetTarget(ADrop:TBtreeObject; ALeft:Boolean):TBtreeObject;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Get the actual target within the neighbour that is appropriate to drop</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| Only supported by descendant classes with non balanced nodes
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.SetParent(AEntry,AParent:TBtreeObject):Boolean;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Set the parent for all entries in a node and set the child of the parent</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| Includes the blank key which may be the only key
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.GetLefthand(AEntry:TBtreeObject):TBtreeObject;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Get the lefthand neighbour (Node) of the supplied entries node</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| None documented
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.GetRighthand(AEntry:TBtreeObject):TBtreeObject;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Get the righthand neighbour (Node) of the supplied entries node</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| None documented
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.GetLeftmost(AEntry:TBtreeObject):TBtreeObject;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Get the leftmost entry in the tree of the supplied entry</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| None documented
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.GetRightmost(AEntry:TBtreeObject):TBtreeObject;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Get the rightmost entry in the tree of the supplied entry</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| Does not include the blank key
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.GetSuccessor(AEntry:TBtreeObject):TBtreeObject;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Get the successor (Right) entry of the supplied entry</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| The returned entry may be a blank key or a real key
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.GetPredecessor(AEntry:TBtreeObject):TBtreeObject;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Get the predecessor (Left) entry of the supplied entry</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| The returned entry may be a blank key or a real key
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.GetPosition(AStart,AEntry:TBtreeObject):TBtreeObject;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Get the position where entry should be inserted into the btree</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| The returned entry will be the entry to the right in insert node. The returned entry may be the blank key or may be a real key.
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.Push(AEntry:TBtreeObject):Boolean;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Push the node containing the supplied entry</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Push'''
 
−
| Push can only occur on the root node
 
−
|-
 
−
! '''Note'''
 
−
| Will create a new blank as root. All keys will be parented by new blank root.
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.Split(AEntry:TBtreeObject):Boolean;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Split the node containing the supplied entry</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Split'''
 
−
| Split can propogate all the way to root since median is promoted
 
−
|-
 
−
! '''Note'''
 
−
| Will promote the median entry to the parent. Keys left of median will be parented by median. Keys right of median will retain current parent. Child of median will parent to new blank on left. Median will be attached to the left of the parent.
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.Swap(AEntry,ASwap:TBtreeObject; ALeft:Boolean):Boolean;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Swap the supplied entries directly from node to node</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| Entry is always a parent and Swap is always a leaf. No balancing is done as the entry is to be deleted or borrowed.
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.Drop(AEntry,ADrop,ATarget:TBtreeObject; ALeft:Boolean):Boolean;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Drop the nodes of the supplied entries into one</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| None documented
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.Merge(AEntry,AMerge:TBtreeObject):Boolean;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Merge the nodes of the supplied entries into one</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| None documented
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.Borrow(AEntry,ABorrow:TBtreeObject):Boolean;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Borrow an entry from the supplied node to balance the tree</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| None documented
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.Link(AEntry,ANext:TBtreeObject):Boolean;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Link the object to Prev/Next in linked list</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| If Next is nil then link as last
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.Unlink(AEntry:TBtreeObject):Boolean;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Unlink the object from Prev/Next in linked list</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| None documented
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.LinkBlank(AEntry:TBtreeObject):Boolean;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Link the object to Prev/Next in blank key list</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| Always link as last
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.UnlinkBlank(AEntry:TBtreeObject):Boolean;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Unlink the object from Prev/Next in blank key list</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| None documented
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.Attach(AParent,AEntry,ARight:TBtreeObject):Boolean;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Attach the object to Parent/Left/Right in btree</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| If Right is nil then attach as last. If Parent is nil then attach at root.
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.Detach(AEntry:TBtreeObject):Boolean;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Detach the object from Parent/Left/Right in btree</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| None documented
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.PushNode(AEntry:TBtreeObject):Boolean;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Called before a node is pushed following insert of an entry</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| None documented
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.SplitNode(AEntry:TBtreeObject):Boolean;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Called before a node is split following insert of an entry</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| None documented
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.DropNode(AEntry,ADrop,ATarget:TBtreeObject; ALeft:Boolean):Boolean;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Called before a node is dropped following removal of an entry</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| None documented
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.MergeNode(AEntry,AMerge:TBtreeObject):Boolean;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Called before a node is merged following removal of an entry</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| None documented
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.BorrowEntry(AEntry,ABorrow:TBtreeObject):Boolean;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Called before an entry is borrowed following removal of an entry</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| None documented
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.SwapEntry(AEntry,ASwap:TBtreeObject; ALeft:Boolean):Boolean;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Called before an entry is swapped during a merge or borrow</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| None documented
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.SetParentEntry(AEntry,AParent:TBtreeObject):Boolean;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Called after an entry is reparented during a push, split, merge, borrow or swap</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| None documented
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.CreateBlank:TBtreeObject;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Create a blank key when a node is added (Split/Empty)</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| None documented
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.DeleteBlank(ABlank:TBtreeObject):Boolean;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Delete a blank key when a node is removed (Merge)</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| None documented
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.AttachBlank(ABlank:TBtreeObject):Boolean;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Called after a blank entry is attached to a node during split or merge</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| None documented
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.DetachBlank(ABlank:TBtreeObject):Boolean;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Called before a blank entry is detached from a node during split or merge</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| None documented
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.AttachEntry(AEntry:TBtreeObject):Boolean;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Called after a non blank entry is attached to a node during insert or remove</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| None documented
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.DetachEntry(AEntry:TBtreeObject):Boolean;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Called before a non blank entry is detached from a node during insert or remove</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| None documented
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.RequirePush(AEntry:TBtreeObject):Boolean;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Called after an entry is inserted to determine if a push is required</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Entry'''
 
−
| Entry is the key that was inserted. Or a key in a parent node of the node where the entry was inserted.
 
−
|-
 
−
! '''Note'''
 
−
| Only supported by descendant classes with non balanced nodes
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.RequireSplit(AEntry:TBtreeObject):Boolean;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Called after an entry is inserted to determine if a split is required</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Entry'''
 
−
| Entry is the key that was inserted. Or a key in a parent node of the node where the entry was inserted.
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.RequireDrop(AEntry:TBtreeObject):Boolean;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Called after an entry is removed to determine if a drop is required</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Entry'''
 
−
| Entry is the start key of the node where the entry was removed. Or a key in a parent node of the node where the entry was removed.
 
−
|-
 
−
! '''Note'''
 
−
| Only supported by descendant classes with non balanced nodes
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.RequireMerge(AEntry:TBtreeObject):Boolean;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Called after an entry is removed to determine if a merge is required</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Entry'''
 
−
| Entry is the start key of the node where the entry was removed. Or a key in a parent node of the node where the entry was removed.
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.RequireBorrow(AEntry:TBtreeObject):Boolean;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Called after an entry is removed to determine if a borrow is required</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Entry'''
 
−
| Entry is the start key of the node where the entry was removed. Or a key in a parent node of the node where the entry was removed.
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.Compare(AEntry1,AEntry2:TBtreeObject):Integer;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Always returns greater than unless the second entry is a blank key</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| This means keys will end up in added order if no compare is provided
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.Add(AParent,AEntry:TBtreeObject):Boolean;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Add an entry to the btree without doing the full insert</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Entry'''
 
−
| Entries must be added in btree order to obtain final order
 
−
|-
 
−
! '''Note'''
 
−
| Both real and blank keys can be added. No events are triggered by Add.
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.Insert(AEntry:TBtreeObject):Boolean;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Insert an entry in the btree by finding its position</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| Rebalances the tree after inserting the new entry. Blank keys cannot be inserted. Entry must be created by the caller.
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedBtree.Remove(AEntry:TBtreeObject):Boolean;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Remove an entry from the btree by deleting it</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| Rebalances the tree after deleting the entry. Blank keys cannot be removed. Entry must be destroyed by the caller.
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">procedure TLinkedBtree.Clear;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Removes all entries from the btree</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| None documented
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">procedure TLinkedBtree.Empty;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Removes all entries from the btree and adds a blank root key</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| None documented
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">procedure TLinkedBtree.Rebuild;</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Empties the btree and rebuilds from the linked list</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| None documented
 
−
|-
 
−
|}
 
−
</div></div>
 
 
<br />
 
<br />
  
−
'''TLinkedObjBtree'''
+
=== Public variables ===
 +
----
  
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
''None defined''
−
<pre style="border: 0; padding-bottom:0px;">constructor TLinkedObjBtree.Create;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">destructor TLinkedObjBtree.Destroy;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TLinkedObjBtree.ClearBtree;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Removes and frees all entries in the btree</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TLinkedObjBtree.EmptyBtree;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Removes and frees all entries in the btree and adds a blank root key</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
  
−
'''THashListObject'''
+
=== Function declarations ===
 +
----
  
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
−
<pre style="border: 0; padding-bottom:0px;">procedure THashListObject.SetKeyHash(AKeyHash:LongWord);</pre>
 
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
 
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
−
{| class="wikitable" style="font-size: 14px; background: white;"
 
−
|-
 
−
! '''Note'''
 
−
| None documented
 
−
|-
 
−
|}
 
−
</div></div>
 
−
<br />
 
  
−
'''THashLinkedList'''
+
'''TimerExEvent'''
  
 
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
 
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
−
<pre style="border: 0; padding-bottom:0px;">constructor THashLinkedList.Create(AKeyBits:Byte);</pre>
+
<pre style="border: 0; padding-bottom:0px;">procedure TimerExEvent(TimerEx:TTimerEx);</pre>
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">destructor THashLinkedList.Destroy;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function THashLinkedList.KeyLink(AValue:THashListObject):Boolean;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Link AValue to Prev,Next Keys and Adjust First</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function THashLinkedList.KeyUnlink(AValue:THashListObject):Boolean;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Unlink AValue from Prev,Next Keys and Adjust First</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function THashLinkedList.KeyFirst(AKeyHash:LongWord):THashListObject;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function THashLinkedList.Add(AValue:TListObject):Boolean;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Add AValue to List and link with Siblings</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function THashLinkedList.Remove(AValue:TListObject):Boolean;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Unlink AValue from Siblings and Remove from List</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function THashLinkedList.Insert(APrev,AValue:TListObject):Boolean;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure THashLinkedList.Clear;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
 
+
−
'''THashLinkedObjList'''
+
−
 
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">constructor THashLinkedObjList.Create(AKeyBits:Byte);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">destructor THashLinkedObjList.Destroy;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure THashLinkedObjList.ClearList;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
 
+
−
'''THashTreeObject'''
+
−
 
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">constructor THashTreeObject.Create(AKeyBits:Byte);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">destructor THashTreeObject.Destroy;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure THashTreeObject.SetKeyHash(AKeyHash:LongWord);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function THashTreeObject.KeyLink(AValue:THashTreeObject):Boolean;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Link AValue to Prev,Next Keys and Adjust First</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function THashTreeObject.KeyUnlink(AValue:THashTreeObject):Boolean;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Unlink AValue from Prev,Next Keys and Adjust First</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function THashTreeObject.KeyFirst(AKeyHash:LongWord):THashTreeObject;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
 
+
−
'''THashLinkedTree'''
+
−
 
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">constructor THashLinkedTree.Create(AKeyBits:Byte);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">destructor THashLinkedTree.Destroy;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function THashLinkedTree.KeyLink(AValue,AParent:THashTreeObject):Boolean;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Link AValue to Prev,Next Keys and Adjust First</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function THashLinkedTree.KeyUnlink(AValue,AParent:THashTreeObject):Boolean;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Unlink AValue from Prev,Next Keys and Adjust First</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function THashLinkedTree.KeyFirst(AParent:THashTreeObject; AKeyHash:LongWord):THashTreeObject;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function THashLinkedTree.Add(AValue,AParent:TTreeObject):Boolean;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Add AValue to List and Link with Parent and Siblings</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function THashLinkedTree.Remove(AValue:TTreeObject):Boolean;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Unlink AValue from Parent and Siblings, Remove from List</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function THashLinkedTree.Insert(APrev,AValue,AParent:TTreeObject):Boolean;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure THashLinkedTree.Move(AValue,AParent:TTreeObject);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure THashLinkedTree.Clear;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
 
+
−
'''THashLinkedObjTree'''
+
−
 
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">constructor THashLinkedObjTree.Create(AKeyBits:Byte);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">destructor THashLinkedObjTree.Destroy;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure THashLinkedObjTree.ClearListItems(AParent:THashTreeObject);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure THashLinkedObjTree.ClearList;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
 
+
−
'''TStringObject'''
+
−
 
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TStringObject.SetValue(const AValue:String);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
 
+
−
'''TLinkedStringList'''
+
−
 
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">constructor TLinkedStringList.Create;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">destructor TLinkedStringList.Destroy;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedStringList.GetItem(AIndex:Integer):TStringObject;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedStringList.Link(AValue:TStringObject):Boolean;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Link AValue to Prev,Next Siblings and Adjust First/Last</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedStringList.LinkEx(APrev,AValue:TStringObject):Boolean;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Link AValue after APrev Sibling and Adjust First/Last/Prev/Next</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| If APrev is nil then Link as first value in list
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedStringList.Unlink(AValue:TStringObject):Boolean;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Unlink AValue from Prev,Next Siblings and Adjust First/Last</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TLinkedStringList.ClearList;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TLinkedStringList.Changed;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TLinkedStringList.Changing;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedStringList.Get(Index:Integer):String;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedStringList.GetCount:Integer;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedStringList.GetObject(Index:Integer):TObject;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TLinkedStringList.Put(Index:Integer;const S:String);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TLinkedStringList.PutObject(Index:Integer; AObject:TObject);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TLinkedStringList.SetUpdateState(Updating:Boolean);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedStringList.Add(const S:String):Integer;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TLinkedStringList.Clear;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TLinkedStringList.Delete(Index:Integer);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TLinkedStringList.Exchange(Index1,Index2:Integer);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedStringList.IndexOf(const S:String):Integer;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Uses Counted Index starting from First String Object</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TLinkedStringList.Insert(Index:Integer; const S:String);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
 
+
−
'''TStringBlock'''
+
−
 
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">destructor TStringBlock.Destroy;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
 
+
−
'''TLinkedStringListEx'''
+
−
 
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">constructor TLinkedStringListEx.Create;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">destructor TLinkedStringListEx.Destroy;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedStringListEx.GetBlock(Index:Integer):TStringBlock;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedStringListEx.AddBlock(Block:TStringBlock; Index:Integer):TStringBlock;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Index'''
+
−
| Starting Index of Block to be Added
+
−
|-
+
−
! '''Block'''
+
−
| Current Block containing Index or nil
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedStringListEx.DeleteBlock(Block:TStringBlock):Boolean;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedStringListEx.UpdateBlocks(Block:TStringBlock):Boolean;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedStringListEx.GetItem(Block:TStringBlock; Index:Integer):TStringObjectEx;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedStringListEx.AddItem(Block:TStringBlock; Index:Integer; Item:TStringObjectEx):Boolean;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedStringListEx.DeleteItem(Block:TStringBlock;Index:Integer; Item:TStringObjectEx):Boolean;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedStringListEx.IndexOfItem(Block:TStringBlock; Item:TStringObjectEx):Integer;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedStringListEx.Get(Index:Integer):String;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedStringListEx.GetCapacity:Integer;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedStringListEx.GetObject(Index:Integer):TObject;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TLinkedStringListEx.Put(Index:Integer;const S:String);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TLinkedStringListEx.PutObject(Index:Integer; AObject:TObject);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedStringListEx.Add(const S:String):Integer;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TLinkedStringListEx.Clear;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TLinkedStringListEx.Delete(Index:Integer);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TLinkedStringListEx.Exchange(Index1,Index2:Integer);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TLinkedStringListEx.IndexOf(const S:String):Integer;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Uses IndexOfItem within the Block of the matched String Object</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| Could use Counted Index method of TLinkedStringList instead
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TLinkedStringListEx.Insert(Index:Integer; const S:String);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
 
+
−
'''THashStringObject'''
+
−
 
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure THashStringObject.SetHash(AHash:LongWord);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure THashStringObject.SetValue(const AValue:String);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
 
+
−
'''THashLinkedStringList'''
+
−
 
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">constructor THashLinkedStringList.Create(AKeyBits:Byte);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">destructor THashLinkedStringList.Destroy;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function THashLinkedStringList.KeyLink(AValue:THashStringObject):Boolean;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Link AValue to Prev,Next Keys and Adjust First</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function THashLinkedStringList.KeyUnlink(AValue:THashStringObject):Boolean;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Unlink AValue from Prev,Next Keys and Adjust First</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure THashLinkedStringList.ClearList;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function THashLinkedStringList.KeyFirst(AKeyHash:LongWord):THashStringObject;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function THashLinkedStringList.Add(const S:String):Integer;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure THashLinkedStringList.Delete(Index:Integer);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function THashLinkedStringList.IndexOf(const S:String):Integer;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Uses IndexOfItem within the Block of the matched String Object</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| Cannot use Counted Index method due to use of Hash Buckets
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure THashLinkedStringList.Insert(Index:Integer; const S:String);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
 
+
−
'''TIntegerList'''
+
−
 
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">constructor TIntegerList.Create;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">destructor TIntegerList.Destroy;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TIntegerList.GetItem(Idx:Integer):Integer;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TIntegerList.SetItem(Idx,Value:Integer);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TIntegerList.GetCount:Integer;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TIntegerList.Add(AValue:Integer):Integer;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TIntegerList.Remove(AValue:Integer):Integer;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TIntegerList.Delete(Idx:Integer);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TIntegerList.IndexOf(AValue:Integer):Integer;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TIntegerList.Clear;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
 
+
−
'''TDateTimeList'''
+
−
 
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">constructor TDateTimeList.Create;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">destructor TDateTimeList.Destroy;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TDateTimeList.GetItem(Idx:Integer):TDateTime;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TDateTimeList.SetItem(Idx:Integer; Value:TDateTime);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TDateTimeList.GetCount:Integer;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TDateTimeList.Add(AValue:TDateTime):Integer;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TDateTimeList.Remove(AValue:TDateTime):Integer;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TDateTimeList.Delete(Idx:Integer);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TDateTimeList.IndexOf(AValue:TDateTime):Integer;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TDateTimeList.Clear;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
 
+
−
'''TMemoryBlock'''
+
−
 
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">destructor TMemoryBlock.Destroy;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
 
+
−
'''TMemoryStreamEx'''
+
−
 
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">constructor TMemoryStreamEx.Create;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">destructor TMemoryStreamEx.Destroy;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TMemoryStreamEx.RoundSize(ASize:LongInt):LongWord;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TMemoryStreamEx.GetBlock(AOffset:LongWord):TMemoryBlock;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TMemoryStreamEx.ReadBlock(ABlock:TMemoryBlock; ABuffer:Pointer; AOffset,ACount:LongWord):LongWord;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TMemoryStreamEx.WriteBlock(ABlock:TMemoryBlock; ABuffer:Pointer; AOffset,ACount:LongWord):LongWord;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TMemoryStreamEx.SetCapacity(ACapacity:LongWord);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TMemoryStreamEx.SetSize(ASize:LongInt);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TMemoryStreamEx.Read(var ABuffer; ACount:LongInt):LongInt;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TMemoryStreamEx.Write(const ABuffer; ACount:LongInt):LongInt;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TMemoryStreamEx.Seek(AOffset:LongInt; AOrigin:Word):LongInt;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TMemoryStreamEx.SaveToStream(AStream:TStream);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TMemoryStreamEx.LoadFromStream(AStream:TStream);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TMemoryStreamEx.SaveToFile(const AFileName:String);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TMemoryStreamEx.LoadFromFile(const AFileName:String);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TMemoryStreamEx.Clear;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
 
+
−
'''TStreamEx'''
+
−
 
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TStreamEx.GetPositionEx:Int64;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TStreamEx.SetPositionEx(const Pos:Int64);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TStreamEx.GetSizeEx:Int64;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TStreamEx.SetSizeEx(const NewSize:Int64);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
 
+
−
'''THandleStreamEx'''
+
−
 
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">constructor THandleStreamEx.Create(AHandle:Integer);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure THandleStreamEx.SetSize(NewSize:LongInt);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure THandleStreamEx.SetSizeEx(const NewSize:Int64);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function THandleStreamEx.Read(var Buffer; Count:Longint):Longint;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function THandleStreamEx.Write(const Buffer; Count:Longint):Longint;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function THandleStreamEx.Seek(Offset:Longint; Origin:Word):Longint;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function THandleStreamEx.SeekEx(const Offset:Int64; Origin:Word):Int64;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
 
+
−
'''TFileStreamEx'''
+
−
 
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">constructor TFileStreamEx.Create(const FileName:String; Mode:Word);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">destructor TFileStreamEx.Destroy;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
 
+
−
'''TStringItemEx'''
+
−
 
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TStringItemEx.SetValue(const AValue:String);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
 
+
−
'''TStringListEx'''
+
−
 
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">constructor TStringListEx.Create;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">destructor TStringListEx.Destroy;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TStringListEx.GetBlock(Index:Integer):TStringBlock;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TStringListEx.AddBlock(Block:TStringBlock; Index:Integer):TStringBlock;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Index'''
+
−
| Starting Index of Block to be Added
+
−
|-
+
−
! '''Block'''
+
−
| Current Block containing Index or nil
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TStringListEx.DeleteBlock(Block:TStringBlock):Boolean;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TStringListEx.UpdateBlocks(Block:TStringBlock):Boolean;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TStringListEx.GetItem(Block:TStringBlock; Index:Integer):TStringItemEx;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TStringListEx.AddItem(Block:TStringBlock; Index:Integer; Item:TStringItemEx):Boolean;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TStringListEx.DeleteItem(Block:TStringBlock; Index:Integer; Item:TStringItemEx):Boolean;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TStringListEx.ClearList;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TStringListEx.Changed;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TStringListEx.Changing;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TStringListEx.Get(Index:Integer):String;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TStringListEx.GetCapacity:Integer;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TStringListEx.GetCount:Integer;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TStringListEx.GetObject(Index:Integer):TObject;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TStringListEx.Put(Index:Integer; const S:String);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TStringListEx.PutObject(Index:Integer; AObject:TObject);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TStringListEx.SetUpdateState(Updating:Boolean);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TStringListEx.Add(const S:String):Integer;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TStringListEx.Clear;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TStringListEx.Delete(Index:Integer);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TStringListEx.Exchange(Index1,Index2:Integer);</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">function TStringListEx.IndexOf(const S:String):Integer;</pre>
+
−
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' Uses Counted Index within the Block of the matched String Object</div>
+
−
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
+
−
{| class="wikitable" style="font-size: 14px; background: white;"
+
−
|-
+
−
! '''Note'''
+
−
| None documented
+
−
|-
+
−
|}
+
−
</div></div>
+
−
<br />
+
−
<div class="toccolours mw-collapsible mw-collapsed" style="border: 1; font-family: arial; padding-top: 0px; padding-bottom: 15px;">
+
−
<pre style="border: 0; padding-bottom:0px;">procedure TStringListEx.Insert(Index:Integer; const S:String);</pre>
+
 
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
 
<div style="font-size: 14px; padding-left: 12px;">'''Description:''' To be documented</div>
 
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 
{| class="wikitable" style="font-size: 14px; background: white;"
 
{| class="wikitable" style="font-size: 14px; background: white;"
 
|-
 
|-
−
! '''Note'''
+
! Note
 
| None documented
 
| None documented
 
|-
 
|-

Latest revision as of 04:46, 31 August 2021

Return to Unit Reference


Description

Ultibo Classes unit

Constants


Error constants *_Error
SListIndexError = 'List index out of bounds (%d)';  
SFCreateError = 'Cannot create file %s';  
SFOpenError = 'Cannot open file %s';  


B-Tree constants btree_*
btreeCompareLess = -1;  
btreeCompareEqual = 0;  
btreeCompareGreater = 1;  


Hash constants *_Hash*
stringHashSize = 8;  
 
listHashBits = 8;  
treeHashBits = 3;  
 
keyHashMinBits = 1;  
keyHashMaxBits = 16; Maximum of 16 bit hash mask (65535 buckets) due to memory usage
keyHashMasks:array[keyHashMinBits..keyHashMaxBits] of LongWord = (  
$00000001,$00000003,$00000007,$0000000F,  
$0000001F,$0000003F,$0000007F,$000000FF,  
$000001FF,$000003FF,$000007FF,$00000FFF,  
$00001FFF,$00003FFF,$00007FFF,$0000FFFF);  


Delta constants *_Delta
memoryStreamDelta = $2000;  
memoryStreamShift = 13;  
 
stringListDelta = $2000;  


Type definitions

None defined

Class definitions


Ultibo specific classes

TThreadEx = class(TThread)
TTimerEx = class(TObject)
TObjList = class(TList)
TThreadObjList = class(TThreadList)
TListObject = class(TObject)
TLinkedList = class(TObject)
TLinkedObjList = class(TLinkedList)
TThreadLinkedObjList = class(TLinkedList)
TTreeObject = class(TListObject)
TLinkedTree = class(TObject)
TLinkedObjTree = class(TLinkedTree)
TBtreeObject = class(TObject)
TLinkedBtree = class(TObject)
TLinkedObjBtree = class(TLinkedBtree)
THashListObject = class(TListObject)
THashLinkedList = class(TLinkedList)
THashLinkedObjList = class(THashLinkedList)
THashTreeObject = class(TTreeObject)
THashLinkedTree = class(TLinkedTree)
THashLinkedObjTree = class(THashLinkedTree)
TStringObject = class(TListObject)
TLinkedStringList = class(TStrings)
TStringBlock = class(TListObject)
TStringObjectEx = class(TStringObject)
TLinkedStringListEx = class(TLinkedStringList)
THashStringObject = class(TStringObjectEx)
THashLinkedStringList = class(TLinkedStringListEx)
TIntegerList = class(TObject)
TDateTimeList = class(TObject)
TMemoryBlock = class(TListObject)
TMemoryStreamEx = class(TStream)
TStreamEx = class(TStream)
THandleStreamEx = class(TStreamEx)
TFileStreamEx = class(THandleStreamEx)
TStringItemEx = class(TObject)
TStringListEx = class(TStrings)


Public variables

None defined

Function declarations


TimerExEvent 

procedure TimerExEvent(TimerEx:TTimerEx);
Description: To be documented
Note None documented


Return to Unit Reference

Retrieved from "https://ultibo.org/mediawiki_ultibo_org/index.php?title=Unit_UltiboClasses&oldid=5061"