* fix test for windows

git-svn-id: trunk@40091 -

tests/webtbs/tw34442.pp

@@ -3,7 +3,12 @@
 {$mode delphi}
 
 uses
-  sysutils;
+  sysutils
+{$ifdef WINDOWS}
+  ,windows
+{$endif WINDOWS}
+  ;
+
 
 {$define use_inline }