Typ für for each Schleife

[Björn Ole]

Huhu,

kurze Frage. Wie muss der Typ des Parameters AIn lauten, damit ich TList, TObjectList, Arrays etc. übergeben kann? Sollte später nicht nur mit Integers funktionieren. Würde mir gerne das overloading sparen.

Delphi-Quellcode:

function IsNumberIn(ANumber: integer; AIn: {TList, TObjectList, Array}): boolean;
var
  n: integer;
begin
  result := false;
  for n in AIn do
  begin
    if n = ANumber then
    begin
      result := true;
      Break;
    end;
  end;
end;

TEnumerator<integer> hab ich schon versucht, da kommt folgende Meldung:

Zitat:

E2431 for-in statement cannot operate on collection type 'Generics.Collections.TEnumerator<System.Integer>' because 'Generics.Collections.TEnumerator<System.Integer>' does not contain a member for 'GetEnumerator', or it is inaccessible

Gibts da ne Möglichkeit?
Gruß, Björn