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

Вниз

BitMap   Найти похожие ветки 

 
tytus ©   (2003-05-21 20:03) [0]

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


 
Song ©   (2003-05-21 20:16) [1]

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


 
tytus ©   (2003-05-21 20:26) [2]

Я пишу так:
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));
Идея такая - получить в ВМ копию десктопа.


 
tytus ©   (2003-05-21 20:44) [3]

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


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

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

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


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

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


 
servs ©   (2003-05-24 13:43) [6]

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));



 
servs ©   (2003-05-24 13:51) [7]

т.е наоборот



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

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

Наверх




Память: 0.47 MB
Время: 0.028 c
3-71561
AlexWeb
2003-08-29 10:57
2003.09.22
Можно ли подключить базу IB при помощи ADO?


1-71589
Dragoon
2003-09-09 23:11
2003.09.22
Как записывать в файл строки не по порядку?


14-71875
AlexVM
2003-09-04 10:44
2003.09.22
IntraWeb 6.0 for Delphi 7


1-71738
Erik
2003-09-09 14:34
2003.09.22
Увеличение размера масива неизвестного типа?


14-71873
bl_wizard
2003-09-02 18:54
2003.09.22
Примерная стоимость разработки БД