Ошибка Access Violation при попытке создать объект класса. В чем может быть проблема? - Delphi - Ответ 13548308

unit Unit2;
 
interface
uses
  SysUtils;
type
  ABCMatrix = class
  private
    { Private declarations }
    ColumnCount:Integer;
    RowCount:Integer;
    Matrix:array of array of Char;
    FontSiZe:Integer;
  public
    constructor Create(n:Integer;m:Integer;FontS:integer);
    destructor Done();
    procedure RandomInit();
    //procedure DrawOnCanwas(x:Integer; y:Integer; Ob:TForm);
 
            { Public declarations }
end;
implementation
constructor ABCMatrix.Create(n:Integer;m:Integer;FontS:integer);
begin
  SetLength(Matrix,n+1,m+1);
  FontSiZe:=FontS;
  RowCount:=n;
  ColumnCount:=m;
end;
destructor ABCMatrix.Done();
begin
   //Matrix:=nil;
end;
procedure ABCMatrix.RandomInit();
var i,j:Integer;
begin
  Randomize;
  for i:=1 to RowCount do
    for j:=1 to ColumnCount do
     begin
        Matrix[i,j]:= Chr(Random(32)+192);
     end;
end;
{procedure ABCMatrix.DrawOnCanwas(x:Integer; y:Integer; Ob:TForm);
var i,j:Integer;
begin
  for i:=1 to RowCount do
    for j:=1 to ColumnCount do
    begin
      //Ob.Canvas.TextOut(x+(j-1)*10,y+(i-1)*10,Matrix[i,j]);
    end;
end; }
end.

program Project2;
 
{$APPTYPE CONSOLE}
 
uses
  SysUtils,
  Unit2 in 'Unit2.pas';
 var
   M:ABCMatrix;
begin
  { TODO -oUser -cConsole Main : Insert code here }
  M.Create(5,5,10);
end.