Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > Интернет и сети
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 01.08.2010, 10:32
maisdanel maisdanel вне форума
Прохожий
 
Регистрация: 06.01.2010
Сообщения: 3
Репутация: 10
По умолчанию Как скачать img из интернета и сохранить на C:\my.jpg ?

Еслы ссилка такая на
http://i73.odnoklassniki.ru/getImage...70&photoType=0
Ответить с цитированием
  #2  
Старый 01.08.2010, 14:35
Аватар для NumLock
NumLock NumLock вне форума
Let Me Show You
 
Регистрация: 30.04.2010
Адрес: Северодвинск
Сообщения: 5,426
Версия Delphi: 7, XE5
Репутация: 59586
По умолчанию

Код:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
procedure TForm1.FormCreate(Sender: TObject);
var
  IdHTTP1: TIdHTTP;
  memorystream: TMemoryStream;
  jpegimage: TJPEGImage;
begin
  IdHTTP1:=TIdHTTP.Create(Self);
  memorystream:=TMemoryStream.Create;
  jpegimage:=TJPEGImage.Create;
  try
    memorystream.Position:=0;
    jpegimage.LoadFromStream(memorystream);
    jpegimage.SaveToFile('c:\Downloads\my.jpg');
  finally
    jpegimage.Free;
    memorystream.Free;
    IdHTTP1.Free;
  end;
end;
Ответить с цитированием
  #3  
Старый 18.08.2010, 10:07
babajko babajko вне форума
Прохожий
 
Регистрация: 18.08.2010
Сообщения: 1
Репутация: 10
По умолчанию

а если на сайте несколько рисунков как можна сохратить тот которий мне нужен (имя ево я знаю)
вот код:
Код:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
<form action="." method="post" class="forms_edit" id="voteserver_frm"><input name="PHPSESSID" value="4bfcc97969dd2652dbf5007b3f14a6b8" type="hidden">
<div id="vote_for_server">
    <div class="vote_server_title" style="width: 190px;">
        <div class="vote_server_title_text">i?iaieiniaaou ca na?aa?</div>
 
        <div class="vote_server_title_r"></div>
    </div>
     
    <div class="vote_server_box" style="width: 100%;">
        <div class="vote_server_box_text">Asterios</div>
        <div class="vote_server_box_r"></div>
    </div>
 
    <div class="rounded_block_01">
        <div class="tl"><div class="tr"></div></div>
 
         
        <div class="vote_server_text">
            <div>
                <div style="float: left;">
                    <label>aaaaeoa eia caueou:</label>
                    <input name="captcha" class="vote_server_tbox" value="" style="width: 175px;" type="text">
                </div>
                 
                 
                <div style="float: left; margin-top: 36px;">
                    <a class="captcha" title="Iaiiaeou" href="#" onclick="$('#captcha').attr('src','http://la2.mmotop.ru/lib/securimage/securimage_show.php?' + Math.random());return false;">
 
                    <img id="captcha" <b>src="http://la2.mmotop.ru/lib/securimage/securimage_show.php" </b>border="0"></a>
                    <a href="http://la2.mmotop.ru/vote/9411/@?PHPSESSID=4bfcc97969dd2652dbf5007b3f14a6b8" onclick="$('#captcha').attr('src','http://la2.mmotop.ru/lib/securimage/securimage_show.php?' + Math.random());return false;" class="reload_captcha"><img src="index/ico_reload.gif"></a>
                </div>
                 
                 
                 
            </div>
            <div class="clear"></div>
                        <div>
                <label>aaaaeoa eiy aaoaai ia?niia?a:</label>
                <input name="votes_charname" value="" class="vote_server_tbox" style="width: 370px;" type="text">
 
                <img src="index/ico_man.gif" class="vote_server_char">
            </div>
                        <div>
                <label>auaa?eoa na?aa?, ia eioi?ii ea?aaoa:</label>
                <select name="votes_server" class="vote_server_tbox" style="width: 100%;">
                                        <option value="5057" selected="selected">Hunter</option>
                                    </select>
            </div>
 
             
        </div>
        <div class="bl"><div class="br"></div></div>
    </div>
    <div class="button_vote_server">
        <a href="#" onclick="$('#voteserver_frm').submit(); return false;">Aieiniaaou</a>
    </div>
</div>
</form>

вот место откуда рисунок берётся
Код:
1
...<img id="captcha" <b>src="http://la2.mmotop.ru/lib/securimage/securimage_show.php" </b>border="0">...

Последний раз редактировалось babajko, 18.08.2010 в 10:33.
Ответить с цитированием
  #4  
Старый 18.08.2010, 10:33
Аватар для NumLock
NumLock NumLock вне форума
Let Me Show You
 
Регистрация: 30.04.2010
Адрес: Северодвинск
Сообщения: 5,426
Версия Delphi: 7, XE5
Репутация: 59586
По умолчанию

добавить:
Код:
1
2
uses
  jpeg, IdHTTP, ...
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 22:11.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025