2013年12月16日

delphi 序列化控件
摘要： function ComponentToStr(AComponent: TComponent): string;var BinStream: TMemoryStream; StrStream: TStringStream; s: string;begin BinStream := TMemoryStream.Create; try StrStream := TStringStream.Create(s); try BinStream.WriteComponent(AComponent); BinStream.Seek(0, soFromBeginnin... 阅读全文
posted @ 2013-12-16 08:57 867511789 阅读(393) 评论(0) 推荐(0)

导航