Changeset 85 for Generics


Ignore:
Timestamp:
Oct 31, 2010, 5:57:12 PM (14 years ago)
Author:
george
Message:
File:
1 edited

Legend:

Unmodified
Added
Removed

  • Generics/TemplateGenerics/Generic/GenericObjectList.inc

    r84 r85  
    55{$DEFINE TGList := TGObjectListList}
    66{$DEFINE TGListSortCompare := TGObjectListSortCompare}
    7 {$DEFINE TGListStringConverter := TObjectListStringConverter}
     7{$DEFINE TGListStringConverter := TGObjectListStringConverter}
    88{$DEFINE INTERFACE}
    99{$INCLUDE 'GenericList.inc'}
    … …  
    2424{$ENDIF}
    2525
     26{$IFDEF IMPLEMENTATION_USES}
     27
     28  {$DEFINE IMPLEMENTATION_USES}
     29  {$INCLUDE '..\Generic\GenericList.inc'}
     30
     31{$UNDEF IMPLEMENTATION_USES}
     32{$ENDIF}
     33
    2634{$IFDEF IMPLEMENTATION}
    27 
    28 {$UNDEF IMPLEMENTATION}
    29 {$DEFINE IMPLEMENTATION_USES}
    30 {$INCLUDE '..\Generic\GenericList.inc'}
    3135
    3236{$DEFINE TGListIndex := TGObjectListIndex}
    … …  
    3438{$DEFINE TGList := TGObjectListList}
    3539{$DEFINE TGListSortCompare := TGObjectListSortCompare}
    36 {$DEFINE TGListStringConverter := TObjectListStringConverter}
     40{$DEFINE TGListStringConverter := TGObjectListStringConverter}
    3741{$DEFINE IMPLEMENTATION}
    3842{$INCLUDE 'GenericList.inc'}
Note: See TracChangeset for help on using the changeset viewer.