Changeset 235 for Generics

Timestamp:

Apr 22, 2011, 9:22:40 AM (14 years ago)

Author:

george

Message:

 

File:

• Generics/DelphiTemplates/Specialized/ListString.pas (modified) (1 diff)

Generics/DelphiTemplates/Specialized/ListString.pas

@@ -16 +16 @@
   end;
 
+function StrToStr(Value: string): string;
+
 implementation
 
 {$DEFINE IMPLEMENTATION_USES}
 {$I 'GenericList.inc'}
+
+function StrToStr(Value: string): string;
+begin
+  Result := Value;
+end;
 
 {$DEFINE IMPLEMENTATION}