Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.02.19;
Скачать: CL | DM;

Вниз

Посоветуйте   Найти похожие ветки 

 
alec_sey   (2006-02-02 15:04) [0]

Здравствуйте уважаемые, не подскажите можно ли сделать следующим образом: нарисовать
на форме линии к примеру чёрного цвета(ну линии можно), которые соеденены между
собой, как бы разветвлённых трубопровод, есть начальная точка с которой линии
постепенно окрашиваются в другой цвет подобно  растеканию воды. может есть у кого хотя бы
что то подобное, скинте пожалуйста или дайте хотя бы совет.


 
Eraser ©   (2006-02-02 15:42) [1]


> alec_sey   (02.02.06 15:04)


>  или дайте хотя бы совет.

Осуществляй проприсовку методами класса TCanvas (form1.Canvas) в обработчике OnPaint .. или же рисуй на TBitmap а потом в OnPaint переноси на форму.


 
Kolan ©   (2006-02-02 15:46) [2]

Все можно.

Вопросы в чем?
Нужно придумать алгоритм рисования и заполния другим цветом.
Нужно это нарисовать.


 
Гошик Кувшинов   (2006-02-02 17:19) [3]

Как рисовать разноцветыне линии гляди сюда http://www.delphikingdom.com/asp/viewitem.asp?catalogid=94

а про плавные переходы цвета сюда http://www.delphikingdom.com/asp/viewitem.asp?catalogid=1090


 
antonn ©   (2006-02-02 18:45) [4]

по моему ему не плавные переходы нужны...
т.е. как я понял, линия, например черная, и начиная с одного из концов попиксельно окрашивается в синий цвет. есть пересекается с другой черной, то и другая тоде начинает также окрашиваться.
как сделать - не знаю:)


 
Zeqfreed ©   (2006-02-02 18:49) [5]

antonn ©   (02.02.06 18:45) [4]

> как сделать - не знаю:)

Чего там знать-то? :)
Хотя, все конечно зависит от конкретной задачи. Если линии перпендикулярные и одинаковой толщины, то проблемы вообще никакой нет.


 
antonn ©   (2006-02-02 20:00) [6]

Zeqfreed ©   (02.02.06 18:49) [5]
автор уже, наверное, ждет совета:)


 
alec_sey   (2006-02-03 12:55) [7]

Ну antonn правильно понял, есть нач. точка, линия к примеру идёт от левого
края к правому, а затем под наклоном обратно, если я к примеру буду
делать так
for x:=0 to 1000 do
 for y:=0 to 1000 do
if canvas.picsels[x,y]=clblack then
  canvas.picsels[x,y]:=clred
но так будет окрашиваться всё от левого края к правому, а нужно чтобы всё
это дело ишло по линия которая может возвращаться назад,
Пробовал ещё так линия начиналась с красного пикселя, и я пробовал
переберать соседние пиксели дальше или ближе, выше или ниже и диогональные на 1 пиксель от красного и если проверяемый пиксель чёрного
цвета тогда ему присваеваеться красный цвет и так далее, но что то несовсем получаеться может тогда как это сделать правильно
вы знаете?
Мне желательно сделать эту проверку таймером



Страницы: 1 вся ветка

Текущий архив: 2006.02.19;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.029 c
1-1137595538
Maverick
2006-01-18 17:45
2006.02.19
MainMenu + Icon + MDI


3-1135579736
makvell
2005-12-26 09:48
2006.02.19
Импорт в Word


15-1138510812
begin...end
2006-01-29 08:00
2006.02.19
С Днём рождения! 29 января


2-1138605304
pavel_guzhanov
2006-01-30 10:15
2006.02.19
как определить имя директории в OpenDialog


15-1138205476
Kerk
2006-01-25 19:11
2006.02.19
Кластеризация