Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

BitMap


tytus ©   (2003-05-21 20:03:00) 

Подскажите, как в Canvas.CopyRect(dest:TRect,canvas,source:TRect) указать прямоугольник Dest, если он - TBitmap???


servs   (2003-05-24 13:51:00) [1]

т.е наоборот


servs   (2003-05-24 13:43:00) [2]

Canva.CopyRect(Rect(0,0,100,100), canva,Rect(
SpinEdit1.Value,Spinedit2.Value,SpinEdit1.Value+100,SpinEdit2.Value+100));

И что ты хочешь?

Может стоит написать
Canva.CopyRect(Rect(0,0,100,100), BM.Canvas,Rect(
SpinEdit1.Value,Spinedit2.Value,SpinEdit1.Value+100,SpinEdit2.Value+100));


Плохой человек   (2003-05-21 21:46:00) [3]

И ещё, лучше используй BitBlt.


Плохой человек   (2003-05-21 21:45:00) [4]

Я знаю в чём ошибка. Ты создаёшь TBitMap, но не указываешь его размеры. Укажи размеры, типа:

BM.Width := 100;
BM.Height := 100;


tytus   (2003-05-21 20:44:00) [5]

Когда пишу
Image1.Canvas.CopyRect(Rect(0,0,100,100),canva, и т д...) то все работает. А вот с битмапом - не получается...


tytus   (2003-05-21 20:26:00) [6]

Я пишу так:
var
canva:TCanvas;
ScreenDC:HDC;
BM:TBitmap;
begin
canva:=TCanvas.Create;
ScreenDc:=GetDC(0);
BM:=TBitmap.Create;
Canva.Handle:=ScreenDC;
Canva.CopyRect(Rect(0,0,100,100),canva,Rect(
SpinEdit1.Value,Spinedit2.Value,SpinEdit1.Value+100,SpinEdit2.Value+100));
Идея такая - получить в ВМ копию десктопа.


Song   (2003-05-21 20:16:00) [7]

Что-то с параметрами ты наврал..


Наверх

Титульная страница Поиск, карта сайта Написать письмо