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

Вниз

TImgView32 и слои   Найти похожие ветки 

 
X-Disa   (2004-09-03 14:12) [0]

Доброго времени суток.
Есть 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-04 09:48) [1]

Да, еще после сохранение слоя в файл TBitmapLayer(ImgView321.Layers.Items[i]).Bitmap.SaveToFile("123.bmp");
После открытия этого файла например в ACDSee все нормально, линия красная.


 
Rem   (2004-09-05 11:46) [2]

>>но вместо красной линии я получаю линию со 100% прозрачностью. Сквозь нее нижележащий слой видно.

Что-то мне тут не понятно. Линии нет совсем, что ли?


 
Mihey_temporary ©   (2004-09-05 11:59) [3]

http://delphimaster.net/view/8-1094278240/
один вопрос в двух ветках.


 
X-Disa   (2004-09-05 13:26) [4]

Нашел решение: после рисования на канвасе нужно писать:
TBitmapLayer(ImgView321.Layers.Items[i]).Bitmap.ResetAlpha



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

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

Наверх




Память: 0.47 MB
Время: 0.054 c
1-1094154461
Корифей
2004-09-02 23:47
2004.09.19
Изменение даты создания


6-1089787543
belkova
2004-07-14 10:45
2004.09.19
Печать в FastReport


1-1094473318
QQ
2004-09-06 16:21
2004.09.19
Значения по умолчанию для массивов, как параметров


1-1094028027
Vn
2004-09-01 12:40
2004.09.19
Как програмно изменить размеры панелей посредством TSplitter?


3-1093217295
Anarki
2004-08-23 03:28
2004.09.19
Соединение с базой данных MS Access, защищённой паролем