Главная страница
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.039 c
2-1138716658
TimScorp
2006-01-31 17:10
2006.02.19
Формы


15-1138553518
Gero
2006-01-29 19:51
2006.02.19
Samsung SH-B022 пишущий Blu-ray драйв – выйдет в уже апреле!


15-1138261865
PMan
2006-01-26 10:51
2006.02.19
Поддержка ПО - стоит браться?


3-1135057161
konda
2005-12-20 08:39
2006.02.19
Пароль в Interbase


15-1138327028
VitalikS
2006-01-27 04:57
2006.02.19
Защита