浏览代码

small fix

Unknown 6 年之前
父节点
当前提交
75d5fb9af6
共有 1 个文件被更改,包括 4 次插入4 次删除
  1. 4 4
      Quick.Commons.pas

+ 4 - 4
Quick.Commons.pas

@@ -7,7 +7,7 @@
   Author      : Kike Pérez
   Author      : Kike Pérez
   Version     : 1.7
   Version     : 1.7
   Created     : 14/07/2017
   Created     : 14/07/2017
-  Modified    : 20/02/2019
+  Modified    : 27/02/2019
 
 
   This file is part of QuickLib: https://github.com/exilon/QuickLib
   This file is part of QuickLib: https://github.com/exilon/QuickLib
 
 
@@ -949,7 +949,7 @@ end;
           BuildStr := TNSString.Wrap(AppBundle.infoDictionary.objectForKey(AppKey));
           BuildStr := TNSString.Wrap(AppBundle.infoDictionary.objectForKey(AppKey));
           Result := UTF8ToString(BuildStr.UTF8String);
           Result := UTF8ToString(BuildStr.UTF8String);
         except
         except
-          Result := 'N/A';
+          Result := '';
         end;
         end;
       end;
       end;
       {$ENDIF}
       {$ENDIF}
@@ -1067,7 +1067,7 @@ end;
       end;
       end;
       {$ELSE}
       {$ELSE}
         begin
         begin
-          Result := 'N/A';
+          Result := '';
         end;
         end;
       {$ENDIF}
       {$ENDIF}
     {$ENDIF}
     {$ENDIF}
@@ -1099,7 +1099,7 @@ begin
   FmtSettings.DateSeparator := '-';
   FmtSettings.DateSeparator := '-';
   FmtSettings.TimeSeparator := ':';
   FmtSettings.TimeSeparator := ':';
   FmtSettings.ShortDateFormat := 'YYYY-MM-DD"T"HH:NN:SS.ZZZ" GMT"';
   FmtSettings.ShortDateFormat := 'YYYY-MM-DD"T"HH:NN:SS.ZZZ" GMT"';
-  Result := DateTimeToStr(aDate,FmtSettings);
+  Result := DateTimeToStr(aDate,FmtSettings).Trim;
 end;
 end;
 
 
 function GMTToDateTime(aDate : string) : TDateTime;
 function GMTToDateTime(aDate : string) : TDateTime;