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

Вниз

Image1 Каким образом загрузить картинку с сайта???   Найти похожие ветки 

 
HITMAN ©   (2006-12-21 22:10) [0]

я пишу простейшее:
image1.Picture.LoadFromFile("http://informer.gismeteo.ru/34240-10.GIF");
есть ли какой нибудь простой метод или как прописать данный адрес, чтобы загрузилось???
заранее благодарен!!!


 
Dmitrij_K   (2006-12-21 22:14) [1]


mem := TMemoryStream.Create;
IdHTTP.Get("http://site/img.jpg", mem); // Indy TIdHTTP
mem.Position := 0;
Image.Picture.LoadFromStream(mem);
mem.Free;


 
Palladin ©   (2006-12-21 22:15) [2]

еще одна гениальность...


 
Palladin ©   (2006-12-21 22:18) [3]

почему бы и так не написать
image1.Picture.LoadFromFile("Россия, г. Ханты-Мансийск, ул. Чехова, рекламный щиток перед детским садиком");


 
HITMAN ©   (2006-12-21 22:21) [4]

var
mem:TMemoryStream;

begin
...
Image.Picture.LoadFromStream(mem);

LoadFromStream -  говорит, что нету такого
[Error] Unit1.pas(80): Undeclared identifier: "LoadFromStream"

Использую D6


 
HITMAN ©   (2006-12-21 22:30) [5]

нает кто нить или не подскажет, очень надо, просто моя новая почтовая программа показывает погоду, интерфейсом так задуманно...


 
Плохиш ©   (2006-12-21 22:40) [6]


> HITMAN ©   (21.12.06 22:30) [5]

Лучше б за пивом с фисташками бегала :-(


 
HITMAN ©   (2006-12-21 22:53) [7]

Вроде всё есть, теперь немагу поместить картинку из памяти "мем" в Image1
Очень нужно ПЛЗ!!!


 
ProgRAMmer Dimonych ©   (2006-12-21 23:14) [8]

По поводу некомпилирующегося LoadFromStream - у TPicture на самом деле нет такого метода, зато он есть у TImage.Picture.Bitmap. Ещё один вопрос: откуда уверенность, что TImage (VCL"ный) способен отображать GIF"ы?


 
HITMAN ©   (2006-12-21 23:57) [9]

С жосткого диска Image прогружает в себя GIF"ы, вот и уверенность...


 
HITMAN ©   (2006-12-22 00:33) [10]

Готовый пример для тех, кто в танке!!!

uses
gifimage

var
_MS: TMemoryStream;
begin
_MS := TMemoryStream.Create;
try
IdHTTP1.Get("http://informer.gismeteo.ru/34240-10.GIF", _MS);
_MS.Position := 0;
Image1.Picture.Graphic := TGIFImage.Create;
Image1.Picture.Graphic.LoadFromStream(_MS);

finally
_MS.Free;
end;


 
Германн ©   (2006-12-22 01:31) [11]


> HITMAN ©   (21.12.06 23:57) [9]
>
> С жосткого диска Image прогружает в себя GIF"ы, вот и уверенность.
> ..
>

Сказал бы лучше, что пользуешь RxLib.



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

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

Наверх




Память: 0.46 MB
Время: 0.011 c
15-1167024474
Slider007
2006-12-25 08:27
2007.01.14
С днем рождения ! 23 декабря


2-1166921681
Fist
2006-12-24 03:54
2007.01.14
if FindFirst( *.* , faDirectory, srDir) = 0 then - находит все фа


15-1166835381
AntiUser
2006-12-23 03:56
2007.01.14
Настоящие мужчины ЛЮБЯТ Windows


10-1127933093
Pavell
2005-09-28 22:44
2007.01.14
Передача массива в IDispatch


2-1166873475
Серый
2006-12-23 14:31
2007.01.14
удаление из stringgrid





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский