Browse Source

* set ShortDateFormat explicitly so that StrToDate behaviour can be tested easily regardless of current locale

git-svn-id: trunk@29703 -
Tomas Hajny 10 years ago
parent
commit
46bfe5c1dd
1 changed files with 1 additions and 0 deletions
  1. 1 0
      tests/webtbs/tw3913.pp

+ 1 - 0
tests/webtbs/tw3913.pp

@@ -4,6 +4,7 @@ uses
 var
   d : tdatetime;
 begin
+  ShortDateFormat := 'd/m/y';
   try
     d:=strtodate('03'+dateseparator+'03'+dateseparator+'2033');
   except