Changeset 235


Ignore:
Timestamp:
Apr 22, 2011, 9:22:40 AM (13 years ago)
Author:
george
Message:
 
File:
1 edited

Legend:

Unmodified
Added
Removed
  • Generics/DelphiTemplates/Specialized/ListString.pas

    r234 r235  
    1616  end;
    1717
     18function StrToStr(Value: string): string;
     19
    1820implementation
    1921
    2022{$DEFINE IMPLEMENTATION_USES}
    2123{$I 'GenericList.inc'}
     24
     25function StrToStr(Value: string): string;
     26begin
     27  Result := Value;
     28end;
    2229
    2330{$DEFINE IMPLEMENTATION}
Note: See TracChangeset for help on using the changeset viewer.