Разработка "рабочего поля" программы сим. эл.схем (Delphi)

[WaruiOrochi]

Здравствуйте.

Необходимо реализовать "рабочее поле" программы как в "примере", на Delphi. То есть, есть виртуальные элементы (которые тоже надо как-то придумать) и их необходимо соединять "проводниками". К одному выводу виртуального элемента может быть подведён только один "проводник". Так же должны быть узлы, т.е. что бы к одному проводнику можно было подключить другой. И всё это должно как то двигаться при нажатии кнопки мышы и перетаскивании. Примеры таких программ (с таким интерфейсом): WorkBench, Proteus и многие другие для разработки электронных схем.

Подскажите в какую сторону двигаться для реализации вышеизложенного, перепробовал множество вариантов, один из которых рисовал на Canvas Image, но там тоже возникли свои проблемы.

[Impuls1989]

Даже не знаю чем вам помчь((( Таких компонентов я не знаю, но могу сказать как бы делал это я:
1. Каждый элемент - это отдельный класс с его полями и настройками. (Тут будет все начиная от координат элемента на форме, и заканчивая электрическими параметрами данного электронного прибора)
2. Собственно я бы сделал палитру, на которой лежали бы все элементы.
3. Далее так: нажал на элемент на палитре, нажал на основную форму - на форме отрисовался бы данный элемент, а в некий массив (стек, очередь, дерево - это как вам уже будет удобнее) добавился элемент который вы кинули на форму.
4. В каждом элементе есть ссылки на дочерний(дочерние) элементы. По умолчанию все ссылки должны быть установлены в nil. По мере соединения элементов ссылки должны заполняться указателями на дочерний элемент. Зачем нужны ссылки? Это чтобы узнать какие элементы нужно соединить с какими.

И вот наступает самый сложный этап. Нужно как-то соединять элементы проводниками. Тут вам поможет либо теория графов с его поиском оптимального пути, либо старый проверенный способ - "в лоб" искать пути, по которым нужно соединять элементы.
Вот как-то так.

[Levsha100]

Сейчас пишу симулятор эл. схем, только над граф. интерфейсом я еще не заморачивался.
http://programmersforum.ru/attachmen...1&d=1258321704
Пишу на С++, юзаю OpenGL, ООП. Все пишу сам.

[WaruiOrochi]

В принципе к этому я и стремился и поля были и координаты всех выводов каждого элемента, проблема возникла в отрисовке одного элемента и в перемещении проводника. В элементе проблема заключается в том что я не знаю как его отрисовать, картинкой не удобно (не эффективно), через lineto, movieto как то неудобно в плане перерисовки. Вот и мучаюсь с вопросом как бы "правильно " создать компонент, а уж свойствами то я его обеспечу, мало того при клике на компонент он должен выделяться и перетаскиваться мышкой. Вот в этом плане не можешь мне помочь? можно даже с кусочком кода

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

Сейчас пишу симулятор эл. схем, только над граф. интерфейсом я еще не заморачивался.
http://programmersforum.ru/attachmen...1&d=1258321704
Пишу на С++, юзаю OpenGL, ООП. Все пишу сам.

Можно и на С++ опыта программирования у меня не много, я электронщик а не программист,но написать надо , поэтому буду рад помощи даже на С++

Все это замечательно, но не стоит забывать про наличие кнопки "Правка"...

[Impuls1989]

Ну с отрисовкой либо картинка, либо lineto, moveto. Другого способа я не вижу. А с перемещением так вроде проблемм никаких я не вижу. У тебя есть свойства OnMouseUp, OnMouseMove, OnMouseDown.
OnMouseUp - срабатывает когда ты нажимаешь на кнопку мыши. Код примерно такой:

if (Button = mbLeft) then
  begin
   {Тут нужно найти нажал ты элемент или нет, и если нажал то установить флаг что был выбран компонент. Это не сложно т.к. у тебя есть массив в котором лежат все компонеты помещенные на форму}
   flag:=true;
   xPred:=X;
   yPred:=Y;
  end;

OnMouseMove - срабатывает когда идет передвижение мыши.
Код такой:

if (Flag) then
  begin
   {Если был установлен флаг выбора элемента}
    UnDrow(xPred,yPred);//Зарисовать элемент на старом месте
    Drow(X,Y);//Нарисовать элемент на новом месте
   xPred:=X;
   yPred:=Y;
  end;

OnMouseDown - срабатывает когда кнопка мыши была отпущена
Код такой:

if (Button = mbLeft) then
begin
 Flag:=false;
end;