Difference between revisions of "Unit UltiboClasses"

From Ultibo.org
Jump to: navigation, search
 
(8 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''
+
 
 +
<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>
 +
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 +
{| class="wikitable" style="font-size: 14px; background: white;"
 +
|-
 +
| <code>SListIndexError = 'List index out of bounds (%d)';</code>
 +
| style="width: 50%;"|&nbsp;
 +
|-
 +
| <code>SFCreateError = 'Cannot create file %s';</code>
 +
| &nbsp;
 +
|-
 +
| <code>SFOpenError = 'Cannot open file %s';</code>
 +
| &nbsp;
 +
|-
 +
|}
 +
</div></div>
 +
<br /> 
 +
<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;">'''B-Tree constants''' <code> btree_* </code></div>
 +
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 +
{| class="wikitable" style="font-size: 14px; background: white;"
 +
|-
 +
| <code>btreeCompareLess = -1;</code>
 +
| style="width: 50%;"|&nbsp;
 +
|-
 +
| <code>btreeCompareEqual = 0;</code>
 +
| &nbsp;
 +
|-
 +
| <code>btreeCompareGreater = 1;</code>
 +
| &nbsp;
 +
|-
 +
|}
 +
</div></div>
 +
<br />
 +
<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;">'''Hash constants''' <code> *_Hash* </code></div>
 +
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 +
{| class="wikitable" style="font-size: 14px; background: white;"
 +
|-
 +
| <code>stringHashSize = 8;</code>
 +
| style="width: 50%;"|&nbsp;
 +
|-
 +
|colspan="2"|&nbsp;
 +
|-
 +
| <code>listHashBits = 8;</code>
 +
| &nbsp;
 +
|-
 +
| <code>treeHashBits = 3;</code>
 +
| &nbsp;
 +
|-
 +
|colspan="2"|&nbsp;
 +
|-
 +
| <code>keyHashMinBits = 1;</code>
 +
| &nbsp;
 +
|-
 +
| <code>keyHashMaxBits = 16;</code>
 +
| Maximum of 16 bit hash mask (65535 buckets) due to memory usage
 +
|-
 +
| <code>keyHashMasks:array[keyHashMinBits..keyHashMaxBits] of LongWord = (</code>
 +
| &nbsp;
 +
|-
 +
| <code>$00000001,$00000003,$00000007,$0000000F,</code>
 +
| &nbsp;
 +
|-
 +
| <code>$0000001F,$0000003F,$0000007F,$000000FF,</code>
 +
| &nbsp;
 +
|-
 +
| <code>$000001FF,$000003FF,$000007FF,$00000FFF,</code>
 +
| &nbsp;
 +
|-
 +
| <code>$00001FFF,$00003FFF,$00007FFF,$0000FFFF);</code>
 +
| &nbsp;
 +
|-
 +
|}
 +
</div></div>
 +
<br /> 
 +
<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;">'''Delta constants''' <code> *_Delta </code></div>
 +
<div class="mw-collapsible-content" style="text-align: left; padding-left: 5px;">
 +
{| class="wikitable" style="font-size: 14px; background: white;"
 +
|-
 +
| <code>memoryStreamDelta = $2000;</code>
 +
| style="width: 50%;"|&nbsp;
 +
|-
 +
| <code>memoryStreamShift = 13;</code>
 +
| &nbsp;
 +
|-
 +
|colspan="2"|&nbsp;
 +
|-
 +
| <code>stringListDelta = $2000;</code>
 +
| &nbsp;
 +
|-
 +
|}
 +
</div></div>
 +
<br />
  
 
=== Type definitions ===
 
=== Type definitions ===
 
----
 
----
  
''To be documented''
+
''None defined''
 +
 
 +
=== Class definitions ===
 +
----
 +
 
 +
 
 +
'''Ultibo specific classes'''
 +
 
 +
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
 +
|-
 +
| [[TThreadEx|<code>TThreadEx = class(TThread)</code>]]
 +
|-
 +
|}
 +
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
 +
|-
 +
| [[TTimerEx|<code>TTimerEx = class(TObject)</code>]]
 +
|-
 +
|}
 +
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
 +
|-
 +
| [[TObjList|<code>TObjList = class(TList)</code>]]
 +
|-
 +
|}
 +
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
 +
|-
 +
| [[TThreadObjList|<code>TThreadObjList = class(TThreadList)</code>]]
 +
|-
 +
|}
 +
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
 +
|-
 +
| [[TListObject|<code>TListObject = class(TObject)</code>]]
 +
|-
 +
|}
 +
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
 +
|-
 +
| [[TLinkedList|<code>TLinkedList = class(TObject)</code>]]
 +
|-
 +
|}
 +
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
 +
|-
 +
| [[TLinkedObjList|<code>TLinkedObjList = class(TLinkedList)</code>]]
 +
|-
 +
|}
 +
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
 +
|-
 +
| [[TThreadLinkedObjList|<code>TThreadLinkedObjList = class(TLinkedList)</code>]]
 +
|-
 +
|}
 +
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
 +
|-
 +
| [[TTreeObject|<code>TTreeObject = class(TListObject)</code>]]
 +
|-
 +
|}
 +
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
 +
|-
 +
| [[TLinkedTree|<code>TLinkedTree = class(TObject)</code>]]
 +
|-
 +
|}
 +
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
 +
|-
 +
| [[TLinkedObjTree|<code>TLinkedObjTree = class(TLinkedTree)</code>]]
 +
|-
 +
|}
 +
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
 +
|-
 +
| [[TBtreeObject|<code>TBtreeObject = class(TObject)</code>]]
 +
|-
 +
|}
 +
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
 +
|-
 +
| [[TLinkedBtree|<code>TLinkedBtree = class(TObject)</code>]]
 +
|-
 +
|}
 +
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
 +
|-
 +
| [[TLinkedObjBtree|<code>TLinkedObjBtree = class(TLinkedBtree)</code>]]
 +
|-
 +
|}
 +
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
 +
|-
 +
| [[THashListObject|<code>THashListObject = class(TListObject)</code>]]
 +
|-
 +
|}
 +
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
 +
|-
 +
| [[THashLinkedList|<code>THashLinkedList = class(TLinkedList)</code>]]
 +
|-
 +
|}
 +
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
 +
|-
 +
| [[THashLinkedObjList|<code>THashLinkedObjList = class(THashLinkedList)</code>]]
 +
|-
 +
|}
 +
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
 +
|-
 +
| [[THashTreeObject|<code>THashTreeObject = class(TTreeObject)</code>]]
 +
|-
 +
|}
 +
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
 +
|-
 +
| [[THashLinkedTree|<code>THashLinkedTree = class(TLinkedTree)</code>]]
 +
|-
 +
|}
 +
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
 +
|-
 +
| [[THashLinkedObjTree|<code>THashLinkedObjTree = class(THashLinkedTree)</code>]]
 +
|-
 +
|}
 +
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
 +
|-
 +
| [[TStringObject|<code>TStringObject = class(TListObject)</code>]]
 +
|-
 +
|}
 +
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
 +
|-
 +
| [[TLinkedStringList|<code>TLinkedStringList = class(TStrings)</code>]]
 +
|-
 +
|}
 +
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
 +
|-
 +
| [[TStringBlock|<code>TStringBlock = class(TListObject)</code>]]
 +
|-
 +
|}
 +
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
 +
|-
 +
| [[TStringObjectEx|<code>TStringObjectEx = class(TStringObject)</code>]]
 +
|-
 +
|}
 +
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
 +
|-
 +
| [[TLinkedStringListEx|<code>TLinkedStringListEx = class(TLinkedStringList)</code>]]
 +
|-
 +
|}
 +
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
 +
|-
 +
| [[THashStringObject|<code>THashStringObject = class(TStringObjectEx)</code>]]
 +
|-
 +
|}
 +
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
 +
|-
 +
| [[THashLinkedStringList|<code>THashLinkedStringList = class(TLinkedStringListEx)</code>]]
 +
|-
 +
|}
 +
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
 +
|-
 +
| [[TIntegerList|<code>TIntegerList = class(TObject)</code>]]
 +
|-
 +
|}
 +
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
 +
|-
 +
| [[TDateTimeList|<code>TDateTimeList = class(TObject)</code>]]
 +
|-
 +
|}
 +
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
 +
|-
 +
| [[TMemoryBlock|<code>TMemoryBlock = class(TListObject)</code>]]
 +
|-
 +
|}
 +
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
 +
|-
 +
| [[TMemoryStreamEx|<code>TMemoryStreamEx = class(TStream)</code>]]
 +
|-
 +
|}
 +
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
 +
|-
 +
| [[TStreamEx|<code>TStreamEx = class(TStream)</code>]]
 +
|-
 +
|}
 +
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
 +
|-
 +
| [[THandleStreamEx|<code>THandleStreamEx = class(TStreamEx)</code>]]
 +
|-
 +
|}
 +
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
 +
|-
 +
| [[TFileStreamEx|<code>TFileStreamEx = class(THandleStreamEx)</code>]]
 +
|-
 +
|}
 +
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
 +
|-
 +
| [[TStringItemEx|<code>TStringItemEx = class(TObject)</code>]]
 +
|-
 +
|}
 +
{| class="wikitable" style="font-size: 14px; text-align: left; width: 100%; height: 50px;"
 +
|-
 +
| [[TStringListEx|<code>TStringListEx = class(TStrings)</code>]]
 +
|-
 +
|}
 +
<br />
  
 
=== Public variables ===
 
=== Public variables ===
 
----
 
----
  
''To be documented''
+
''None defined''
  
 
=== Function declarations ===
 
=== Function declarations ===
 
----
 
----
  
''To be documented''
 
  
 +
'''TimerExEvent'''
 +
 +
<div class="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;">
 +
{| class="wikitable" style="font-size: 14px; background: white;"
 +
|-
 +
! Note
 +
| None documented
 +
|-
 +
|}
 +
</div></div>
 +
<br />
  
 
Return to [[Unit_Reference|Unit Reference]]
 
Return to [[Unit_Reference|Unit Reference]]

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