Главная страница
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.027 c
14-1130462615
Джо
2005-10-28 05:23
2005.11.20
Ох, нелегкая это работа...


2-1130794011
ArchValentin
2005-11-01 00:26
2005.11.20
Хранение информации разных типов в одном файле


14-1130248221
вразлет
2005-10-25 17:50
2005.11.20
Краткий сетевой словарь либерального сверхчеловека


2-1130955034
$M@RT
2005-11-02 21:10
2005.11.20
Получение списка файлов


14-1130343340
Gydvin
2005-10-26 20:15
2005.11.20
Совместимость Wi-Fi and Bluetooth