![]() |
|
|
|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#1
|
|||
|
|||
|
Решил написать загрузчик картинок для сайта hostingkartinok.com
Собственно код Код:
var
Form1: TForm1;
bas:TStringList;Код:
var
gt:string;
begin
bas:= TStringList.Create;
bas.Add('multipart/form-data');
bas.Add('name='+edit1.text);
bas.Add('type='+edit2.text);
bas.Add('value="Загрузить"');
gt:=form1.IdHTTP1.Post('http://hostingkartinok.com/',bas);Надо чтоб после загрузки избражения появлялась его ссылка в едите(мемо ), Но как это реализовать незнаю.. Подскажите как , если что подправьте где нитак ЗЫ. с сетью начал работать недавно так что не пинайте ![]() |