摘要: 高版本DELPHI提供的匿名方法,如果使用的好,可有效地节省代码。 procedure TCMServerForm.CMServerTransportDisconnectEvent(Event: TDSTCPDisconnectEventObject);var Index: Integer;begi 阅读全文
posted @ 2016-07-14 15:58 delphi中间件 阅读(2272) 评论(0) 推荐(0) 编辑
摘要: 在WINDOWS里面使用临界来保护多线程需要访问的共享对象,现在,DELPHI有了新的跨平台临界保护者--System.TMonitor 代码演示如下: FConnections := TObjectDictionary<TIdTCPConnection,TDSTCPChannel>.Create; 阅读全文
posted @ 2016-07-14 15:54 delphi中间件 阅读(2605) 评论(0) 推荐(0) 编辑