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

Вниз

Не пойму как работает CopyMode у TCanvas   Найти похожие ветки 

 
Vladimir D Belousov   (2005-04-30 15:13) [0]

Добрый день!

Хочу скопировать битмап на форму, с эффктом наложения, но что-то делаю не так:

Var B: TBitmap;

begin
B:=Graphics.TBitmap.Create;
B.Width:=Form1.ClientWidth;
B.Height:=Form1.ClientHeight;
B.Transparent := true;
B.TransparentColor:=clWhite;
//Подразумевается, что я залью избражение прозрачным цветов - очищу её
B.Canvas.Brush.Color:=B.TransparentColor;
B.Canvas.FillRect(B.Canvas.ClipRect);
B.Canvas.Brush.Color:=clBlack;
B.Canvas.MoveTo(10,10);
B.Canvas.LineTo(100,100);
//Подозреваю что тут ошибка, но Combines the image on the canvas and the source bitmap by using the Boolean OR operator - то, что мне надо
B.Canvas.CopyMode:=cmSrcPaint;
Form1.Canvas.CopyRect(B.Canvas.ClipRect,B.Canvas,Form1.Canvas.ClipRect);
end;

Вот такой простой пример копирует B.Canvas на канву формы.
При это то, что было на канве формы - исчезает под скпированным изображением.

В чем я не прав?

Большое спасибо!


 
AlterEgo of WondeRu ©   (2005-05-02 18:33) [1]

используй StretchBlt+ StretchBltMode


 
Kind ©   (2005-05-02 18:50) [2]

или BitBlt с SRCAND; SRCPAINT;



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

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

Наверх




Память: 0.47 MB
Время: 0.034 c
14-1124344994
TButton
2005-08-18 10:03
2005.09.11
теодолитный ход...


6-1117072378
Usachev
2005-05-26 05:52
2005.09.11
с чем связанна эта ошибка


14-1124213133
Mike Kouzmine
2005-08-16 21:25
2005.09.11
Президент - наша гордость!


1-1124617108
MeF Dei Corvi
2005-08-21 13:38
2005.09.11
XML и Delphi


1-1124177403
Arkady
2005-08-16 11:30
2005.09.11
TOpenDialog