Как записать координаты точек в массив? (Delphi)

[zaira001002]

Хочу сохранить все точки в массив , а затем считывать с массива каждую координату , чтобы выполнять следующие условия задачи. Я решила создать два массива , которые будут хранить в себе целочисленные значения координат точек, берущих с ListBox. Не знаю, правильно ли я задала массивы, и как использовать их дальше?:

var
  S, SDeleted: String;
  I,X,Y,J: Integer;
  CoordXPoints: array of Integer;
  CoordYPoints: array of Integer;
begin
  with ListBoxCoordinatesPoints do
    begin
      // Удаляем нумерацию точек в ListBox
      for I := 0 to ListboxCoordinatesPoints.Items.Count - 1 do
      begin
        S:= ListboxCoordinatesPoints.Items.Strings[I];
        Delete(S,1,2);
        ListboxCoordinatesPoints.Items.Strings[I]:=S;
      end;
        SDeleted:=Items.Strings[ItemIndex];
        Items.Delete(ItemIndex);
        // Находим координаты удаленной точки
        Delete(SDeleted,Pos('X: ',SDeleted),3);
        Delete(SDeleted,Pos(' Y: ',SDeleted),4);
        S:=SDeleted;
        Delete(SDeleted,Pos(';',SDeleted),(length(SDeleted)-(Pos(';',SDeleted)-1)));
        X:=StrToInt(SDeleted);
        Delete(S,1,Pos(';',S));
        Y:=StrToInt(S);

Следом идет присваивание массиву CoordXPoints значение Х, а массиву CoordYPoints значение Y, которое я не знаю как записать )))Подскажите, пожалуйста, как это делается)

[type_Oleg]

Может быть, лучше один массив:

 CoordPoints: array of TPoint;

Тип TPoint описан в модуле Types.

[zaira001002]

А что я смогу делать с такого типа массивом? он двумерный? ну а потом , чтобы брать координаты точки каждой из этого же массива , то как это осуществляется процесс?

[type_Oleg]

Почему двумерный? Нет, индекс у элементов будет один, но каждый элемент - типа record.

 CoordPoints[i].X:= ...// координата X 
 CoordPoints[i].Y:= ...// координата Y

[zaira001002]

Надо же)) а как можно найти теорию на эту тему))) интересная штука)))) хочу узнать поподробнее))))?

[zaira001002]

А как запомнить координаты точек? по I? или саму CoordPoints[I].X присвоить переменной, запоминающая координату?