Ich habe eine Liste, und die soll bitte immer sortiert sein

[Sir Rufo]

Da ist eine automatisch sortierende List-Klasse

Delphi-Quellcode:

unit SortedList;

interface

  uses
    System.Generics.Collections;

  type
    TSortedList<T> = class( TList<T> )
    protected
      procedure Notify( const Item : T; Action : TCollectionNotification ); override;
    end;

implementation

  { TSortedList<T> }

  procedure TSortedList<T>.Notify( const Item : T; Action : TCollectionNotification );
    begin
      inherited;
      if Action = cnAdded
      then
        Sort;
    end;

end.

Wonach sortiert wird, kann bei der Erstellung durch Angabe des IComparer<T> angegeben werden.