与其他类型不同,类类型必须在实例化之前声明并给定一个名称。有三种地方可以声明类类型:
1、在程序(program)的最外层声明类,在执行语句块的前面,而不能在过程或函数中声明.
示例:
program test;
//声明了一个名称为myClass的类类型
Type myClass = Class
//这里可以定义类的成员:字段、方法、属性
End;
Begin
//这里可以初始化并使用上面声明的类类型
C:=CreateObject("myClass");
End.
2、在主函数的后便声明,示例:
Function abcd();
Begin
A:=CreateObject("myClass");
End;
Type myClass = Class
End;
3、在非Program开头的TSL语句段后。
如:
…………..
A:=CreateObject("myClass");
…………
Type myClass = Class
End;
4、也可以在 "TSL解释器安装目录\funcext\" 下面或者在其下的子目录下建立一个同名的.tsf文件,在文件内部声明一个类类型,文件名和类名必须相同。如:把myClass的类类型放在 myClass.tsf文件中。这样可以被全局引用。