Funktion für mehrere statische Arrays

[tomsel]

Doch, das geht. Solange du nicht array mit verschiedenen Elementtypen verwenden willst.

Delphi-Quellcode:

var
  a1:array[1..3] of char;
  a2:array[1..6] of char;

  procedure arraytest(a:array of char);
  var i:integer;
  begin
    i:=length(a);
    i:=high(a);
  end;

begin
    arraytest(a1);
    arraytest(a2);
end.