浏览代码

tests: fix compilation for platforms without activeX

git-svn-id: trunk@15141 -
paul 15 年之前
父节点
当前提交
be1ba05a4c
共有 1 个文件被更改,包括 1 次插入1 次删除
  1. 1 1
      tests/webtbs/tw16161.pp

+ 1 - 1
tests/webtbs/tw16161.pp

@@ -6,7 +6,7 @@ program tw16161;
 {$apptype console}
 {$apptype console}
 
 
 uses
 uses
-  Classes, ActiveX;
+  Classes, {$ifdef fpc}Types{$else}ActiveX{$endif};
 
 
 var
 var
   Stream1: TMemoryStream;
   Stream1: TMemoryStream;