摘要: 转自于:http://www.cnblogs.com/findumars/p/3847804.html 有意思的RTL函数RegisterClass(在持久化中,你生成的一个新类的对象,系统并不知道他是如何来的,因此需要你注册)good 例子1:Delphi中使用纯正的面向对象方法(这个例子最直接) 阅读全文
posted @ 2017-09-14 09:16 绿水青山777 阅读(258) 评论(0) 推荐(0) 编辑
摘要: procedure TfrmBiaoBLBWH.Button1Click(Sender: TObject);var ABinary,AText:TMemoryStream;begin inherited; ABinary:=TMemoryStream.Create; ABinary.WriteCom 阅读全文
posted @ 2017-09-14 08:59 绿水青山777 阅读(156) 评论(0) 推荐(0) 编辑