[poli-smen]

Сообщение от Links HQ

Добрый вечер.Хотел спросить кое что про массив Tpoint.Есть классы Круг и Квадрат.Но пока описан только круг.при выборе в круга в radiogroup и нажатии мыши,должны создаваться круги...и заноситься в массив Tpoint координаты X и Y....но когда я пытаюсь создать 2 круг,вылетает с ошибкой.Может кто нибудь подсказать в чём ошибка?
P.S. сразу хочу сказать,что делфи только начали изучать,и уже дали такое вот задание

Код:

.....
var
  Form1: TForm1;
  fig:array[1..200] of Tpoint;
  i:integer=0;
 
implementation
.....
fig[i].x1:=X;
fig[i].y1:=Y;
i:=i+1;
.....

У тебя индексация массива fig начинается с единицы, а первый индекс в переменной i - ноль - явный выход за пределы массива.