Einzelnen Beitrag anzeigen

Benutzerbild von Sir Rufo
Sir Rufo

Registriert seit: 5. Jan 2005
Ort: Stadthagen
9.454 Beiträge
 
Delphi 10 Seattle Enterprise
 
#11

AW: TObjectList<T> und Comparer

  Alt 27. Jan 2015, 15:30
Häh? Beim TComparer<T> ? Wo ist denn da was mit einem Hasher? Das kenne ich nur beim TEqualityComparer<T> und das wird z.B. für ein Dictionary benötigt.
Nunja... Ein Druck auf F1, während der Cursor auf einem frisch eingegebenen "TComparer<T>.Construct" steht, führt zum TEqualityComparer. Hab mich auch gefragt, was das wohl mit dem THasher da sein soll, bin aber davon ausgegangen, das der dann wohl optional ist und ein Standard-Hasher genommen wird. Insgesamt ist die OH von XE4 - vorsichtig ausgedrückt - Schrott. Aber einen direkten Weg wie im Visual Studio, wo es direkt ins MSDN geht, ist nicht vorgesehen oder ich habs verkehrt eingestellt. Womit sich die Frage stellt, wo man das einstellt...

Wie dem auch sei, ich hab einiges dazugelernt. So ist
Delphi-Quellcode:
var
   TCo: IComparer<TPosition>;
begin
   FPositions.Sort(TCo);
end;
natürlich Unsinn. Sort weiß ja wirklich nicht, das mein Comparer aufgerufen werden soll, weil TCo=nil. Also gehört da ein TCo:=TPositionComparer.Create; davor. Und genau das ist wohl das verwirrende: Ich muß ein TComparePosition aufrufen, um einen IComparer zu instantiieren.

So langsam raffe ich das Zeug.
Man mag es kaum glauben, aber eine Instanz erzeugt man bei Delphi, wenn man den Konstruktor der Klasse aufruft (es gibt noch andere Wege, aber das ist der klassische Weg).

Und das T davor hat nichts zu sagen, denn es ist einfach nur ein Zeichen, jedes andere Zeichen ist genausogut. Wichtig ist nur, dass ich den exakten Bezeichner der Klasse und nicht die Instanz-Variable benutze.
Delphi-Quellcode:
Foo = class
end;

var
  MyFoo : Foo;
begin
  MyFoo := MyFoo.Create; // kompiliert, ist aber FALSCH
  MyFoo := Foo.Create;
end;
Kaum macht man's richtig - schon funktioniert's
Zertifikat: Sir Rufo (Fingerprint: ‎ea 0a 4c 14 0d b6 3a a4 c1 c5 b9 dc 90 9d f0 e9 de 13 da 60)
  Mit Zitat antworten Zitat