Changeset 4 for DelphiTemplates/Specialized
- Timestamp:
- Dec 8, 2011, 7:10:08 AM (13 years ago)
- Location:
- DelphiTemplates
- Files:
-
- 3 edited
Legend:
- Unmodified
- Added
- Removed
-
DelphiTemplates
-
Property svn:ignore
set to
*.dcu
-
Property svn:ignore
set to
-
DelphiTemplates/Specialized
-
Property svn:ignore
set to
*.dcu
-
Property svn:ignore
set to
-
DelphiTemplates/Specialized/ListString.pas
r2 r4 8 8 type 9 9 // TListString<Integer, String> 10 TGList Index = Integer;11 TGList Item = String;10 TGListStringIndex = Integer; 11 TGListStringItem = String; 12 12 {$DEFINE INTERFACE} 13 {$I 'GenericList .inc'}13 {$I 'GenericListString.inc'} 14 14 15 TListString = class(TGList )15 TListString = class(TGListString) 16 16 end; 17 17 … … 21 21 22 22 {$DEFINE IMPLEMENTATION_USES} 23 {$I 'GenericList .inc'}23 {$I 'GenericListString.inc'} 24 24 25 25 function StrToStr(Value: string): string; … … 29 29 30 30 {$DEFINE IMPLEMENTATION} 31 {$I 'GenericList .inc'}31 {$I 'GenericListString.inc'} 32 32 33 33
Note:
See TracChangeset
for help on using the changeset viewer.