Changeset 82


Ignore:
Timestamp:
Oct 31, 2010, 10:01:51 AM (14 years ago)
Author:
george
Message:
  • Modified: Specialized ListObject transformed to generic TGObjectList.
Location:
Generics/TemplateGenerics
Files:
3 added
1 deleted
5 edited

Legend:

Unmodified
Added
Removed

  • Generics/TemplateGenerics/Demo/Demo.lpi

    r80 r82  
    1616      <StringTable ProductVersion=""/>
    1717    </VersionInfo>
    18     <BuildModes Count="1">
    19       <Item1 Name="default" Default="True"/>
    20     </BuildModes>
    2118    <PublishOptions>
    2219      <Version Value="2"/>
    … …  
    3835      </Item2>
    3936    </RequiredPackages>
    40     <Units Count="70">
     37    <Units Count="73">
    4138      <Unit0>
    4239        <Filename Value="Demo.lpr"/>
    4340        <IsPartOfProject Value="True"/>
    4441        <UnitName Value="Demo"/>
    45         <EditorIndex Value="12"/>
     42        <EditorIndex Value="10"/>
    4643        <WindowIndex Value="0"/>
    4744        <TopLine Value="1"/>
    … …  
    5754        <ResourceBaseClass Value="Form"/>
    5855        <UnitName Value="UMainForm"/>
    59         <IsVisibleTab Value="True"/>
    6056        <EditorIndex Value="0"/>
    6157        <WindowIndex Value="0"/>
    62         <TopLine Value="411"/>
    63         <CursorPos X="63" Y="428"/>
     58        <TopLine Value="1"/>
     59        <CursorPos X="37" Y="10"/>
    6460        <UsageCount Value="54"/>
    6561        <Loaded Value="True"/>
    … …  
    182178      <Unit16>
    183179        <Filename Value="/usr/share/fpcsrc/rtl/objpas/classes/classesh.inc"/>
    184         <EditorIndex Value="2"/>
    185180        <WindowIndex Value="0"/>
    186181        <TopLine Value="558"/>
    187182        <CursorPos X="14" Y="575"/>
    188183        <UsageCount Value="12"/>
    189         <Loaded Value="True"/>
    190184        <DefaultSyntaxHighlighter Value="Delphi"/>
    191185      </Unit16>
    192186      <Unit17>
    193187        <Filename Value="/usr/share/fpcsrc/rtl/objpas/classes/lists.inc"/>
    194         <EditorIndex Value="4"/>
    195188        <WindowIndex Value="0"/>
    196189        <TopLine Value="588"/>
    197190        <CursorPos X="3" Y="593"/>
    198191        <UsageCount Value="12"/>
    199         <Loaded Value="True"/>
    200192        <DefaultSyntaxHighlighter Value="Delphi"/>
    201193      </Unit17>
    … …  
    211203        <Filename Value="../Specialized/ListDouble.pas"/>
    212204        <UnitName Value="ListDouble"/>
    213         <EditorIndex Value="13"/>
     205        <EditorIndex Value="11"/>
    214206        <WindowIndex Value="0"/>
    215207        <TopLine Value="1"/>
    … …  
    221213        <Filename Value="../Specialized/ListInteger.pas"/>
    222214        <UnitName Value="ListInteger"/>
    223         <EditorIndex Value="14"/>
     215        <EditorIndex Value="12"/>
    224216        <WindowIndex Value="0"/>
    225217        <TopLine Value="1"/>
    … …  
    231223        <Filename Value="../Specialized/ListObject.pas"/>
    232224        <UnitName Value="ListObject"/>
    233         <EditorIndex Value="16"/>
    234225        <WindowIndex Value="0"/>
    235226        <TopLine Value="33"/>
    236227        <CursorPos X="12" Y="56"/>
    237228        <UsageCount Value="25"/>
    238         <Loaded Value="True"/>
    239229      </Unit21>
    240230      <Unit22>
    241231        <Filename Value="../Specialized/ListPointer.pas"/>
    242232        <UnitName Value="ListPointer"/>
    243         <EditorIndex Value="18"/>
     233        <EditorIndex Value="14"/>
    244234        <WindowIndex Value="0"/>
    245235        <TopLine Value="1"/>
    … …  
    251241        <Filename Value="../Specialized/TreeString.pas"/>
    252242        <UnitName Value="TreeString"/>
    253         <EditorIndex Value="19"/>
     243        <EditorIndex Value="15"/>
    254244        <WindowIndex Value="0"/>
    255245        <TopLine Value="1"/>
    … …  
    261251        <Filename Value="../Specialized/TreePointer.pas"/>
    262252        <UnitName Value="TreePointer"/>
    263         <EditorIndex Value="20"/>
     253        <EditorIndex Value="16"/>
    264254        <WindowIndex Value="0"/>
    265255        <TopLine Value="1"/>
    … …  
    271261        <Filename Value="../Specialized/TreeObject.pas"/>
    272262        <UnitName Value="TreeObject"/>
    273         <EditorIndex Value="21"/>
     263        <EditorIndex Value="17"/>
    274264        <WindowIndex Value="0"/>
    275265        <TopLine Value="1"/>
    … …  
    281271        <Filename Value="../Specialized/TreeInteger.pas"/>
    282272        <UnitName Value="TreeInteger"/>
    283         <EditorIndex Value="22"/>
     273        <EditorIndex Value="18"/>
    284274        <WindowIndex Value="0"/>
    285275        <TopLine Value="1"/>
    … …  
    291281        <Filename Value="../Specialized/ListString.pas"/>
    292282        <UnitName Value="ListString"/>
    293         <EditorIndex Value="30"/>
     283        <EditorIndex Value="26"/>
    294284        <WindowIndex Value="0"/>
    295285        <TopLine Value="1"/>
    … …  
    300290      <Unit28>
    301291        <Filename Value="../Generic/TreeImplementation.tpl"/>
    302         <EditorIndex Value="23"/>
     292        <EditorIndex Value="19"/>
    303293        <WindowIndex Value="0"/>
    304294        <TopLine Value="1"/>
    … …  
    310300      <Unit29>
    311301        <Filename Value="../Generic/TreeInterface.tpl"/>
    312         <EditorIndex Value="29"/>
     302        <EditorIndex Value="25"/>
    313303        <WindowIndex Value="0"/>
    314304        <TopLine Value="1"/>
    … …  
    320310      <Unit30>
    321311        <Filename Value="../Generic/ListInterface.tpl"/>
    322         <EditorIndex Value="31"/>
     312        <EditorIndex Value="27"/>
    323313        <WindowIndex Value="0"/>
    324314        <TopLine Value="23"/>
    … …  
    330320      <Unit31>
    331321        <Filename Value="../Generic/ListImplementation.tpl"/>
    332         <EditorIndex Value="33"/>
     322        <EditorIndex Value="29"/>
    333323        <WindowIndex Value="0"/>
    334324        <TopLine Value="114"/>
    … …  
    340330      <Unit32>
    341331        <Filename Value="../Generic/DictionaryImplementation.tpl"/>
    342         <EditorIndex Value="24"/>
     332        <EditorIndex Value="20"/>
    343333        <WindowIndex Value="0"/>
    344334        <TopLine Value="4"/>
    … …  
    350340      <Unit33>
    351341        <Filename Value="../Generic/DictionaryInterface.tpl"/>
    352         <EditorIndex Value="28"/>
     342        <EditorIndex Value="24"/>
    353343        <WindowIndex Value="0"/>
    354344        <TopLine Value="1"/>
    … …  
    368358      <Unit35>
    369359        <Filename Value="../Generic/StackInterface.tpl"/>
    370         <EditorIndex Value="25"/>
     360        <EditorIndex Value="21"/>
    371361        <WindowIndex Value="0"/>
    372362        <TopLine Value="1"/>
    … …  
    379369        <Filename Value="../Specialized/StackString.pas"/>
    380370        <UnitName Value="StackString"/>
    381         <EditorIndex Value="26"/>
     371        <EditorIndex Value="22"/>
    382372        <WindowIndex Value="0"/>
    383373        <TopLine Value="1"/>
    … …  
    388378      <Unit37>
    389379        <Filename Value="../Generic/StackImplementation.tpl"/>
    390         <EditorIndex Value="27"/>
     380        <EditorIndex Value="23"/>
    391381        <WindowIndex Value="0"/>
    392382        <TopLine Value="1"/>
    … …  
    398388      <Unit38>
    399389        <Filename Value="../Generic/QueueImplementation.tpl"/>
    400         <EditorIndex Value="35"/>
     390        <EditorIndex Value="31"/>
    401391        <WindowIndex Value="0"/>
    402392        <TopLine Value="1"/>
    … …  
    408398      <Unit39>
    409399        <Filename Value="../Generic/QueueInterface.tpl"/>
    410         <EditorIndex Value="36"/>
    411         <WindowIndex Value="0"/>
    412         <TopLine Value="1"/>
    413         <CursorPos X="18" Y="14"/>
     400        <EditorIndex Value="32"/>
     401        <WindowIndex Value="0"/>
     402        <TopLine Value="1"/>
     403        <CursorPos X="42" Y="4"/>
    414404        <UsageCount Value="23"/>
    415405        <Loaded Value="True"/>
    … …  
    435425        <Filename Value="../Specialized/ListChar.pas"/>
    436426        <UnitName Value="ListChar"/>
    437         <EditorIndex Value="32"/>
     427        <EditorIndex Value="28"/>
    438428        <WindowIndex Value="0"/>
    439429        <TopLine Value="50"/>
    … …  
    502492      <Unit50>
    503493        <Filename Value="../Generic/SetInterface.tpl"/>
    504         <EditorIndex Value="6"/>
     494        <EditorIndex Value="4"/>
    505495        <WindowIndex Value="0"/>
    506496        <TopLine Value="1"/>
    … …  
    513503        <Filename Value="../Specialized/SetChar.pas"/>
    514504        <UnitName Value="SetChar"/>
    515         <EditorIndex Value="7"/>
     505        <EditorIndex Value="5"/>
    516506        <WindowIndex Value="0"/>
    517507        <TopLine Value="1"/>
    … …  
    522512      <Unit52>
    523513        <Filename Value="../Generic/SetImplementation.tpl"/>
    524         <EditorIndex Value="5"/>
     514        <EditorIndex Value="3"/>
    525515        <WindowIndex Value="0"/>
    526516        <TopLine Value="1"/>
    … …  
    532522      <Unit53>
    533523        <Filename Value="../Generic/RangeInterface.tpl"/>
    534         <EditorIndex Value="9"/>
    535         <WindowIndex Value="0"/>
    536         <TopLine Value="1"/>
    537         <CursorPos X="23" Y="10"/>
     524        <EditorIndex Value="7"/>
     525        <WindowIndex Value="0"/>
     526        <TopLine Value="1"/>
     527        <CursorPos X="7" Y="4"/>
    538528        <UsageCount Value="17"/>
    539529        <Loaded Value="True"/>
    … …  
    543533        <Filename Value="../Specialized/RangeDateTime.pas"/>
    544534        <UnitName Value="RangeDateTime"/>
    545         <EditorIndex Value="10"/>
     535        <EditorIndex Value="8"/>
    546536        <WindowIndex Value="0"/>
    547537        <TopLine Value="1"/>
    … …  
    560550      <Unit56>
    561551        <Filename Value="../Generic/RangeImplementation.tpl"/>
    562         <EditorIndex Value="11"/>
     552        <EditorIndex Value="9"/>
    563553        <WindowIndex Value="0"/>
    564554        <TopLine Value="1"/>
    … …  
    571561        <Filename Value="../Specialized/ListVariant.pas"/>
    572562        <UnitName Value="ListVariant"/>
    573         <EditorIndex Value="8"/>
     563        <EditorIndex Value="6"/>
    574564        <WindowIndex Value="0"/>
    575565        <TopLine Value="2"/>
    … …  
    580570      <Unit58>
    581571        <Filename Value="../ReadMe.txt"/>
    582         <EditorIndex Value="34"/>
     572        <EditorIndex Value="30"/>
    583573        <WindowIndex Value="0"/>
    584574        <TopLine Value="1"/>
    … …  
    591581        <Filename Value="../Specialized/ListByte.pas"/>
    592582        <UnitName Value="ListByte"/>
    593         <EditorIndex Value="15"/>
     583        <EditorIndex Value="13"/>
    594584        <WindowIndex Value="0"/>
    595585        <TopLine Value="1"/>
    … …  
    657647        <Filename Value="/usr/share/fpcsrc/packages/fcl-base/src/contnrs.pp"/>
    658648        <UnitName Value="contnrs"/>
    659         <EditorIndex Value="1"/>
    660649        <WindowIndex Value="0"/>
    661650        <TopLine Value="60"/>
    662651        <CursorPos X="26" Y="72"/>
    663652        <UsageCount Value="12"/>
    664         <Loaded Value="True"/>
    665653        <DefaultSyntaxHighlighter Value="Delphi"/>
    666654      </Unit67>
    667655      <Unit68>
    668656        <Filename Value="/usr/share/fpcsrc/rtl/inc/objpash.inc"/>
    669         <EditorIndex Value="17"/>
    670657        <WindowIndex Value="0"/>
    671658        <TopLine Value="160"/>
    672659        <CursorPos X="22" Y="177"/>
    673660        <UsageCount Value="10"/>
    674         <Loaded Value="True"/>
    675661        <DefaultSyntaxHighlighter Value="Delphi"/>
    676662      </Unit68>
    677663      <Unit69>
    678664        <Filename Value="/usr/share/fpcsrc/rtl/objpas/classes/stringl.inc"/>
    679         <EditorIndex Value="3"/>
    680665        <WindowIndex Value="0"/>
    681666        <TopLine Value="199"/>
    682667        <CursorPos X="3" Y="205"/>
    683668        <UsageCount Value="10"/>
    684         <Loaded Value="True"/>
    685669        <DefaultSyntaxHighlighter Value="Delphi"/>
    686670      </Unit69>
     671      <Unit70>
     672        <Filename Value="ListObject.pas"/>
     673        <IsPartOfProject Value="True"/>
     674        <UnitName Value="ListObject"/>
     675        <UsageCount Value="20"/>
     676        <DefaultSyntaxHighlighter Value="Delphi"/>
     677      </Unit70>
     678      <Unit71>
     679        <Filename Value="../Generic/ObjectListInterface.tpl"/>
     680        <EditorIndex Value="1"/>
     681        <WindowIndex Value="0"/>
     682        <TopLine Value="1"/>
     683        <CursorPos X="1" Y="5"/>
     684        <UsageCount Value="10"/>
     685        <Loaded Value="True"/>
     686        <DefaultSyntaxHighlighter Value="None"/>
     687      </Unit71>
     688      <Unit72>
     689        <Filename Value="../Generic/ObjectListImplementation.tpl"/>
     690        <IsVisibleTab Value="True"/>
     691        <EditorIndex Value="2"/>
     692        <WindowIndex Value="0"/>
     693        <TopLine Value="1"/>
     694        <CursorPos X="18" Y="1"/>
     695        <UsageCount Value="10"/>
     696        <Loaded Value="True"/>
     697        <DefaultSyntaxHighlighter Value="None"/>
     698      </Unit72>
    687699    </Units>
    688     <JumpHistory Count="30" HistoryIndex="28">
     700    <JumpHistory Count="25" HistoryIndex="24">
    689701      <Position1>
    690702        <Filename Value="UMainForm.pas"/>
    691         <Caret Line="374" Column="10" TopLine="344"/>
     703        <Caret Line="415" Column="1" TopLine="386"/>
    692704      </Position1>
    693705      <Position2>
    694706        <Filename Value="UMainForm.pas"/>
    695         <Caret Line="415" Column="1" TopLine="386"/>
     707        <Caret Line="367" Column="1" TopLine="351"/>
    696708      </Position2>
    697709      <Position3>
    698710        <Filename Value="UMainForm.pas"/>
    699         <Caret Line="367" Column="1" TopLine="351"/>
     711        <Caret Line="368" Column="1" TopLine="351"/>
    700712      </Position3>
    701713      <Position4>
    702714        <Filename Value="UMainForm.pas"/>
    703         <Caret Line="368" Column="1" TopLine="351"/>
     715        <Caret Line="363" Column="9" TopLine="341"/>
    704716      </Position4>
    705717      <Position5>
    706718        <Filename Value="UMainForm.pas"/>
    707         <Caret Line="363" Column="9" TopLine="341"/>
     719        <Caret Line="366" Column="7" TopLine="341"/>
    708720      </Position5>
    709721      <Position6>
    710722        <Filename Value="UMainForm.pas"/>
    711         <Caret Line="366" Column="7" TopLine="341"/>
     723        <Caret Line="367" Column="1" TopLine="341"/>
    712724      </Position6>
    713725      <Position7>
    714726        <Filename Value="UMainForm.pas"/>
    715         <Caret Line="367" Column="1" TopLine="341"/>
     727        <Caret Line="368" Column="1" TopLine="341"/>
    716728      </Position7>
    717729      <Position8>
    718730        <Filename Value="UMainForm.pas"/>
    719         <Caret Line="368" Column="1" TopLine="341"/>
     731        <Caret Line="364" Column="18" TopLine="348"/>
    720732      </Position8>
    721733      <Position9>
    722734        <Filename Value="UMainForm.pas"/>
    723         <Caret Line="364" Column="18" TopLine="348"/>
     735        <Caret Line="345" Column="5" TopLine="329"/>
    724736      </Position9>
    725737      <Position10>
    726738        <Filename Value="UMainForm.pas"/>
    727         <Caret Line="345" Column="5" TopLine="329"/>
     739        <Caret Line="346" Column="14" TopLine="329"/>
    728740      </Position10>
    729741      <Position11>
    730742        <Filename Value="UMainForm.pas"/>
    731         <Caret Line="346" Column="14" TopLine="329"/>
     743        <Caret Line="411" Column="23" TopLine="383"/>
    732744      </Position11>
    733745      <Position12>
    734746        <Filename Value="UMainForm.pas"/>
    735         <Caret Line="411" Column="23" TopLine="383"/>
     747        <Caret Line="407" Column="21" TopLine="383"/>
    736748      </Position12>
    737749      <Position13>
    738750        <Filename Value="UMainForm.pas"/>
    739         <Caret Line="407" Column="21" TopLine="383"/>
     751        <Caret Line="376" Column="19" TopLine="349"/>
    740752      </Position13>
    741753      <Position14>
    742         <Filename Value="UMainForm.pas"/>
    743         <Caret Line="376" Column="19" TopLine="349"/>
     754        <Filename Value="../Generic/DictionaryInterface.tpl"/>
     755        <Caret Line="26" Column="13" TopLine="1"/>
    744756      </Position14>
    745757      <Position15>
    746         <Filename Value="../Generic/DictionaryInterface.tpl"/>
    747         <Caret Line="26" Column="13" TopLine="1"/>
     758        <Filename Value="../Generic/DictionaryImplementation.tpl"/>
     759        <Caret Line="6" Column="3" TopLine="4"/>
    748760      </Position15>
    749761      <Position16>
    750         <Filename Value="../Generic/DictionaryImplementation.tpl"/>
    751         <Caret Line="6" Column="3" TopLine="4"/>
     762        <Filename Value="UMainForm.pas"/>
     763        <Caret Line="373" Column="8" TopLine="349"/>
    752764      </Position16>
    753765      <Position17>
    754766        <Filename Value="UMainForm.pas"/>
    755         <Caret Line="373" Column="8" TopLine="349"/>
     767        <Caret Line="412" Column="1" TopLine="383"/>
    756768      </Position17>
    757769      <Position18>
    758770        <Filename Value="UMainForm.pas"/>
    759         <Caret Line="412" Column="1" TopLine="383"/>
     771        <Caret Line="427" Column="24" TopLine="399"/>
    760772      </Position18>
    761773      <Position19>
    762774        <Filename Value="UMainForm.pas"/>
    763         <Caret Line="427" Column="24" TopLine="399"/>
     775        <Caret Line="427" Column="58" TopLine="399"/>
    764776      </Position19>
    765777      <Position20>
    766         <Filename Value="/usr/share/fpcsrc/rtl/objpas/classes/classesh.inc"/>
    767         <Caret Line="582" Column="53" TopLine="564"/>
     778        <Filename Value="UMainForm.pas"/>
     779        <Caret Line="367" Column="12" TopLine="350"/>
    768780      </Position20>
    769781      <Position21>
    770         <Filename Value="/usr/share/fpcsrc/rtl/objpas/classes/classesh.inc"/>
    771         <Caret Line="581" Column="57" TopLine="564"/>
     782        <Filename Value="UMainForm.pas"/>
     783        <Caret Line="428" Column="7" TopLine="411"/>
    772784      </Position21>
    773785      <Position22>
    774         <Filename Value="/usr/share/fpcsrc/rtl/objpas/classes/classesh.inc"/>
    775         <Caret Line="579" Column="53" TopLine="564"/>
     786        <Filename Value="UMainForm.pas"/>
     787        <Caret Line="349" Column="3" TopLine="332"/>
    776788      </Position22>
    777789      <Position23>
    778         <Filename Value="/usr/share/fpcsrc/rtl/objpas/classes/stringl.inc"/>
    779         <Caret Line="183" Column="8" TopLine="177"/>
     790        <Filename Value="UMainForm.pas"/>
     791        <Caret Line="428" Column="35" TopLine="411"/>
    780792      </Position23>
    781793      <Position24>
    782         <Filename Value="/usr/share/fpcsrc/rtl/objpas/classes/classesh.inc"/>
    783         <Caret Line="575" Column="71" TopLine="551"/>
     794        <Filename Value="UMainForm.pas"/>
     795        <Caret Line="432" Column="47" TopLine="411"/>
    784796      </Position24>
    785797      <Position25>
    786798        <Filename Value="UMainForm.pas"/>
    787         <Caret Line="427" Column="58" TopLine="399"/>
     799        <Caret Line="10" Column="25" TopLine="1"/>
    788800      </Position25>
    789       <Position26>
    790         <Filename Value="UMainForm.pas"/>
    791         <Caret Line="367" Column="12" TopLine="350"/>
    792       </Position26>
    793       <Position27>
    794         <Filename Value="UMainForm.pas"/>
    795         <Caret Line="428" Column="7" TopLine="411"/>
    796       </Position27>
    797       <Position28>
    798         <Filename Value="UMainForm.pas"/>
    799         <Caret Line="349" Column="3" TopLine="332"/>
    800       </Position28>
    801       <Position29>
    802         <Filename Value="UMainForm.pas"/>
    803         <Caret Line="428" Column="35" TopLine="411"/>
    804       </Position29>
    805       <Position30>
    806         <Filename Value="/usr/share/fpcsrc/rtl/objpas/classes/classesh.inc"/>
    807         <Caret Line="575" Column="14" TopLine="558"/>
    808       </Position30>
    809801    </JumpHistory>
    810802  </ProjectOptions>
    … …  
    815807    </Target>
    816808    <SearchPaths>
    817       <IncludeFiles Value="$(ProjOutDir)"/>
     809      <IncludeFiles Value="$(ProjOutDir)/"/>
    818810      <UnitOutputDirectory Value="lib/$(TargetCPU)-$(TargetOS)"/>
    819811    </SearchPaths>

  • Generics/TemplateGenerics/Demo/Demo.lpr

    r78 r82  
    88  {$ENDIF}{$ENDIF}
    99  Interfaces, // this includes the LCL widgetset
    10   Forms, SysUtils, UMainForm, TemplateGenerics;
     10  Forms, SysUtils, UMainForm, ListObject, TemplateGenerics;
    1111
    1212{$R *.res}

  • Generics/TemplateGenerics/ReadMe.txt

    r77 r82  
    22=================
    33
    4 Tutorial and informatin:
     4Tutorial and basic information:
    55  http://wiki.freepascal.org/Templates
    66
     7Version: 0.1
     8Release date: 2010-10-28
    79Author: Chronos
    810Email: robie@centrum.cz

  • Generics/TemplateGenerics/TemplateGenerics.lpk

    r80 r82  
    99      <PathDelim Value="\"/>
    1010      <SearchPaths>
    11         <OtherUnitFiles Value="Specialized"/>
     11        <OtherUnitFiles Value="Specialized\"/>
    1212        <UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS)"/>
    1313      </SearchPaths>
    … …  
    1717    </CompilerOptions>
    1818    <Version Minor="1"/>
    19     <Files Count="42">
     19    <Files Count="43">
    2020      <Item1>
    2121        <Filename Value="Generic\DictionaryImplementation.tpl"/>
    … …  
    5151      </Item8>
    5252      <Item9>
    53         <Filename Value="Specialized\ListObject.pas"/>
    54         <UnitName Value="ListObject"/>
     53        <Filename Value="Specialized\ListPointer.pas"/>
     54        <UnitName Value="ListPointer"/>
    5555      </Item9>
    5656      <Item10>
    57         <Filename Value="Specialized\ListPointer.pas"/>
    58         <UnitName Value="ListPointer"/>
     57        <Filename Value="Specialized\ListString.pas"/>
     58        <UnitName Value="ListString"/>
    5959      </Item10>
    6060      <Item11>
    61         <Filename Value="Specialized\ListString.pas"/>
    62         <UnitName Value="ListString"/>
     61        <Filename Value="Specialized\TreeInteger.pas"/>
     62        <UnitName Value="TreeInteger"/>
    6363      </Item11>
    6464      <Item12>
    65         <Filename Value="Specialized\TreeInteger.pas"/>
    66         <UnitName Value="TreeInteger"/>
     65        <Filename Value="Specialized\TreeObject.pas"/>
     66        <UnitName Value="TreeObject"/>
    6767      </Item12>
    6868      <Item13>
    69         <Filename Value="Specialized\TreeObject.pas"/>
    70         <UnitName Value="TreeObject"/>
     69        <Filename Value="Specialized\TreePointer.pas"/>
     70        <UnitName Value="TreePointer"/>
    7171      </Item13>
    7272      <Item14>
    73         <Filename Value="Specialized\TreePointer.pas"/>
    74         <UnitName Value="TreePointer"/>
     73        <Filename Value="Specialized\TreeString.pas"/>
     74        <UnitName Value="TreeString"/>
    7575      </Item14>
    7676      <Item15>
    77         <Filename Value="Specialized\TreeString.pas"/>
    78         <UnitName Value="TreeString"/>
     77        <Filename Value="Specialized\DictionaryStringString.pas"/>
     78        <UnitName Value="DictionaryStringString"/>
    7979      </Item15>
    8080      <Item16>
    81         <Filename Value="Specialized\DictionaryStringString.pas"/>
    82         <UnitName Value="DictionaryStringString"/>
     81        <Filename Value="Specialized\StackDouble.pas"/>
     82        <UnitName Value="StackDouble"/>
    8383      </Item16>
    8484      <Item17>
    85         <Filename Value="Specialized\StackDouble.pas"/>
    86         <UnitName Value="StackDouble"/>
     85        <Filename Value="Specialized\StackInteger.pas"/>
     86        <UnitName Value="StackInteger"/>
    8787      </Item17>
    8888      <Item18>
    89         <Filename Value="Specialized\StackInteger.pas"/>
    90         <UnitName Value="StackInteger"/>
     89        <Filename Value="Specialized\StackObject.pas"/>
     90        <UnitName Value="StackObject"/>
    9191      </Item18>
    9292      <Item19>
    93         <Filename Value="Specialized\StackObject.pas"/>
    94         <UnitName Value="StackObject"/>
     93        <Filename Value="Specialized\StackPointer.pas"/>
     94        <UnitName Value="StackPointer"/>
    9595      </Item19>
    9696      <Item20>
    97         <Filename Value="Specialized\StackPointer.pas"/>
    98         <UnitName Value="StackPointer"/>
     97        <Filename Value="Specialized\StackString.pas"/>
     98        <UnitName Value="StackString"/>
    9999      </Item20>
    100100      <Item21>
    101         <Filename Value="Specialized\StackString.pas"/>
    102         <UnitName Value="StackString"/>
     101        <Filename Value="Generic\StackImplementation.tpl"/>
     102        <Type Value="Text"/>
    103103      </Item21>
    104104      <Item22>
    105         <Filename Value="Generic\StackImplementation.tpl"/>
     105        <Filename Value="Generic\StackInterface.tpl"/>
    106106        <Type Value="Text"/>
    107107      </Item22>
    108108      <Item23>
    109         <Filename Value="Generic\StackInterface.tpl"/>
     109        <Filename Value="Generic\QueueImplementation.tpl"/>
    110110        <Type Value="Text"/>
    111111      </Item23>
    112112      <Item24>
    113         <Filename Value="Generic\QueueImplementation.tpl"/>
     113        <Filename Value="Generic\QueueInterface.tpl"/>
    114114        <Type Value="Text"/>
    115115      </Item24>
    116116      <Item25>
    117         <Filename Value="Generic\QueueInterface.tpl"/>
    118         <Type Value="Text"/>
     117        <Filename Value="Specialized\QueueDouble.pas"/>
     118        <UnitName Value="QueueDouble"/>
    119119      </Item25>
    120120      <Item26>
    121         <Filename Value="Specialized\QueueDouble.pas"/>
    122         <UnitName Value="QueueDouble"/>
     121        <Filename Value="Specialized\QueueInteger.pas"/>
     122        <UnitName Value="QueueInteger"/>
    123123      </Item26>
    124124      <Item27>
    125         <Filename Value="Specialized\QueueInteger.pas"/>
    126         <UnitName Value="QueueInteger"/>
     125        <Filename Value="Specialized\QueueObject.pas"/>
     126        <UnitName Value="QueueObject"/>
    127127      </Item27>
    128128      <Item28>
    129         <Filename Value="Specialized\QueueObject.pas"/>
    130         <UnitName Value="QueueObject"/>
     129        <Filename Value="Specialized\QueuePointer.pas"/>
     130        <UnitName Value="QueuePointer"/>
    131131      </Item28>
    132132      <Item29>
    133         <Filename Value="Specialized\QueuePointer.pas"/>
    134         <UnitName Value="QueuePointer"/>
     133        <Filename Value="Specialized\QueueString.pas"/>
     134        <UnitName Value="QueueString"/>
    135135      </Item29>
    136136      <Item30>
    137         <Filename Value="Specialized\QueueString.pas"/>
    138         <UnitName Value="QueueString"/>
     137        <Filename Value="Specialized\ListChar.pas"/>
     138        <UnitName Value="ListChar"/>
    139139      </Item30>
    140140      <Item31>
    141         <Filename Value="Specialized\ListChar.pas"/>
    142         <UnitName Value="ListChar"/>
     141        <Filename Value="ReadMe.txt"/>
     142        <Type Value="Text"/>
    143143      </Item31>
    144144      <Item32>
    145         <Filename Value="ReadMe.txt"/>
     145        <Filename Value="Generic\SetImplementation.tpl"/>
    146146        <Type Value="Text"/>
    147147      </Item32>
    148148      <Item33>
    149         <Filename Value="Generic\SetImplementation.tpl"/>
     149        <Filename Value="Generic\SetInterface.tpl"/>
    150150        <Type Value="Text"/>
    151151      </Item33>
    152152      <Item34>
    153         <Filename Value="Generic\SetInterface.tpl"/>
    154         <Type Value="Text"/>
     153        <Filename Value="Specialized\ListVariant.pas"/>
     154        <UnitName Value="ListVariant"/>
    155155      </Item34>
    156156      <Item35>
    157         <Filename Value="Specialized\ListVariant.pas"/>
    158         <UnitName Value="ListVariant"/>
     157        <Filename Value="Specialized\SetInteger.pas"/>
     158        <UnitName Value="SetInteger"/>
    159159      </Item35>
    160160      <Item36>
    161         <Filename Value="Specialized\SetInteger.pas"/>
    162         <UnitName Value="SetInteger"/>
     161        <Filename Value="Specialized\SetString.pas"/>
     162        <UnitName Value="SetString"/>
    163163      </Item36>
    164164      <Item37>
    165         <Filename Value="Specialized\SetString.pas"/>
    166         <UnitName Value="SetString"/>
     165        <Filename Value="Specialized\SetChar.pas"/>
     166        <UnitName Value="SetChar"/>
    167167      </Item37>
    168168      <Item38>
    169         <Filename Value="Specialized\SetChar.pas"/>
    170         <UnitName Value="SetChar"/>
     169        <Filename Value="Specialized\RangeDateTime.pas"/>
     170        <UnitName Value="RangeDateTime"/>
    171171      </Item38>
    172172      <Item39>
    173         <Filename Value="Specialized\RangeDateTime.pas"/>
    174         <UnitName Value="RangeDateTime"/>
     173        <Filename Value="Generic\RangeInterface.tpl"/>
     174        <Type Value="Text"/>
    175175      </Item39>
    176176      <Item40>
    177         <Filename Value="Generic\RangeInterface.tpl"/>
     177        <Filename Value="Generic\RangeImplementation.tpl"/>
    178178        <Type Value="Text"/>
    179179      </Item40>
    180180      <Item41>
    181         <Filename Value="Generic\RangeImplementation.tpl"/>
    182         <Type Value="Text"/>
     181        <Filename Value="Specialized\ListByte.pas"/>
     182        <UnitName Value="ListByte"/>
    183183      </Item41>
    184184      <Item42>
    185         <Filename Value="Specialized\ListByte.pas"/>
    186         <UnitName Value="ListByte"/>
     185        <Filename Value="Generic\ObjectListImplementation.tpl"/>
     186        <Type Value="Text"/>
    187187      </Item42>
     188      <Item43>
     189        <Filename Value="Generic\ObjectListInterface.tpl"/>
     190        <Type Value="Text"/>
     191      </Item43>
    188192    </Files>
    189193    <Type Value="RunAndDesignTime"/>

  • Generics/TemplateGenerics/TemplateGenerics.pas

    r80 r82  
    88
    99uses
    10     ListDouble, ListInteger, ListObject, ListPointer, ListString, TreeInteger,
    11   TreeObject, TreePointer, TreeString, DictionaryStringString, StackDouble,
    12   StackInteger, StackObject, StackPointer, StackString, QueueDouble,
    13   QueueInteger, QueueObject, QueuePointer, QueueString, ListChar, ListVariant,
    14   SetInteger, SetString, SetChar, RangeDateTime, ListByte, LazarusPackageIntf;
     10    ListDouble, ListInteger, ListPointer, ListString, TreeInteger, TreeObject,
     11  TreePointer, TreeString, DictionaryStringString, StackDouble, StackInteger,
     12  StackObject, StackPointer, StackString, QueueDouble, QueueInteger,
     13  QueueObject, QueuePointer, QueueString, ListChar, ListVariant, SetInteger,
     14  SetString, SetChar, RangeDateTime, ListByte, LazarusPackageIntf;
    1515
    1616implementation
Note: See TracChangeset for help on using the changeset viewer.