Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 05.08.2013, 07:55   #1
IvanVMF
 
Регистрация: 28.07.2013
Сообщений: 3
Сообщение Как присвоить картинку в Image?

Доброго времени суток! Есть написанный браузер. Проблема в следующем. Получаю картинку с яндекса через Ole в delphi 7. Подскажите как мне ее отправить в Image1.Picture? Заранее благодарен за ответ!
IvanVMF вне форума Ответить с цитированием
Старый 05.08.2013, 08:19   #2
саша40
Участник клуба
 
Регистрация: 12.09.2012
Сообщений: 1,030
По умолчанию

Получить битмап изображения из хендла документа и присвоить в свойство BitMap у Image.
Что нужно программисту: Компьютер, Среда программирование, Воображение, Прямые руки, Мозги, Знания этой среды программирования.
Программист-это профессия, а программирование-это моё хобби.
саша40 вне форума Ответить с цитированием
Старый 05.08.2013, 08:27   #3
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Взято из яндекса:
Код:
Image.Width := OleContainer2.ClientRect.Right - OleContainer2.ClientRect.Left;
Image.Height :=OleContainer2.ClientRect.Bottom - OleContainer2.ClientRect.Top;
Bitmap.Transparent:=true;
OleContainer2.PaintTo(Image.picture.bitmap.Canvas,0,0);
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 06.08.2013, 07:23   #4
IvanVMF
 
Регистрация: 28.07.2013
Сообщений: 3
По умолчанию

Цитата:
Сообщение от Stilet Посмотреть сообщение
Взято из яндекса:
Код:
Image.Width := OleContainer2.ClientRect.Right - OleContainer2.ClientRect.Left;
Image.Height :=OleContainer2.ClientRect.Bottom - OleContainer2.ClientRect.Top;
Bitmap.Transparent:=true;
OleContainer2.PaintTo(Image.picture.bitmap.Canvas,0,0);
Спасибо! Помогло...
IvanVMF вне форума Ответить с цитированием
Старый 06.08.2013, 22:38   #5
саша40
Участник клуба
 
Регистрация: 12.09.2012
Сообщений: 1,030
По умолчанию

Цитата:
Сообщение от Stilet Посмотреть сообщение
Взято из яндекса:
Код:
Image.Width := OleContainer2.ClientRect.Right - OleContainer2.ClientRect.Left;
Image.Height :=OleContainer2.ClientRect.Bottom - OleContainer2.ClientRect.Top;
Bitmap.Transparent:=true;
OleContainer2.PaintTo(Image.picture.bitmap.Canvas,0,0);
Ай да. Из Ole-контейнера.
Что нужно программисту: Компьютер, Среда программирование, Воображение, Прямые руки, Мозги, Знания этой среды программирования.
Программист-это профессия, а программирование-это моё хобби.
саша40 вне форума Ответить с цитированием
Старый 06.08.2013, 22:53   #6
Человек_Борща
Старожил
 
Аватар для Человек_Борща
 
Регистрация: 30.12.2009
Сообщений: 11,430
По умолчанию

Цитата:
Ай да. Из Ole-контейнера.
Мне кажется, или Stertor и этот поц чем-то похожи?
Этот очень тонко троллит, Stertor обзавидуется.

Хотя нет, Stertor хоть и троллит, но по делу пишет, а у саша40 тупо троллинг, причем тончайший. К.О. придет в уж0сн@х.
Человек_Борща вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Как объединить 2 Image и сохранить как одну картинку? artemavd Общие вопросы Delphi 18 14.05.2012 11:20
как в image Userform загрузить картинку с другой формы? Composter Microsoft Office Excel 2 19.05.2011 10:56
Как присвоить итему меню при выделении цветную картинку? SkAndrew Общие вопросы Delphi 2 07.08.2008 17:43
Как уменшить картинку (image) geniy Компоненты Delphi 7 16.03.2008 18:50
картинку в image vitalik007 Общие вопросы Delphi 2 05.11.2007 21:10