procedure BeginArray; overload;