|
Вопрос # 6 320/ вопрос закрыт / |
|
Здравствуйте, эксперты!
Есть кривые линии (линии рельефа) в растре
Можно ли сделать так чтобы программа в Дельфи поверх рисунка сама нарисовала линии автоматом? Возможно ли это? Рад буду любым соображениям
 |
Вопрос задал: senyor (статус: Посетитель)
Вопрос отправлен: 28 ноября 2012, 07:19
Состояние вопроса: закрыт, ответов: 1.
|
Ответ #1. Отвечает эксперт: Егор
Здравствуйте, senyor!
На форму кидаем два компонента - TImage (Image1) и TButton (Button1).
Обработчик кнопки:
procedure TForm1.Button1Click(Sender: TObject);
var
pict : TGraphic;
begin
pict := TBitmap.Create;
pict.LoadFromFile('рисунок.bmp');
image1.Canvas.Draw(0, 0, pict);
image1.Canvas.Pen.Color := clRed;
image1.Canvas.Pen.Width := 3;
image1.Canvas.Polyline([Point(40, 10), Point(20, 60), Point(70, 30),
Point(10, 30), Point(60, 60), Point(40, 10)]);
end;
Правда, работает только с bmp.
Остальное можно нагуглить по словам LoadFromFile paint delphi и подобным
 |
Ответ отправил: Егор (статус: 10-ый класс)
Время отправки: 28 ноября 2012, 17:34
|
Мини-форум вопроса
Всего сообщений: 11; последнее сообщение — 29 ноября 2012, 14:48; участников в обсуждении: 4.
|
DNK (статус: Студент), 28 ноября 2012, 13:05 [#1]:
Это возможно
"Digital Networked Knight"
|
|
|
senyor (статус: Посетитель), 28 ноября 2012, 15:47 [#2]:
подскажите как сделать начать
|
|
|
DNK (статус: Студент), 28 ноября 2012, 18:25 [#3]:
смотря что за линии
"Digital Networked Knight"
|
|
|
DNK (статус: Студент), 28 ноября 2012, 18:27 [#4]:
Егор: А память кто будет чистить?
"Digital Networked Knight"
|
|
|
Егор (статус: 10-ый класс), 28 ноября 2012, 18:34 [#5]:
согласен, очистки памяти нет.
код чисто для демонстрации возможности и в том виде, что приведён, абсолютно непригоден для реальной жизни. просто набросал на скорую руку.
Опасайтесь багов в приведенном выше коде; я только доказал корректность, но не запускал его.
— Donald E. Knuth.
|
|
|
senyor (статус: Посетитель), 29 ноября 2012, 10:02 [#6]:
Спасибо Егор, это получается рисование вручную, рисунок может быть разным получается что нужно чтобы прога отсканировала ни наличие пикселей и сама нарисовала
|
|
|
senyor (статус: Посетитель), 29 ноября 2012, 10:05 [#7]:
К примеру в загруженом рисунке найдет точку и сама напишет ее координаты потом другую и уже после этого если нет разрыва соединила ее сделала линию
|
|
Вадим К (статус: Академик), 29 ноября 2012, 14:22 [#8]:
Нужно смотреть, что за рисунок. В некоторых случаях это не сложно, в некоторых - нереально. В общем нужно гуглить по словам "векторизация изображений".
Галочка "подтверждения прочтения" - вселенское зло.
|
|
|
senyor (статус: Посетитель), 29 ноября 2012, 14:34 [#9]:
незнаю как отредактировать свой вопрос чтобы рисунок вставить или это надо сделать только в новом вопросе
|
|
|
senyor (статус: Посетитель), 29 ноября 2012, 14:45 [#10]:
в вопросе 6322 есть рисунок извините не знал как отредактировать вопрос чтобы вставить рисунок
|
|
|
DNK (статус: Студент), 29 ноября 2012, 14:48 [#11]:
Под этим знаком вопроса:
Рядом с кнопкой смены статуса вопроса есть кнопка добавить примечание.
"Digital Networked Knight"
|
11 января 2013, 14:17: Вопрос закрыт (решение принял DNK): Дискуссия закончилась
Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.
|
