Polybezier по многим точкам [D4, Win95/98]
wam © (2002-11-22 03:49:00)
У меня при вводе массива долее 100 точек данная функция ничего
не рисует. Это глюк или ограничение, или у меня лыжи не едут?
MBo (2002-11-22 05:50:00) [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, то не
станет
Наверх 
ЧАТ |
Орешник |
|
