From a07586d942467ade2e83ecd5ce98eaff3c013835 Mon Sep 17 00:00:00 2001 From: csh Date: Thu, 10 Jul 2025 18:04:32 +0800 Subject: [PATCH] update test --- test/test.tsl | 16 +++++++++++++++- 1 file changed, 15 insertions(+), 1 deletion(-) diff --git a/test/test.tsl b/test/test.tsl index 1cf68b4..a145ac3 100644 --- a/test/test.tsl +++ b/test/test.tsl @@ -20,6 +20,8 @@ public property P1 write param1_ read param1_; private + [weakref]obj: integer; + [weakref]b: MyClass; param1_: real; param2_: array of string; end; @@ -30,7 +32,7 @@ end; function MyClass.Func3(a: real = 1; b: string = "123"): array of string; begin - obj.P1; + obj.P1.P2; self.P1; end @@ -70,3 +72,15 @@ b := array((1, 2), (3, 4)); sql += "update ts_xbcheck result set isvalid = "$status$remark$" where checkid in ('"$array2str (checkid[(i-1)*len:], "','")$"');\r\n" sql += + +// tsl-web块 + + + +

+ +

+ + + +