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

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

Преобразовать Graphic в BitMap [D7, WinXP]


Страницы:   1 2 3

gunner ©   (2003-09-03 14:20:00) 

У меня в Image.Picture.Graphic находится изображение
что нужно сделать чтобы это изображение перегнать в Image2.Picture.BitMap ?

Заранее спасибо !


Skier   (2003-09-03 17:32:00) [21]

>ZEE © (03.09.03 17:26)

> если хочешь пришлю проект которым проверял

Не надо. Я верю...:)


ZEE   (2003-09-03 17:26:00) [22]

Проверил...
Ты не прав :)
если хочешь пришлю проект которым проверял
Проект состоит из^
Image1, Image2,
Button1 - Открытие картинки,
Button2 - конвертация
OpenPictureDialog1 - ну понятно...
и код его взят тут, выше
разве что добавил код в Button1 ...


Skier   (2003-09-03 17:18:00) [23]

>ZEE © (03.09.03 17:15)
Проверь.


if Image.Picture.Bitmap.Empty then Ты не прав
else Я не прав


ZEE   (2003-09-03 17:15:00) [24]

Image.Picture.Bitmap.Empty не проверял, но по всей видимости =false (картинка-то появляется)


Skier   (2003-09-03 17:13:00) [25]

>ZEE © (03.09.03 17:11)
Хм...
И после этого Image.Picture.Bitmap.Empty даёт False ?


ZEE   (2003-09-03 17:11:00) [26]

>Skier © (03.09.03 17:04) [16]
>Это не решит проблему конветрирования.
у меня так "решается проблема конвертирования" jpeg->bmp, gif->bmp ...


Skier   (2003-09-03 17:04:00) [27]

>ZEE © (03.09.03 16:57)

> Image2.Canvas.Draw(0,0,Image1.Picture.Graphic);

Это не решит проблему конветрирования.

>gunner (03.09.03 16:44)
Попробуй использовать методы :
TPicture.SaveToClipboardFormat и
TPicture.LoadFromClipboardFormat


ZEE   (2003-09-03 16:57:00) [28]

[14] Укусит. - вполне возможно - поэтому проверять надо:
if not Assigned(Image2.Picture.Bitmap)
then Image2.Picture.Bitmap:=TBitmap.Create;


Skier   (2003-09-03 16:55:00) [29]


> Image2.Picture.Bitmap:=TBitmap.Create;

Укусит.


ZEE   (2003-09-03 16:51:00) [30]

Image2.Width:=Image1.Width;
Image2.Height:=Image1.Height;
Image2.Picture.Bitmap:=TBitmap.Create;
Image2.Picture.Bitmap.Width:=image2.Width;
Image2.Picture.Bitmap.Height:=image2.Height;
Image2.Canvas.Draw(0,0,Image1.Picture.Graphic);


gunner   (2003-09-03 16:44:00) [31]

Ну это понятно я спрашивал изначально алгоритм
как из Image.Picture.Graphic сделать Image.Picture.BitMap


Skier   (2003-09-03 16:42:00) [32]


> я не знаю что там такое

Я тем более...


gunner   (2003-09-03 16:39:00) [33]

Изначально в Image приежает изображение со сканера... я не знаю что там такое... мне нужно из этого получить BitMap неужели нет алгоритма


Skier   (2003-09-03 16:37:00) [34]

А изначально что ты грузил в Image gif или jpeg ?


gunner   (2003-09-03 16:32:00) [35]

Нужно мне потом из Image в базу BitMap скинуть.....
наверняка должен быть какой то простой способ как из Graphic в BitMap преобразовать....
этож всё одно и тоже можно сказать хранящеяся в одном месте....
чёт вот никк только не выходит


Skier   (2003-09-03 16:30:00) [36]

>gunner (03.09.03 16:27)
ОК. Зачем тебе именно BitMap ?


gunner   (2003-09-03 16:27:00) [37]

> Skier ©

Эта фишка не катит... я таким образом просто перегоняю из одного Image в другой всё тот же Graphic а BitMap - па там нету :(


Skier   (2003-09-03 14:44:00) [38]

Shit. Моя ошибка. Извини.

Image2. Picture.Assign(Image .Picture);


gunner   (2003-09-03 14:41:00) [39]

> Skier ©

Нет, так он ругается, пишет что не может сконвертировать Image в Image
Жопа с клеем вобщем


Skier   (2003-09-03 14:29:00) [40]

>gunner (03.09.03 14:26)
Image2.Assign(Image) ?


Страницы:   1 2 3

Наверх

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