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

Вниз

Вопрос по Image   Найти похожие ветки 

 
zero-g ©   (2005-11-05 18:47) [0]

ДОброго времени суток!

Скажите, в Image1 есть изображение, я хочу выдрать кусок в bmp файл, а палучаю белый фон....

     bmp := tbitmap.Create;
     bmp.Width := 180;
     bmp.Height := 240;
     BitBlt(Bmp.Canvas.Handle, 0, 0, 180, 240,
     form7.Image1.Picture.Bitmap.Canvas.Handle,0,0, SRCCOPY);
     bmp.SaveToFile("c:\1.bmp");
     bmp.Free;
     form7.Image1.Picture := Nil;

В чем фишка????


 
Eraser ©   (2005-11-05 22:39) [1]


> zero-g ©   (05.11.05 18:47)

Вроде должно работать, если картинка загружена правильно в этот Image1.

> form7.Image1.Picture := Nil;

А это что за чудо?


 
zero-g ©   (2005-11-06 08:41) [2]

>Вроде должно работать, если картинка загружена правильно в этот Image1.

ну загружена таким макаром...

var jpg : TJPGImage;
begin

jpg := TJPGImage.create;
jpg.loadfromfile(".\1.jpg");

form7.image1.picture.assign(jpg) // помоему так, не помню ...
jpg.free;
end;

> form7.Image1.Picture := Nil;

>>А это что за чудо?
Ну это после того как выдираю то что надо, типо убираю картинку из Image, чтоб память не занимать. )


 
zero-g ©   (2005-11-06 08:46) [3]

Кстате, когда вдя bmp типа TBITMAP то работает... а вот и Imag не работает....
Тока не говорите что мол работай с переменными ))

Мне нужен Image )
На Imagе есть кнопка, которая имеет определенный размер, и перемешается по изображению, кнопка типо прозрачная... когда на нее кликаешь, мне надо вытащить именно тот кусок изображения,  который лежит за кнопкой... Смысл понятен?
я пока тока пытаюсь вообще выдрать хоть чтото из Image... если прокатит, но надо будет думать как выдрать нужный врагмент...


 
Набережных С. ©   (2005-11-06 10:14) [4]


> zero-g ©   (06.11.05 08:41) [2]


> form7.image1.picture.assign(jpg)

В результате в Image.Picture создается Graphic типа TJPegImage. При попытке обращения к Image1.Picture.Bitmap.Canvas.Handle этот Graphic уничтожается и вместо него создается Graphic типа TBitmap, который, естественно, пустой.
 Можно сделать так:

jpg := TJPGImage.create;
jpg.loadfromfile(".\1.jpg");

form7.image1.picture.Bitmap.assign(jpg)
jpg.free;


 
zero-g ©   (2005-11-06 10:16) [5]

хорошо, попробую :)
спасиб.



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

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

Наверх




Память: 0.47 MB
Время: 0.026 c
14-1130249321
Hamertime
2005-10-25 18:08
2005.11.20
Расшифровка бинарного кода


1-1130075337
Tori
2005-10-23 17:48
2005.11.20
передача значений параметров потоку


2-1131047306
Eksell
2005-11-03 22:48
2005.11.20
Kak v Console ochisteti ekran?


2-1131125586
caspersoft
2005-11-04 20:33
2005.11.20
Помогите срочно


14-1130269405
Операция Тайд или кипечение
2005-10-25 23:43
2005.11.20
Voip