一个例子,操作一个int型的属性typeTyourclass=class;privatea:integer;publishedproperty intnum:integer read a write a;end;