2D Array als übergabeparameter

[s-off]

Hallo,

bei der Übergabe von Arrays als Parameter musst Du Dir für Dein Array einen Typ erzeugen, und diesen dann übergeben.

Edit: achso, sorry - das Beispiel fehlte:

Delphi-Quellcode:

Unit Unit1;

Interface

Uses
   Windows,
   Messages,
   SysUtils,
   Variants,
   Classes,
   Graphics,
   Controls,
   Forms,
   Dialogs,
   StdCtrls;

Type
   TMeinArrayType = Array Of String;

Type
   TForm1 = Class(TForm)
      Button1: TButton;
      Procedure Button1Click(Sender: TObject);
   private
      Procedure ShowMsgFromArray(_aArray: TMeinArrayType; _iIndex: Integer);
      { Private-Deklarationen }
   public
      { Public-Deklarationen }
   End;

Var
   Form1: TForm1;

Implementation

{$R *.dfm}

Procedure TForm1.Button1Click(Sender: TObject);
Var
   TestArray: TMeinArrayType;
Begin
   SetLength(TestArray, 1);
   TestArray[0] := 'Hallo';
   ShowMsgFromArray(TestArray, 0);
End;

Procedure TForm1.ShowMsgFromArray(_aArray: TMeinArrayType; _iIndex: Integer);
Begin
   ShowMessage(_aArray[_iIndex]);
End;

End.