Bläddra i källkod

* fixed bug in observable map: used wrong comperator

master
Bergmann89 10 år sedan
förälder
incheckning
9055037754
2 ändrade filer med 2 tillägg och 2 borttagningar
  1. +1
    -1
      uutlGenerics.pas
  2. +1
    -1
      uutlObservableGenerics.pas

+ 1
- 1
uutlGenerics.pas Visa fil

@@ -1466,7 +1466,7 @@ end;
constructor TutlMapBase.Create(const aHashSet: THashSet);
begin
inherited Create;
fHashSetRef := aHashSet;
fHashSetRef := aHashSet;
fKeyWrapper := TKeyWrapper.Create(fHashSetRef);
fKeyValuePairWrapper := TKeyValuePairWrapper.Create(fHashSetRef);
end;


+ 1
- 1
uutlObservableGenerics.pas Visa fil

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


Laddar…
Avbryt
Spara