创建用户自定义的类型,定义一个类遇到别的开始,遇到function和procedure,var其它声明出现,例如全局变量、公共函数等,或者implementationtype后面的第一个end是结束再一个type 再定义一个类type和end之间可以有多个type