Eine Generics TObjectList<T> als Parameter

[himitsu]

overload?



overload = Methode überladen (weitere Deklaration mit anderen Parameter-Typen
virtual = überschreibbar
static = statischer Aufruf (es gibt kein Self)



[add]

Delphi-Quellcode:

  TDummy = record
    class procedure Test<T:class>(ObjectList: TCustomObjectList<T>; ID: Integer); static; overload;  // könnte auch  overload; static;  sein
    class procedure Test<T:class>(ObjectList: TCustomObjectList<T>; ID: string); static; overload;
  end;

oder meinst du

Delphi-Quellcode:

  TDummy = record
    class procedure Test<T:class; T2>(ObjectList: TCustomObjectList<T>; ID: T2); static;
  end;

[RWarnecke]

Delphi-Quellcode:

  TDummy = record
    class procedure Test<T:class>(ObjectList: TCustomObjectList<T>; ID: Integer); static;
    class procedure Test<T:class>(ObjectList: TCustomObjectList<T>; ID: string); static;
  end;


  TDummy.Test<TZahlungsart>(ZahlungsartList, 1);
  TDummy.Test<TZahlungsart>(ZahlungsartList, '1');

Bekomme ich den Fehler

Zitat:

E2254 Overloaded procedure 'Test' must be marked with the 'overload' directive

Ersetze ich jetzt static durch overload , bekomme ich den Fehler

Zitat:

E2398 Class methods in record types must be static

Wenn ich diese Funktion mit ganz normalen Parametern verwende ohne den Record funktioniert ja das overload .

Wie mache ich das ganze richtig ?

[JamesTKirk]

Zitat von RWarnecke:

Ersetze ich jetzt static durch overload , bekomme ich den Fehler

Zitat:

E2398 Class methods in record types must be static

Du musst beide Modifier deklarieren:

static; overload;
oder

overload; static;
(ich weiß jetzt nicht wie rum es deklariert werden muss)

Gruß,
Sven

[RWarnecke]

Mit overload; static; funktioniert es. Danke.