Массив точек нарисованной линии

[spirit-ua]

Всем Привет!

Возможно ошибся разделом...

Рисую на канве линию

      PaintBox1.Canvas.Pen.Color := clGreen;
      PaintBox1.Canvas.Pen.Width := 3;
      PaintBox1.Canvas.MoveTo(0,0);
      PaintBox1.Canvas.LineTo(55,155);

как получить весь массив точек которые "входят" в линию?

P.S. На канве может быть несколько пересекающихся (иметь общуюю точку А) линий с одинаковым цветом

[Serge_Bliznykov]

как получить весь массив точек которые "входят" в линию?

никак.

Если не нравится - рисуйте линию по точкам (см. например, Алгоритм Брезенхэма) и сохраняйте их в нужный Вам массив.

или (лучше) меняйте логику задачи. (я, например, не могу даже предположить, зачем может понадобится подобный массив точек).

[Аватар]

А найти точку пересечения по уравнениям двух прямых ни как?

[spirit-ua]

побродив по просторах инета и данного форума слепил в кучу

var
    x1,x2,y1,y2,dx,dy,s1,s2,x,y,o,i,v,obmen   : integer;
begin
  x1:=25;
  y1:=115;
  x2:=255;
  y2:=25;
  x:=x1;
  y:=y1;
  dx:=(abs(x2-x1));
  dy:=(abs(y2-y1));
  if (x2-x1)<=0 then s1:=-1 else s1:=1;
  if (y2-y1)<=0 then s2:=-1 else s2:=1;
  if dy>dx then
  begin
    v:=dx;
    dx:=dy;
    dy:=v;
    obmen:=1;
  end
  else obmen:=0;
  o:=2*dy-dx;
  for i := 1 to dx do
  begin
    form1.Canvas.Pixels[x,y]:=clBlack;  // x,y - PIXEL ARRAY
    while o>=0 do
    begin
      if obmen=1 then
      x:=x+s1
      else
        y:=y+s2;
      o:=o-2*dx;
    end;
    if obmen=1 then y:=y+s2
    else x:=x+s1;  // ORIGINAL x:=x+x1;
    o:=o+2*dy;
  end;
  //form1.refresh;
  //self.Repaint; 
end;

может кому пригодится

но как быть с толщиной линии в 2,3..N пикселей? паралнльно рисовать еще одну линию со смещением по осях?

[Serge_Bliznykov]

spirit-ua, зачем Вам массив точек?

и, кстати, в данном коде Вы массив точек не формируете.
Так к чему эти танцы?

[spirit-ua]

Сообщение от Serge_Bliznykov

spirit-ua, зачем Вам массив точек

на счет массива может я и заганяюсь...
на канве нужно будет мышкой рисовать ломаную линию, т.е.
- клик 1 точка А
- клик 2 точка Б
...
- клик N точка N
- ESC (клик правой кнопкой) завершение рисования

таких линий будет много, так вот, нужно по клике правой кнопкой мыши на конкретную линию выполнить некое действие, например затереть, так вот чтобы определить что клик произошел именно по конкретной линии нужно иметь массив точек этой линии и дальше затереть именно эту линию, т.е. все точки которые "попадают" в эту линию

Сообщение от Serge_Bliznykov

spirit-uaи, кстати, в данном коде Вы массив точек не формируете.

в коде нет формирование массива

form1.Canvas.Pixels[x,y]:=clBlack;  // x,y - PIXEL ARRAY

в этой строке я просто добавил коммент что именно здесь можно собирать точки в массив

данный подход скорее всего неправильный но более простого решения не нашел, подскажите другие варианты

[Аватар]

Каждый отрезок держать как объект с информацией позволяющей отрисовать его. Плюс метод проверки - попадает ли заданные координаты на отрезок. При клике пробегаться по всем этим объектам и проверять

[spirit-ua]

держать как объект

объект?
можно поподробней? какая там должна быть инфа, точка А и Б явно не достаточно

а на чем отрисовывать и как поймать что клик именно по нему?

[Serge_Bliznykov]

вот забанили Миная, а он бы не только ответил на этот вопрос, но ещё бы и программку готовую красивую нарисовал. да ещё и с исходниками.
а пока попробуйте разобрать его примеры из этой темы - "Соединение кнопок между собой линией"

объекты в памяти и отображение их на экране - это разные задачи.
И правильный выбор сразу даст Вам кучу бонусов, начиная от возможности сделать откат (откатить последние действия), редактировать линии (изменять их позиции, характеристики и т.п.), удаление линий и ещё многое-многое другое.
Кстати, если вдруг не понимаете, о чём идёт речь, возьмите ЛЮБОЙ векторный редактор, поработайте с ним. Или, посмотрите видео, как с ним работать.
Поймёте, о чём идёт речь.

p.s. возможно, что Вам вся мощь и не нужна. Но структуру всё равно надо делать изначально корректную!

так вот чтобы определить что клик произошел именно по конкретной линии нужно иметь массив точек этой линии и дальше затереть именно эту линию, т.е. все точки которые "попадают" в эту линию

не надо иметь массив. достаточно иметь координаты начала и конца отрезка. и использовать процедуру, которая определяет расстояние от точки (куда кликнули) до отрезка (перебор всех отрезков, находите те, которые находятся менее(ближе), чем заданная чувствительность, от данной точки)

[spirit-ua]

а пока попробуйте разобрать его примеры из этой темы - "Соединение кнопок между собой линией"

пробежался по теме, круто, но исходников нету чтоб посмотреть, все линки битые

все более-менне понятно, подозреваю что линия рисуется на канве и сохраняются координаты, при удалении просто перерысовыевается канва без удаленной линии, в правильную сторону думаю?