• Что бы вступить в ряды "Принятый кодер" Вам нужно:
    Написать 10 полезных сообщений или тем и Получить 10 симпатий.
    Для того кто не хочет терять время,может пожертвовать средства для поддержки сервеса, и вступить в ряды VIP на месяц, дополнительная информация в лс.

  • Пользаватели которые будут спамить, уходят в бан без предупреждения. Спам сообщения определяется администрацией и модератором.

  • Гость, Что бы Вы хотели увидеть на нашем Форуме? Изложить свои идеи и пожелания по улучшению форума Вы можете поделиться с нами здесь. ----> Перейдите сюда
  • Все пользователи не прошедшие проверку электронной почты будут заблокированы. Все вопросы с разблокировкой обращайтесь по адресу электронной почте : info@guardianelinks.com . Не пришло сообщение о проверке или о сбросе также сообщите нам.

Открыть Фотку В Мемо1

CoderNight

Знающий кодер
Принятый Кодер
Регистрация
4 Июн 2015
Сообщения
6
Баллы
28
например я загрузил url фотку в хостинг изображений
image3213


и хочу добавить это в memo1

когда добавил в мемо, нажал на кнопку и появилась сама картинка

не открывалась через браузере и т.д

а в самой проге
 
Не смотри.
Я к примеру залил фотку в онлайн хостинг фоток.
Скопировал там ссылку там где в начале и в конце
Вставил я эту ссылку в memo1.
Нажимаю на кнопку, и у меня открывается окно и показывает эту фотку
 
но во первых тебе все это надо делать в потоке,что бы не тормозила прога,
делаешь скачку файла в потоке (я делал видео урок) после того как скачался файл делаешь логику,что бы он открылся в компоненте image то есть (image.loadfromfile,image.visible=true,после закрытия программы просто удаляешь папку в которой лежали фотки если это надо было или просто чистишь папку,ну и на крайняк делаешь ini файл)
 
А можешь сразу код кинуть? Пожауйста :)
 
Кидаем на форму 1) Image1, 2) Edit1, 3) Button1, 4) IdHTTP1, в uses добавляешь Jpeg.
index.php

Нажимаем кнопку Загрузить и пишим код:
Код:
procedure TForm1.Button1Click(Sender: TObject);
var
a:TMemoryStream;
b:TJPEGImage;

begin
a:=TMemoryStream.Create;

idhttp1.Get(Edit1.text,a);

//IdHTTP1.Get('http://theartmad.com/wp-content/uploads/2015/04/Smile-6.jpg',a);

a.Position:=0;

b:=TJPEGImage.Create;

b.LoadFromStream(a);

Image1.Picture.Assign(b);

a.Free;

b.Free;
end;

запускаем програму вставляем сылку "http://theartmad.com/wp-content/uploads/2015/04/Smile-6.jpg"и нажимаем загрузить.
Вот и всё.
 

Вложения

  • 1.png
    1.png
    22.2 КБ · Просмотры: 18
У меня красным выделяет TJPEGImage? С чем это свзяано? Использую с alphaskins
 
добавь в прогу браузер, и открывай ее в своем браузере
 

Вложения

  • Bild.rar
    Bild.rar
    2.7 МБ · Просмотры: 5
Последнее редактирование:
Вверх Снизу