self.修改为{self,},提高执行效率
This commit is contained in:
@@ -22,7 +22,7 @@ end;
|
||||
|
||||
function TSComponentsBase.OpenFile(alias: string; file: string; password: string): tableArray;
|
||||
begin
|
||||
self.Init();
|
||||
{self.}Init();
|
||||
zipfile_ := new ZipFile();
|
||||
return zipfile_.Open(alias, file, password);
|
||||
end;
|
||||
@@ -42,7 +42,7 @@ begin
|
||||
begin
|
||||
node := xml.FirstChild(conf_[_name][1]);
|
||||
if not ifObj(node) then raise (name $ " error.");
|
||||
_variable := self.NewObject(_name);
|
||||
_variable := {self.}NewObject(_name);
|
||||
_variable.InitNode(node);
|
||||
end
|
||||
end
|
||||
@@ -59,7 +59,7 @@ begin
|
||||
while ifObj(xml) do
|
||||
begin
|
||||
node := xml.FirstChild(conf_[_name][1]);
|
||||
obj := self.NewObject(_name);
|
||||
obj := {self.}NewObject(_name);
|
||||
obj.InitNode(node);
|
||||
_variable[length(_variable)] := obj;
|
||||
name := Format(conf_[_name][0], ++ind);
|
||||
@@ -70,7 +70,7 @@ begin
|
||||
if ifnil(_variable[_index]) then
|
||||
begin
|
||||
obj := nil;
|
||||
self.SetProp(obj, _name, _index + 1);
|
||||
{self.}SetProp(obj, _name, _index + 1);
|
||||
_variable[_index] := obj;
|
||||
end
|
||||
return _variable[_index];
|
||||
|
||||
Reference in New Issue
Block a user