Data Types

Src/Data/Myc.Data.Types.Text.pas

@@ -23,6 +23,7 @@ type
     private
         FValue: string;
         function GetDataType: IDataType;
+        function GetAsString: string;
         function GetValue: string;
     public
         constructor Create(const AValue: string);
@@ -65,6 +66,11 @@ begin
     Result := TImplDataTextType.Singleton;
 end;
 
+function TImplDataTextValue.GetAsString: string;
+begin
+    Result := FValue;
+end;
+
 function TImplDataTextValue.GetValue: string;
 begin
     Result := FValue;