Polybezier по многим точкам

← →
wam (2002-11-22 03:49) [0]

У меня при вводе массива долее 100 точек данная функция ничего не рисует. Это глюк или ограничение, или у меня лыжи не едут?

← →
MBo (2002-11-22 05:50) [1]

Соблюдаешь ли правило, что в массиве должно быть 3*N+1 точек?
procedure TForm1.Button1Click(Sender: TObject);
пример:
var a:array of tpoint;
i:integer;
begin
setlength(a,202);
for i:=0 to 201 do begin
a[i].x:=i*3;
a[i].y:=50+(i mod 3)*50;
end;
canvas.polybezier(a);
end;

это рисует, а если задать 200 точек и for i:=0 to 199, то не станет

Polybezier по многим точкам Найти похожие ветки