2011年5月9日 星期一

Action 相关组件(1): 纵览

万一| 万一的 Delphi 博客 |18:41:00

TAction //- TCustomAction- TContainedAction- TBasicAction- TComponent TActionList //- TCustomActionList- TComponent //其父类 TCustomActionList 包含一个 TContainedAction 类型的动作列表(Actions[]) TActionManager //- TCustomActionManager- TCustomAc...

Action 相关组件

万一| 万一的 Delphi 博客 |18:41:00

TAction //- TCustomAction- TContainedAction- TBasicAction- TComponent TActionList //- TCustomActionList- TComponent //其父类 TCustomActionList 包含一个 TContainedAction 类型的动作列表(Actions[]) TActionManager //- TCustomActionManager- TCustomAc...

让自己的列表类支持遍历

万一| 万一的 Delphi 博客 |13:19:00

一个普通的数字列表类(TNumList), 还没有支持遍历:unit NumList; interface uses SysUtils; type TNumList = class private FCount: Integer; FNumArray: array of Double; function GetNum(aIndex: Integer): Double; procedure SetNum(aInd...