|
|
@@ -304,7 +304,7 @@ constructor TutlObservableCustomMap.Create(const aComparer: IComparer; const aOw |
|
|
begin |
|
|
begin |
|
|
fOnAddItem := TEventList.Create; |
|
|
fOnAddItem := TEventList.Create; |
|
|
fOnRemoveItem := TEventList.Create; |
|
|
fOnRemoveItem := TEventList.Create; |
|
|
fHashSetImpl := TObservableHashSet.Create(self, aComparer, aOwnsObjects); |
|
|
|
|
|
|
|
|
fHashSetImpl := TObservableHashSet.Create(self, TKeyValuePairComparer.Create(aComparer), aOwnsObjects); |
|
|
fHashSetImpl.OnAddItem := fOnAddItem; |
|
|
fHashSetImpl.OnAddItem := fOnAddItem; |
|
|
fHashSetImpl.OnRemoveItem := fOnRemoveItem; |
|
|
fHashSetImpl.OnRemoveItem := fOnRemoveItem; |
|
|
inherited Create(fHashSetImpl); |
|
|
inherited Create(fHashSetImpl); |
|
|
|