如何解决delphi 画布里最多80个对象的限制？

Question

我用delphi画布做了个画图控件，但最多只能画80个对象（每个线段等为一个），如何突破80个限制，请大虾指点，谢谢！

Answer 1

delphi 画布里最多80个对象的限制
-------------------------------
此“限制”已被Borland/CodeGear官方证实确实存在吗？

Answer 2

procedure TForm1.Button1Click(Sender: TObject);
var
  cans : array[0..81] of TCanvas;
  i: Integer;
begin
  for  i := Low(cans) to High(cans) do
  begin
    cans[i] :=TCanvas.Create;
  end;
  if i>= High(cans) then
    ShowMessage('创建成功');
end;没问题啊……