【结贴】如何使用字典类型dictionary[已经结束]

biglazy

x3中 如何使用字典类型 dictionary

biglazy

我都抓狂了 今天周六人真少 怎么没人回复我得帖子 都等半天了啊还是0回复～

shangxy

楼主说的太高深的，我没有接触过你说的东西，
能说说楼主的具体需求是什么样子的么？

biglazy

帮助文档中有DictionaryBase这个类的说明 好像是dictionary类的基类

NameSpace: System.Collections
--------------------------------------------------------------------------------
DictionaryBase = class(System.Object)
private
  hashtable: Hashtable;
  function System.Collections.ICollection.get_IsSynchronized: Boolean; maFinal; virtual; overload;
  function System.Collections.ICollection.get_SyncRoot: TObject; maFinal; virtual; overload;
  procedure System.Collections.IDictionary.Add(key: TObject; value: TObject); maFinal; virtual; overload;
  function System.Collections.IDictionary.Contains(key: TObject): Boolean; maFinal; virtual; overload;
  function System.Collections.IDictionary.get_IsFixedSize: Boolean; maFinal; virtual; overload;
  function System.Collections.IDictionary.get_IsReadOnly: Boolean; maFinal; virtual; overload;
  function System.Collections.IDictionary.get_Item(key: TObject): TObject; maFinal; virtual; overload;
  function System.Collections.IDictionary.get_Keys: ICollection; maFinal; virtual; overload;
  function System.Collections.IDictionary.get_Values: ICollection; maFinal; virtual; overload;
  procedure System.Collections.IDictionary.Remove(key: TObject); maFinal; virtual; overload;
  procedure System.Collections.IDictionary.set_Item(key: TObject; value: TObject); maFinal; virtual; overload;
  function System.Collections.IEnumerable.GetEnumerator: IEnumerator; maFinal; virtual; overload;
protected
  constructor create; overload;
  procedure OnClear; virtual; overload;
  procedure OnClearComplete; virtual; overload;
  function OnGet(key: TObject; currentValue: TObject): TObject; virtual; overload;
  procedure OnInsert(key: TObject; value: TObject); virtual; overload;
  procedure OnInsertComplete(key: TObject; value: TObject); virtual; overload;
  procedure OnRemove(key: TObject; value: TObject); virtual; overload;
  procedure OnRemoveComplete(key: TObject; value: TObject); virtual; overload;
  procedure OnSet(key: TObject; oldValue: TObject; newValue: TObject); virtual; overload;
  procedure OnSetComplete(key: TObject; oldValue: TObject; newValue: TObject); virtual; overload;
  procedure OnValidate(key: TObject; value: TObject); virtual; overload;
  property Dictionary: IDictionary; readonly;
  property InnerHashtable: Hashtable; readonly;
public
  procedure Clear; maFinal; virtual; overload;
  procedure CopyTo(array: System.Array; index: Longint); maFinal; virtual; overload;
  function GetEnumerator: IDictionaryEnumerator; maFinal; virtual; overload;
  property Count: Longint; readonly;
end;



还有IDictionary这个接口的说明

NameSpace: System.Collections
--------------------------------------------------------------------------------
IDictionary = interface
public
  procedure Add(key: TObject; value: TObject); virtual; overload;
  procedure Clear; virtual; overload;
  function Contains(key: TObject): Boolean; virtual; overload;
  function GetEnumerator: IDictionaryEnumerator; virtual; overload;
  procedure Remove(key: TObject); virtual; overload;
  property IsFixedSize: Boolean;
  property IsReadOnly: Boolean;
  property Item[TObject]: TObject;
  property Keys: ICollection;
  property Values: ICollection;
end;

但就是没有dictionary类的实现

biglazy

难道是没有实现吗 ?
先结贴了～