| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
TImgView32 и слои [D7, WinXP]
X-Disa © (2004-09-03 14:12:00)Доброго времени суток.
Есть TImgView32. У него есть свойство Layers.
Я пробую получить битмап из заданного слоя так:
Bitmap:=TBitmapLayer(ImgView321.Layers.Items[i]).Bitmap;
Все получаеться нормально, но есть проблема.
После этого я пишу:
Bitmap.Canvas.MoveTo(X,Y);
Bitmap.Canvas.Pen.Color:=clred;
Bitmap.Canvas.LineTo(X1,Y1);
Линия рисуется, но вместо красной линии я получаю линию со 100% прозрачностью. Сквозь нее нижележащий слой видно. Что делать?
X-Disa (2004-09-05 13:26:00) [1]Нашел решение: после рисования на канвасе нужно писать:
TBitmapLayer(ImgView321.Layers.Items[i]).Bitmap.ResetAlpha
Mihey_temporary (2004-09-05 11:59:00) [2]http://www.delphimaster.ru/cgi-bin/forum.pl?id=1094278240&n=7
один вопрос в двух ветках.
Rem (2004-09-05 11:46:00) [3]>>но вместо красной линии я получаю линию со 100% прозрачностью. Сквозь нее нижележащий слой видно.
Что-то мне тут не понятно. Линии нет совсем, что ли?
X-Disa (2004-09-04 09:48:00) [4]Да, еще после сохранение слоя в файл
TBitmapLayer(ImgView321.Layers.Items[i]).Bitmap.SaveToFile('123.bmp');
После открытия этого файла например в ACDSee все нормально, линия красная.
| |
