Lines Matching refs:Key
104 function GetItem(const Key: TKey): TValue;
105 procedure SetItem(const Key: TKey; const Value: TValue);
108 procedure Add(const Key: TKey; const Value: TValue);
109 procedure Remove(const Key: TKey);
112 function TryGetValue(const Key: TKey; out Value: TValue): Boolean;
113 procedure AddOrSetValue(const Key: TKey; const Value: TValue);
114 function ContainsKey(const Key: TKey): Boolean;
121 property Items[const Key: TKey]: TValue read GetItem write SetItem; default;
168 procedure THashList<TKey, TValue>.Add(const Key: TKey; const Value: TValue);
170 FDictionary.Add(Key, Value);
171 FInsertionOrderList.Add(Key);
175 procedure THashList<TKey, TValue>.AddOrSetValue(const Key: TKey;
178 if FDictionary.ContainsKey(Key) then
179 SetItem(Key, Value)
181 Add(Key, Value);
191 function THashList<TKey, TValue>.ContainsKey(const Key: TKey): Boolean;
193 Result := FDictionary.ContainsKey(Key);
232 function THashList<TKey, TValue>.GetItem(const Key: TKey): TValue;
234 Result := FDictionary[Key];
237 procedure THashList<TKey, TValue>.Remove(const Key: TKey);
239 FDictionary.Remove(Key);
240 FInsertionOrderList.Remove(Key);
244 procedure THashList<TKey, TValue>.SetItem(const Key: TKey; const Value: TValue);
248 IsNewEntry := (not FDictionary.ContainsKey(Key));
249 FDictionary[Key] := Value;
251 FInsertionOrderList.Add(Key);
261 function THashList<TKey, TValue>.TryGetValue(const Key: TKey;
264 Result := FDictionary.TryGetValue(Key,Value);
299 FPair.Key := FOrderList[FIndex];
300 FPair.Value := FHashList[FPair.Key];
306 FPair.Key := Default(TKey);
352 SB.AppendFormat('%d=%s', [E.Key, ListToString(E.Value)]);
