Data Types

Src/Data/Myc.Data.Types.Timestamp.pas

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