1:
2:
3:
4:
5:
6:
7:
8:

// Hilfsroutinen ###################################################### AddIndex

Procedure AddIndex( var A : array of Integer; I : Integer );
begin
  SetLength( A, Length( A ) + 1 );
  A[ Length( A ) - 1 ] := I      ;
end;
// Hilfsroutinen ###################################################### AddIndex                    

1:

[Fehler] StrGrid.pas(276): Inkompatible Typen                    

1:
2:
3:
4:
5:

In einigen Funktions- und Prozedurdeklarationen werden Array-Parameter in der Form array of Basistyp ohne festgelegten Indextyp angegeben: 

function CheckStrings(A: array of string): Boolean;

In diesem Fall kann die Funktion auf alle Arrays des angegebenen Basistyps angewendet werden, unabhängig von der Größe der Arrays und der Art ihrer Indizierung                    

1:
2:
3:
4:
5:
6:
7:

Type
IntArray = array of Integer;

Procedure AddIndex( var A : IntArray; I : Integer );
begin
    {...}
end;