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

Вниз

Как создать на клиентской части формы БИТМАП (НЕ канву).   Найти похожие ветки 

 
xn0bys ©   (2003-08-29 08:23) [0]

Мне нужно добраться до scanlines не используя временный битмап.

У меня есть вот что:

procedure OnPaint;
Var
Temp:TBitmap;
begin
Temp:=TBitmap.Create;
Temp.Width:=ClientWidth;
Temp.Height:=ClientHeight;
...
здесь рисую на временном битмапе (через сканлайны)
...
Canvas.Draw(0,0,Temp);
Temp.free;
end;


А нужно чтоб не использовать Temp.
Я пробовал так:

procedure OnPaint;
Var
DC1, DC2: HDC;
Temp : TBitmap;
begin
Temp:=TBitmap.Create;
DC1:=CreateCompatibleDC(Canvas.Handle);
DC2:=CreateCompatibleBitmap(Canvas.Handle, nil, nil, nil);
Temp.Handle:=DC2;
...
здесь рисую на временном битмапе (через сканлайны)
...
DeleteDC(DC2);
DeleteDC(DC1);
Temp.free;
end;


Так работает быстрее, но почему-то не рисует (ошибки не выдает).
Может я чего не то делаю? Подскажите.

Заранее Спасибо!!!


 
mrAld ©   (2003-08-29 12:31) [1]

Во втором коде что-то мне подсказывает, что ты забыл забыл привязать DC2 к DC1. Сам посуди, DC1 в этом коде не используется.


 
xn0bys ©   (2003-08-29 12:49) [2]

Всё равно не рисует!


 
Крот ©   (2003-09-02 10:22) [3]

1. Почему значение, возвращаемое CreateCompabliteBitmap ты помещаешь в переменную типа HDC, ведь возвращается HBITMAP?

2. Где собственно код рисования (в первом примере это Canvas.Draw, а во втором?)



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

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

Наверх




Память: 0.47 MB
Время: 0.028 c
14-12059
Rihters
2003-12-09 01:55
2004.01.05
Indy Clients


1-11885
Xmen
2003-12-11 15:32
2004.01.05
Как посчитать количество дней между 2-мя датами?


1-11904
User_OKA
2003-12-18 09:09
2004.01.05
Excel


8-12000
-= ALEX =-
2003-08-25 16:24
2004.01.05
Звук


4-12218
Zhirnov Maxim
2003-11-05 11:32
2004.01.05
Поиск по реестру, желательно средствами WinAPI