Ignore:
Timestamp:
Nov 17, 2010, 7:34:05 PM (14 years ago)
Author:
george
Message:
  • Added: Method Explode to create list items from string.
  • Modified: Definition for procedural type TGListStringConverter changed to TGListToStringConverter and TFListFromStringConverter.
  • Modified: Sepcialized unit ListObject renamed to SpecializedObjectList.
Location:
Generics/TemplateGenerics/Specialized
Files:
7 edited

Legend:

Unmodified
Added
Removed

  • Generics/TemplateGenerics/Specialized/SpecializedDictionary.pas

    r86 r91  
    1919{$DEFINE TGDictionaryList := TDictionaryList}
    2020{$DEFINE TGDictionarySortCompare := TDictionarySortCompareInteger}
    21 {$DEFINE TGDictionaryStringConverter := TDictionaryStringConverterInteger}
     21{$DEFINE TGDictionaryToStringConverter := TDictionaryToStringConverterInteger}
     22{$DEFINE TGDictionaryFromStringConverter := TDictionaryFromStringConverterInteger}
    2223{$DEFINE INTERFACE}
    2324{$I 'GenericDictionary.inc'}
    … …  
    3334{$DEFINE TGDictionaryList := TDictionaryList}
    3435{$DEFINE TGDictionarySortCompare := TDictionarySortCompareInteger}
    35 {$DEFINE TGDictionaryStringConverter := TDictionaryStringConverterInteger}
     36{$DEFINE TGDictionaryToStringConverter := TDictionaryToStringConverterInteger}
     37{$DEFINE TGDictionaryFromStringConverter := TDictionaryFromStringConverterInteger}
    3638{$DEFINE IMPLEMENTATION}
    3739{$I 'GenericDictionary.inc'}

  • Generics/TemplateGenerics/Specialized/SpecializedList.pas

    r86 r91  
    1616{$DEFINE TGList := TListInteger}
    1717{$DEFINE TGListSortCompare := TListIntegerSortCompare}
    18 {$DEFINE TGListStringConverter := TListIntegerStringConverter}
     18{$DEFINE TGListToStringConverter := TListIntegerToStringConverter}
     19{$DEFINE TGListFromStringConverter := TListIntegerFromStringConverter}
    1920{$DEFINE INTERFACE}
    2021{$I 'GenericList.inc'}
    … …  
    2526{$DEFINE TGList := TListSmallInt}
    2627{$DEFINE TGListSortCompare := TListSmallIntSortCompare}
    27 {$DEFINE TGListStringConverter := TListSmallIntStringConverter}
     28{$DEFINE TGListToStringConverter := TListSmallIntToStringConverter}
     29{$DEFINE TGListFromStringConverter := TListSmallIntFromStringConverter}
    2830{$DEFINE INTERFACE}
    2931{$I 'GenericList.inc'}
    … …  
    3436{$DEFINE TGList := TListDouble}
    3537{$DEFINE TGListSortCompare := TListDoubleSortCompare}
    36 {$DEFINE TGListStringConverter := TListDoubleStringConverter}
     38{$DEFINE TGListToStringConverter := TListDoubleToStringConverter}
     39{$DEFINE TGListFromStringConverter := TListDoubleFromStringConverter}
    3740{$DEFINE INTERFACE}
    3841{$INCLUDE '..\Generic\GenericList.inc'}
    … …  
    4346{$DEFINE TGList := TListPointer}
    4447{$DEFINE TGListSortCompare := TListPointerSortCompare}
    45 {$DEFINE TGListStringConverter := TListPointerStringConverter}
     48{$DEFINE TGListToStringConverter := TListPointerToStringConverter}
     49{$DEFINE TGListFromStringConverter := TListPointerFromStringConverter}
    4650{$DEFINE INTERFACE}
    4751{$I 'GenericList.inc'}
    … …  
    5256{$DEFINE TGList := TListString}
    5357{$DEFINE TGListSortCompare := TListStringSortCompare}
    54 {$DEFINE TGListStringConverter := TListStringStringConverter}
     58{$DEFINE TGListToStringConverter := TListStringToStringConverter}
     59{$DEFINE TGListFromStringConverter := TListStringFromStringConverter}
    5560{$DEFINE INTERFACE}
    5661{$I 'GenericList.inc'}
    … …  
    6166{$DEFINE TGList := TListByte}
    6267{$DEFINE TGListSortCompare := TListByteSortCompare}
    63 {$DEFINE TGListStringConverter := TListByteStringConverter}
     68{$DEFINE TGListToStringConverter := TListByteToStringConverter}
     69{$DEFINE TGListFromStringConverter := TListByteFromStringConverter}
    6470{$DEFINE INTERFACE}
    6571{$I 'GenericList.inc'}
    … …  
    7076{$DEFINE TGList := TListCharBase}
    7177{$DEFINE TGListSortCompare := TListSortCompareChar}
    72 {$DEFINE TGListStringConverter := TListStringConverterChar}
     78{$DEFINE TGListToStringConverter := TListToStringConverterChar}
     79{$DEFINE TGListFromStringConverter := TListFromStringConverterChar}
    7380{$DEFINE INTERFACE}
    7481{$I 'GenericList.inc'}
    … …  
    95102{$DEFINE TGList:=TListInteger}
    96103{$DEFINE TGListSortCompare:=TListIntegerSortCompare}
    97 {$DEFINE TGListStringConverter:=TListIntegerStringConverter}
     104{$DEFINE TGListToStringConverter:=TListIntegerToStringConverter}
     105{$DEFINE TGListFromStringConverter:=TListIntegerFromStringConverter}
    98106{$DEFINE IMPLEMENTATION}
    99107{$I 'GenericList.inc'}
    … …  
    104112{$DEFINE TGList:=TListSmallInt}
    105113{$DEFINE TGListSortCompare:=TListSmallIntSortCompare}
    106 {$DEFINE TGListStringConverter:=TListSmallIntStringConverter}
     114{$DEFINE TGListToStringConverter:=TListSmallIntToStringConverter}
     115{$DEFINE TGListFromStringConverter:=TListSmallIntFromStringConverter}
    107116{$DEFINE IMPLEMENTATION}
    108117{$I 'GenericList.inc'}
    … …  
    113122{$DEFINE TGList := TListDouble}
    114123{$DEFINE TGListSortCompare := TListDoubleSortCompare}
    115 {$DEFINE TGListStringConverter := TListDoubleStringConverter}
     124{$DEFINE TGListToStringConverter := TListDoubleToStringConverter}
     125{$DEFINE TGListFromStringConverter := TListDoubleFromStringConverter}
    116126{$DEFINE IMPLEMENTATION}
    117127{$I 'GenericList.inc'}
    … …  
    122132{$DEFINE TGList := TListPointer}
    123133{$DEFINE TGListSortCompare := TListPointerSortCompare}
    124 {$DEFINE TGListStringConverter := TListPointerStringConverter}
     134{$DEFINE TGListToStringConverter := TListPointerToStringConverter}
     135{$DEFINE TGListFromStringConverter := TListPointerFromStringConverter}
    125136{$DEFINE IMPLEMENTATION}
    126137{$I 'GenericList.inc'}
    … …  
    131142{$DEFINE TGList := TListString}
    132143{$DEFINE TGListSortCompare := TListStringSortCompare}
    133 {$DEFINE TGListStringConverter := TListStringStringConverter}
     144{$DEFINE TGListToStringConverter := TListStringToStringConverter}
     145{$DEFINE TGListFromStringConverter := TListStringFromStringConverter}
    134146{$DEFINE IMPLEMENTATION}
    135147{$I 'GenericList.inc'}
    … …  
    140152{$DEFINE TGList := TListByte}
    141153{$DEFINE TGListSortCompare := TListByteSortCompare}
    142 {$DEFINE TGListStringConverter := TListByteStringConverter}
     154{$DEFINE TGListToStringConverter := TListByteToStringConverter}
     155{$DEFINE TGListFromStringConverter := TListByteFromStringConverter}
    143156{$DEFINE IMPLEMENTATION}
    144157{$I 'GenericList.inc'}
    … …  
    149162{$DEFINE TGList := TListCharBase}
    150163{$DEFINE TGListSortCompare := TListSortCompareChar}
    151 {$DEFINE TGListStringConverter := TListStringConverterChar}
     164{$DEFINE TGListToStringConverter := TListToStringConverterChar}
     165{$DEFINE TGListFromStringConverter := TListFromStringConverterChar}
    152166{$DEFINE IMPLEMENTATION}
    153167{$I 'GenericList.inc'}

  • Generics/TemplateGenerics/Specialized/SpecializedObjectList.pas

    r87 r91  
    1717{$DEFINE TGObjectList := TListObject}
    1818{$DEFINE TGObjectListSortCompare := TObjectListSortCompareObject}
    19 {$DEFINE TGObjectListStringConverter := TObjectListStringConverterObject}
     19{$DEFINE TGObjectListToStringConverter := TObjectListToStringConverterObject}
     20{$DEFINE TGObjectListFromStringConverter := TObjectListFromStringConverterObject}
    2021{$DEFINE INTERFACE}
    2122{$I 'GenericObjectList.inc'}
    … …  
    3233{$DEFINE TGObjectList := TListObject}
    3334{$DEFINE TGObjectListSortCompare := TObjectListSortCompareObject}
    34 {$DEFINE TGObjectListStringConverter := TObjectListStringConverterObject}
     35{$DEFINE TGObjectListToStringConverter := TObjectListToStringConverterObject}
     36{$DEFINE TGObjectListFromStringConverter := TObjectListFromStringConverterObject}
    3537{$DEFINE IMPLEMENTATION}
    3638{$I 'GenericObjectList.inc'}

  • Generics/TemplateGenerics/Specialized/SpecializedQueue.pas

    r86 r91  
    1717{$DEFINE TGQueueList := TQueueListInteger}
    1818{$DEFINE TGQueueSortCompare := TQueueSortCompareInteger}
    19 {$DEFINE TGQueueStringConverter := TQueueStringConverterInteger}
     19{$DEFINE TGQueueToStringConverter := TQueueToStringConverterInteger}
     20{$DEFINE TGQueueFromStringConverter := TQueueFromStringConverterInteger}
    2021{$DEFINE INTERFACE}
    2122{$I 'GenericQueue.inc'}
    … …  
    2728{$DEFINE TGQueueList := TQueueListPointer}
    2829{$DEFINE TGQueueSortCompare := TQueueSortComparePointer}
    29 {$DEFINE TGQueueStringConverter := TQueueStringConverterPointer}
     30{$DEFINE TGQueueToStringConverter := TQueueToStringConverterPointer}
     31{$DEFINE TGQueueFromStringConverter := TQueueFromStringConverterPointer}
    3032{$DEFINE INTERFACE}
    3133{$I 'GenericQueue.inc'}
    … …  
    3739{$DEFINE TGQueueList := TQueueListByte}
    3840{$DEFINE TGQueueSortCompare := TQueueSortCompareByte}
    39 {$DEFINE TGQueueStringConverter := TQueueStringConverterByte}
     41{$DEFINE TGQueueToStringConverter := TQueueToStringConverterByte}
     42{$DEFINE TGQueueFromStringConverter := TQueueFromStringConverterByte}
    4043{$DEFINE INTERFACE}
    4144{$I 'GenericQueue.inc'}
    … …  
    5255{$DEFINE TGQueueList := TQueueListInteger}
    5356{$DEFINE TGQueueSortCompare := TQueueSortCompareInteger}
    54 {$DEFINE TGQueueStringConverter := TQueueStringConverterInteger}
     57{$DEFINE TGQueueToStringConverter := TQueueToStringConverterInteger}
     58{$DEFINE TGQueueFromStringConverter := TQueueFromStringConverterInteger}
    5559{$DEFINE IMPLEMENTATION}
    5660{$I '..\Generic\GenericQueue.inc'}
    … …  
    6266{$DEFINE TGQueueList := TQueueListPointer}
    6367{$DEFINE TGQueueSortCompare := TQueueSortComparePointer}
    64 {$DEFINE TGQueueStringConverter := TQueueStringConverterPointer}
     68{$DEFINE TGQueueToStringConverter := TQueueToStringConverterPointer}
     69{$DEFINE TGQueueFromStringConverter := TQueueFromStringConverterPointer}
    6570{$DEFINE IMPLEMENTATION}
    6671{$I 'GenericQueue.inc'}
    … …  
    7277{$DEFINE TGQueueList := TQueueListByte}
    7378{$DEFINE TGQueueSortCompare := TQueueSortCompareByte}
    74 {$DEFINE TGQueueStringConverter := TQueueStringConverterByte}
     79{$DEFINE TGQueueToStringConverter := TQueueToStringConverterByte}
     80{$DEFINE TGQueueFromStringConverter := TQueueFromStringConverterByte}
    7581{$DEFINE IMPLEMENTATION}
    7682{$I 'GenericQueue.inc'}

  • Generics/TemplateGenerics/Specialized/SpecializedSet.pas

    r86 r91  
    1717{$DEFINE TGSet := TSetInteger}
    1818{$DEFINE TGSetSortCompare := TSetSortCompareInteger}
    19 {$DEFINE TGSetStringConverter := TSetStringConverterInteger}
     19{$DEFINE TGSetToStringConverter := TSetToStringConverterInteger}
     20{$DEFINE TGSetFromStringConverter := TSetFromStringConverterInteger}
    2021{$DEFINE INTERFACE}
    2122{$I 'GenericSet.inc'}
    … …  
    2728{$DEFINE TGSet := TSetPointer}
    2829{$DEFINE TGSetSortCompare := TSetSortComparePointer}
    29 {$DEFINE TGSetStringConverter := TSetStringConverterPointer}
     30{$DEFINE TGSetToStringConverter := TSetToStringConverterPointer}
     31{$DEFINE TGSetFromStringConverter := TSetFromStringConverterPointer}
    3032{$DEFINE INTERFACE}
    3133{$I 'GenericSet.inc'}
    … …  
    4244{$DEFINE TGSet := TSetInteger}
    4345{$DEFINE TGSetSortCompare := TSetSortCompareInteger}
    44 {$DEFINE TGSetStringConverter := TSetStringConverterInteger}
     46{$DEFINE TGSetToStringConverter := TSetToStringConverterInteger}
     47{$DEFINE TGSetFromStringConverter := TSetFromStringConverterInteger}
    4548{$DEFINE IMPLEMENTATION}
    4649{$I 'GenericSet.inc'}
    … …  
    5255{$DEFINE TGSet := TSetPointer}
    5356{$DEFINE TGSetSortCompare := TSetSortComparePointer}
    54 {$DEFINE TGSetStringConverter := TSetStringConverterPointer}
     57{$DEFINE TGSetToStringConverter := TSetToStringConverterPointer}
     58{$DEFINE TGSetFromStringConverter := TSetFromStringConverterPointer}
    5559{$DEFINE IMPLEMENTATION}
    5660{$I 'GenericSet.inc'}

  • Generics/TemplateGenerics/Specialized/SpecializedStack.pas

    r86 r91  
    1717{$DEFINE TGStack := TStackInteger}
    1818{$DEFINE TGStackSortCompare := TStackSortCompareInteger}
    19 {$DEFINE TGStackStringConverter := TStackStringConverterInteger}
     19{$DEFINE TGStackToStringConverter := TStackToStringConverterInteger}
     20{$DEFINE TGStackFromStringConverter := TStackFromStringConverterInteger}
    2021{$DEFINE INTERFACE}
    2122{$I 'GenericStack.inc'}
    … …  
    2728{$DEFINE TGStack := TStackPointer}
    2829{$DEFINE TGStackSortCompare := TStackSortComparePointer}
    29 {$DEFINE TGStackStringConverter := TStackStringConverterPointer}
     30{$DEFINE TGStackToStringConverter := TStackToStringConverterPointer}
     31{$DEFINE TGStackFromStringConverter := TStackFromStringConverterPointer}
    3032{$DEFINE INTERFACE}
    3133{$I 'GenericStack.inc'}
    … …  
    4345{$DEFINE TGStack := TStackInteger}
    4446{$DEFINE TGStackSortCompare := TStackSortCompareInteger}
    45 {$DEFINE TGStackStringConverter := TStackStringConverterInteger}
     47{$DEFINE TGStackToStringConverter := TStackToStringConverterInteger}
     48{$DEFINE TGStackFromStringConverter := TStackFromStringConverterInteger}
    4649{$DEFINE IMPLEMENTATION}
    4750{$I 'GenericStack.inc'}
    … …  
    5356{$DEFINE TGStack := TStackPointer}
    5457{$DEFINE TGStackSortCompare := TStackSortComparePointer}
    55 {$DEFINE TGStackStringConverter := TStackStringConverterPointer}
     58{$DEFINE TGStackToStringConverter := TStackToStringConverterPointer}
     59{$DEFINE TGStackFromStringConverter := TStackFromStringConverterPointer}
    5660{$DEFINE IMPLEMENTATION}
    5761{$I 'GenericStack.inc'}

  • Generics/TemplateGenerics/Specialized/SpecializedTree.pas

    r86 r91  
    1717{$DEFINE TGTreeNodeList := TTreeNodeListInteger}
    1818{$DEFINE TGTreeSortCompare := TTreeSortCompareInteger}
    19 {$DEFINE TGTreeStringConverter := TTreeStringConverterInteger}
     19{$DEFINE TGTreeToStringConverter := TTreeToStringConverterInteger}
     20{$DEFINE TGTreeFromStringConverter := TTreeFromStringConverterInteger}
    2021{$DEFINE INTERFACE}
    2122{$I 'GenericTree.inc'}
    … …  
    2829{$DEFINE TGTreeNodeList := TTreeNodeListString}
    2930{$DEFINE TGTreeSortCompare := TTreeSortCompareString}
    30 {$DEFINE TGTreeStringConverter := TTreeStringConverterString}
     31{$DEFINE TGTreeToStringConverter := TTreeToStringConverterString}
     32{$DEFINE TGTreeFromStringConverter := TTreeFromStringConverterString}
    3133{$DEFINE INTERFACE}
    3234{$I 'GenericTree.inc'}
    … …  
    3941{$DEFINE TGTreeNodeList := TTreeNodeListPointer}
    4042{$DEFINE TGTreeSortCompare := TTreeSortComparePointer}
    41 {$DEFINE TGTreeStringConverter := TTreeStringConverterPointer}
     43{$DEFINE TGTreeToStringConverter := TTreeToStringConverterPointer}
     44{$DEFINE TGTreeFromStringConverter := TTreeFromStringConverterPointer}
    4245{$DEFINE INTERFACE}
    4346{$I 'GenericTree.inc'}
    … …  
    5558{$DEFINE TGTreeNodeList := TTreeNodeListInteger}
    5659{$DEFINE TGTreeSortCompare := TTreeSortCompareInteger}
    57 {$DEFINE TGTreeStringConverter := TTreeStringConverterInteger}
     60{$DEFINE TGTreeToStringConverter := TTreeToStringConverterInteger}
     61{$DEFINE TGTreeFromStringConverter := TTreeFromStringConverterInteger}
    5862{$DEFINE IMPLEMENTATION}
    5963{$I 'GenericTree.inc'}
    … …  
    6670{$DEFINE TGTreeNodeList := TTreeNodeListString}
    6771{$DEFINE TGTreeSortCompare := TTreeSortCompareString}
    68 {$DEFINE TGTreeStringConverter := TTreeStringConverterString}
     72{$DEFINE TGTreeToStringConverter := TTreeToStringConverterString}
     73{$DEFINE TGTreeFromStringConverter := TTreeFromStringConverterString}
    6974{$DEFINE IMPLEMENTATION}
    7075{$I 'GenericTree.inc'}
    … …  
    7782{$DEFINE TGTreeNodeList := TTreeNodeListPointer}
    7883{$DEFINE TGTreeSortCompare := TTreeSortComparePointer}
    79 {$DEFINE TGTreeStringConverter := TTreeStringConverterPointer}
     84{$DEFINE TGTreeToStringConverter := TTreeToStringConverterPointer}
     85{$DEFINE TGTreeFromStringConverter := TTreeFromStringConverterPointer}
    8086{$DEFINE IMPLEMENTATION}
    8187{$I 'GenericTree.inc'}
Note: See TracChangeset for help on using the changeset viewer.