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

Вниз

Удаление рисунка   Найти похожие ветки 

 
Gomez   (2005-10-10 17:45) [0]

Предположим на компоненте Image нарисована линия красным цветом. Как ее стереть? Пробывал обрисовать ее карандашом со свойством pmNop. Но линия не исчезает. Подумал и понял, что наверно это законамерно. Ведь невидимый значит прозрачный. Каким образом можно решить данную проблему?


 
Leonid Troyanovsky ©   (2005-10-10 17:59) [1]


> Gomez   (10.10.05 17:45)  
> Предположим на компоненте Image нарисована линия красным
> цветом. Как ее стереть? Пробывал обрисовать ее карандашом



Например, нарисовать ее цветом фона.
Ежели это линия весьма сложная, то для восстановления первоначального
участка (прямоугольного) часто используют примерно такой трюк: перед
рисованием линии копируют участок под рисование в битмап,
рисуют линию,  а для "стирания" выводят на canvas тот самый
сохраненный битмап.
См. Canvas.CopyRect

--
Regards, LVT.


 
Anatoly Podgoretsky ©   (2005-10-10 19:31) [2]

Начнем с простого вопроса, а как она там появилась?


 
Gomez   (2005-10-11 09:24) [3]

Появилась она при обработке событий MouseDown (начальная точка) и MouseUp (вторая точка). На компоненте Image создается объект Bitmap куда выводится рисунок. Рисование линии при этом происходит на с использованием свойства Canvas. Т. е. стереть ее видимо можно обрисовав цветом, совпадающим с Canvas.Color.


 
Leonid Troyanovsky ©   (2005-10-11 13:13) [4]


> Gomez   (11.10.05 09:24) [3]

> е. стереть ее видимо можно обрисовав цветом, совпадающим
> с Canvas.Color.


Canvas.Brush.Color

--
Regards, LVT.


 
Gomez   (2005-10-12 09:50) [5]

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



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

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

Наверх




Память: 0.47 MB
Время: 0.05 c
6-1122368604
shade_
2005-07-26 13:03
2005.11.06
"новое удалённое подключение к сети"(RAS) программно...?


4-1125837051
lexales
2005-09-04 16:30
2005.11.06
Перехват событий Explorer


14-1129609939
DelphiN!
2005-10-18 08:32
2005.11.06
Выделить из предложения все глаголы


2-1129215799
Fast2
2005-10-13 19:03
2005.11.06
Почему при выполнении пишет Transaction is active ?


2-1129145331
Денис
2005-10-12 23:28
2005.11.06
как на TMainMenu сделать видимым ani курсор