支持在类中引用单元,并在类的成员方法中调用该单元的方法。
引用单元方法:在类定义中通过uses Unitname1,Unitname2,...;方式引用指定单元,然后在类的成员方法中直接调用单元函数。
如:
t:=new T1();
t.testuses();
Type T1=class
uses unit1;//类定义中允许引用单元
function testuses()
begin
unitfunc();//可以直接访问类申明已经uses的单元的函数
end;
end;
unit unit1;
interface
Function unitfunc();
implementation
function unitfunc();
begin
echo "unit1 unitfunc\r\n";
end;
end.