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

Вниз

Как скопировать один TBitmap в другой?   Найти похожие ветки 

 
TBitmap   (2008-10-13 12:47) [0]

Вот код:

var bmp1,bmp2:TBitmap;

procedure TForm1.FormCreate(Sender: TObject);
var r:TRect;
begin
 bmp1:=TBitmap.Create;
 bmp2:=TBitmap.Create;

 bmp1.LoadFromFile("e:\IMG\untitled.bmp");

 R.Left:=0; R.Top:=0; R.Right:=bmp1.Width; R.Bottom:=bmp1.Height;
 bmp2.Canvas.CopyRect(R,bmp1.Canvas,R);

 Image1.Picture.Assign(bmp2);

 bmp2.free;
 bmp1.Free;
end;


Что-то не копируется.


 
brother ©   (2008-10-13 12:52) [1]

а вот так: bmp2.picture:=bmp1.picture ?


 
{RASkov} ©   (2008-10-13 12:55) [2]

assign


 
{RASkov} ©   (2008-10-13 12:57) [3]

а в [0] второму битмапу bmp2 размер кто будет задавать?


 
ПРавильный$Вася   (2008-10-13 12:58) [4]


> Image1.Picture.Assign(bmp2);

и где у тебя назначение картинке твоего битмапа?


 
TBitmap   (2008-10-13 13:27) [5]

Понял,

 bmp2.Assign(bmp1);


Всем спасибо!



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

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

Наверх




Память: 0.47 MB
Время: 0.014 c
3-1209984155
Ega23
2008-05-05 14:42
2008.11.23
Создать свой ODBC-источник в ран-тайм


10-1150752317
pooh
2006-06-20 01:25
2008.11.23
работа с Excel


2-1223914104
NewSer2
2008-10-13 20:08
2008.11.23
Как проверить строки в DBGridEh и окрасить строки в нужный цвет?


15-1221999919
ProgRAMmer Dimonych
2008-09-21 16:25
2008.11.23
Устройство процессоров


2-1223642970
Gurd
2008-10-10 16:49
2008.11.23
Присвоить событию компонента функцию