Вниз
Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: -0.974 c
14-1093627165
gn
2004-08-27 21:19
2004.09.19
Я вас всех люблю!!!


3-1093005881
Wolfram
2004-08-20 16:44
2004.09.19
Про кавычки


1-1094460264
vigo
2004-09-06 12:44
2004.09.19
ShowMessage


1-1093943496
Wolfram
2004-08-31 13:11
2004.09.19
Непонятная проблема с timetostr


1-1094024674
SNV-Soft
2004-09-01 11:44
2004.09.19
Где найти бесплатные компоненты в стиле XP или Office2000!?




   Наверх