定义对象的属性，详细内容见面向对象TSL。
  语法：Property A[:String] read GETA write SETA;
     Property A[:String] Index 1 read GETA Write SETA;