v2.1.1 大量更新,功能性更新见readme

This commit is contained in:
csh
2025-05-30 14:44:32 +08:00
parent f816e8b6e3
commit b7a7b983b3
20 changed files with 25299 additions and 13986 deletions
+7 -7
View File
@@ -1,6 +1,6 @@
type VBABase = class
public
function Create(Par: tslobj; App: Application; Cre: integer);
function Create(_parent: tslobj; _application: Application; _creator: integer);
public
property Application read ReadApplication;
@@ -9,19 +9,19 @@ public
function ReadApplication();
function ReadParent();
function ReadCreator();
private
[weakref]parent_: tslobj;
[weakref]application_: Application;
creator_: integer;
End;
end;
// ============== 实现 ================= //
function VBABase.Create(Par: tslobj; App: Application; Cre: integer);
function VBABase.Create(_parent: tslobj; _application: Application; _creator: integer);
begin
parent_ := Par;
application_ := App;
creator_ := Cre;
parent_ := _parent;
application_ := _application;
creator_ := _creator;
end;
// properties