添加测试代码

测试
2023-06-28 14:38:56 +08:00
parent e9f7ae4e50
commit 2768380032
9 changed files with 222 additions and 21 deletions
@@ -1846,7 +1846,8 @@ end
    end 
    function GetVCLdir();
    begin
-        return Getfuncextdir()+ioFileseparator()+"tvclib";
+        //return Getfuncextdir()+ioFileseparator()+"tvclib";
+        return Getfuncextdir();//+ioFileseparator()+"tvclib";
        return tsl;
    end
    function Getfuncextdir();