| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Рисование объекта [D6]

jen_bond ©   (2002-12-11 12:12:00) 

Подскажите как можно реализовать некоторые графические функции.
В run-time режиме мышко нарисовать линию, овал, ....

---

Mirovodin   (2002-12-11 12:28:00) [1]

Например для рисования линии.

1) Получаем координаты 1-го нажатия мыши в StartX,StartY. И устанавливаем flag в True.
2) При повторном нажатии (flag=True) получаем координаты EndX, EndY.
3) MoveTo(DC, StartX, StartY);
LineTo(DC, EndX, EndY);
Flag:=False;

---

Наверх