Массив уже имеет понятие индекса.
Код:
var
I : Integer;
begin
SetLength(Canvas, 10); // установили 10 элементов в массиве
for I := 0 to 9 do
Canvas[i] := TCanvas.Create; // создали 10 канвасов
Canvas[4] := ... // обратились к 5 элементу массива канвасов |