摘要： Unit uOTSObject;InterfaceUses Windows, SysUtils, Classes, Contnrs, Global;Type TOTSObjectList = Class; TOTSObject = Class(TPersistent) { 基类，没啥用 } Protected FDisplayName: String; FDisplayId: String; Published Public Constructor Create; Property DisplayId: String Read FDisplayId Write FDisplayId;... 阅读全文