Beliebiges Array an function/procedure übergeben

[maststef]

Hi@all

Wie kann ich ein beliebige Array an function/procedure übergeben?
Ein Beispiel:

Code:

procedure eins(var arr: array of integer);

Soweit bin ich schon, das Problem dabei: Es kann nur ein Integer-Array übergeben werden, aber zum Beispiel kein array of LongInt oder array of char. Ich bräuchte aber eine procedure, die alle Arten von Arrays erstmal aufnehmen kann und dann speziell nach Art des Arrays entscheidet, was zu tun ist. Weiß jemand, wie das geht?

Die einzige Möglichkeit, die mir eingefallen ist, wäre mehrere override-procedures zu schrieben, aber das kann ja nicht der Sinn der Sache sein...?!?!

Schonmal Danke im Vorraus für die Antworten.