Source position: utypes.pas line 64
procedure DimStrMatrix(
var A: TStrMatrix;
Ub1: Integer;
Ub2: Integer
);