2016年6月22日
TMultiReadExclusiveWriteSynchronizer多读一写类
摘要： http://blog.csdn.net/bambuz/article/details/6023151 http://blog.csdn.net/gencheng/article/details/8137537 類 TMultiReadExclusiveWriteSynchronizer(多讀一寫同 阅读全文
posted @ 2016-06-22 21:25 海蓝7 阅读(348) 评论(0) 推荐(0) 编辑
鉴赏TThreadList 类在LockList和UnlockList 用到TMonitor.Enter(FLock);
摘要： TThreadList = class private FList: TList; FLock: TObject; FDuplicates: TDuplicates; public constructor Create; destructor Destroy; override; procedure Add(Item: Pointer)... 阅读全文
posted @ 2016-06-22 21:18 海蓝7 阅读(695) 评论(0) 推荐(0) 编辑
TCriticalSection用法
摘要： ReadLocker : TCriticalSection; ReadLocker := TCriticalSection.Create; ReadLocker.Enter; //锁住你想保护的代码 //至于是否在线程中，有待考究，目前看有些代码不在线程中也这样用它，为何？ ReadLocker.Leave; if Assigned(ReadLocker) then FreeAndNil(R... 阅读全文
posted @ 2016-06-22 20:26 海蓝7 阅读(1203) 评论(0) 推荐(0) 编辑
转-临界区对象TCriticalSection与TRTLCriticalSection的区别
摘要： TRTLCriticalSection是一个结构体，在windows单元中定义； 是InitializeCriticalSection， EnterCriticalSection， LeaveCriticalSection, DeleteCriticalSection 等这几个kernel32.dll中的临界区操作API的参数； TCriticalSection是在SyncOb... 阅读全文
posted @ 2016-06-22 20:19 海蓝7 阅读(867) 评论(0) 推荐(0) 编辑
控件-TMS-TGridPanel-自动按比例划分界面
摘要： object grdpnlAdd: TGridPanel Left = 0 Top = 0 Width = 894 Height = 572 Align = alClient BevelOuter = bvNone BorderWidth = 1 Color = 16509661 ColumnCol 阅读全文
posted @ 2016-06-22 19:53 海蓝7 阅读(266) 评论(0) 推荐(0) 编辑
控件-TCheckListBox-可以存对象，实现勾选表头显示和隐藏列
摘要： object CheckListBox1: TCheckListBox Left = 0 Top = 0 Width = 468 Height = 235 Align = alClient ImeName = #20013#25991' - QQ'#20116#31508#36755#20837#27861 ItemHeight = 1... 阅读全文
posted @ 2016-06-22 17:45 海蓝7 阅读(894) 评论(0) 推荐(0) 编辑