[gelöst] Finden oder Übergeben mehrdimensionaler Arrays in/an eine Procedure

[Cordt]

Hallo miteinander,

ich stehe vor dem Problem, dass ich einer Procedure gerne sagen würde, dass sie mit einem von 26 verschiedenen und verschiedengroßen Arrays of Array[0..x] of String arbeiten soll.
Die Arrays kann ich leider nicht ersetzen, das würde jeden Rahmen sprengen.
Am liebsten wäre mir ja irgend eine Art von FindComponent, was ich auch schon gegoogled habe, aber die einzige (gescheiterte) Lösung, die hierzu gepasst hätte, hab ich nur für einfache Datentypen gesehen.

vllt stehe ich auch gerade total auf dem Schlauch und übersehe eine offensichtliche Lösung.

Beste Grüße
Cordt

[Moombas]

Keine Ahnung ob ich dich nun nicht richtig verstehe aber die Größe eines Arrays kannst du doch ermitteln oder ist jedes einzelne Array anders Dimensioniert (bezogen auf die Arrays im Array)?
Wenn ja, gibt es evtl. feste Vorgaben (deine "26" assoziiert mir das), die könntest du in der Procedure doch ermitteln oder ggf. als mit zu übergebenden Wert einbauen?

Wenn nein, wäre doch einfach die Abfrage wenn das Array Größe X hat und das 1. Array im Array Größe Y, dann ist es folgendes,...

Oder denke ich gerade zu einfach -.-

[Cordt]

Hallo Moombas, danke für deine Antwort,

mir geht es nicht um die Größe der Arrays, die kenne ich.
ich muss der Procedure aber sagen "arbeite mit Array1" oder "Arbeite mit Array22".
Die Arrays sind in einer Größe zwischen Array of Array[0..1] und [0..20] und die Lenge ist nach der Initialisierung auch fix.

Ich weiß halt nicht, wie ich die Arrays übergeben kann

Procedure DoStuffWithAnArray(IrgendeinArray : Array of Arra of String)

geht halt nicht, aber etwas in der Richtung brauche ich

Die Procedure muss halt in einem Schritt mit dem einen, in einem anderen Schritt mit einem anderen Array arbeiten, die Parameter, was und wie es arbeiten soll kann ich alle mitgeben, aber eben nicht die Info, mit welchem Array das jetzt getan werden soll.

Klar kann ich dann irgendeine Zuordnung mitgeben und mit ner großen IF-Reihe dann einmal alles durch machen, dann hab ich aber wieder 26 mal beinahe den selben Code dastehen, in dem nur einzelne Parameter anders sind und der Arrayname.

[Klaus01]

.. wenn Du eine zweite Parameter übergibst z.B. ArrayId:Integer

DoStuffWithAnArray(IrgendeinArray : Array of Arra of String; arrayId: Integer)

Grüße
Klaus

[Cordt]

Hallo Klaus

das geht nicht, ich kann das Array so nicht übergeben, "Bezeichner erwartet aber 'ARRAY' gefunden."

Wie gesagt, es geht darum wie ich der Procedure eines dieser Arrays übergeben, oder aber es in der Procedure anhand des Identifyers oder Namens (analog zu FindComponent) ermitteln kann.

[Klaus01]

ein Versuch:

Delphi-Quellcode:

type
  TBigArray = Array[0..1][0..26] of String;


procdure tuwas(aArray: TBigArray; arrayId);

Grüße
Klaus