[delphi] передача динамического массива по ссылке

Olenenok

procedure ______ ( var templ : array of TStringList )

begin

     SetLength (templ, 2);

end;

  

и здесь компилятор ругается:

[Error] lib.pas (xxx): Incompatible types  

из-за чего он ругается? никак не могу въехать.

yolki

type

 TStringListArray = array of TStringList;

procedure Proc(var A: TStringListArray);

begin

 SetLength(A,2);

end;

Olenenok

спасибо