摘要: unit SrvUnit2;interfaceuses ComObj, ActiveX, AxCtrls, Classes, SrvEvent_TLB, StdVcl, Srvunit1;type TSimpleEventServer = class(TAutoObject, IConnecti... 阅读全文
posted @ 2014-10-04 21:44 Max Woods 阅读(851) 评论(0) 推荐(0) 编辑
摘要: 文笔不行,直接上源码:主窗口:unit Unit1;interfaceuses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Control... 阅读全文
posted @ 2014-10-04 21:37 Max Woods 阅读(2110) 评论(0) 推荐(0) 编辑