Модераторы: Snowy, Poseidon, MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> ICS компоненты, ThttpCli использование, кто умеет пользоваться Post, обьясните.. 
:(
    Опции темы
Darksquall
  Дата 9.2.2006, 01:37 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 326
Регистрация: 22.1.2004
Где: Москва

Репутация: нет
Всего: 4



Ищу хелп или помощь по компонентам ICS,
http://www.overbyte.be
ICS - Internet Component Suite
==============================
(Aka FPIETTE's Components)

В принципе многое описано в примерах, но мне не достаточно. Хочу например по TStream передать файл Post'ом и никак что уже только ен перепробовал :-(.
В примерах разработчики используют string для передачи, а мне нужно побольше данных запихнуть через POST.

Если кто умеет передавать файл (не строку) клиентом THttpCli и принимать сервером THttpServ помогите плиз! smile


--------------------
PM WWW ICQ   Вверх
Snowy
Дата 9.2.2006, 11:34 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 53
Всего: 484



Цитата(Darksquall @ 9.2.2006, 01:37 Найти цитируемый пост)
В примерах разработчики используют string для передачи, а мне нужно побольше данных запихнуть через POST

В стринг легко помещается до двух гигабайт данных.
Записать из стрима в стринг элементарно:
Код

  SetLength(str, Stream.Size);
  Stream.Read(s[1], Stream.Size);

PM MAIL   Вверх
Romikgy
Дата 9.2.2006, 11:52 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Любитель-программер
****


Профиль
Группа: Участник Клуба
Сообщений: 7326
Регистрация: 11.5.2005
Где: Porto Franco Odes sa

Репутация: 3
Всего: 146



Snowy А нули в середине файла не повлияют на стринг?
Имхо если есть передача стринга , значит должна быть передача буфера


--------------------
Владение русской орфографией это как владение кунг-фу — истинные мастера не применяют его без надобности. 
smile

PM   Вверх
Snowy
Дата 9.2.2006, 12:06 (ссылка) |    (голосов:1) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 53
Всего: 484



Цитата(Romikgy @ 9.2.2006, 11:52 Найти цитируемый пост)
Snowy А нули в середине файла не повлияют на стринг?
На стринг нет. А вот если мы попытаемся его вывести на экран, тогда да.
Но мы же не будем этого делать smile

PM MAIL   Вверх
Romikgy
Дата 9.2.2006, 12:12 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Любитель-программер
****


Профиль
Группа: Участник Клуба
Сообщений: 7326
Регистрация: 11.5.2005
Где: Porto Franco Odes sa

Репутация: 3
Всего: 146



Darksquall каким методом шлешь пост?
Snowy
Цитата(Snowy @ 9.2.2006, 11:06 Найти цитируемый пост)

Но мы же не будем этого делать

Лично я не буду smile


--------------------
Владение русской орфографией это как владение кунг-фу — истинные мастера не применяют его без надобности. 
smile

PM   Вверх
Darksquall
Дата 5.3.2006, 18:06 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 326
Регистрация: 22.1.2004
Где: Москва

Репутация: нет
Всего: 4



В том тои дело что потом на экран, поэтому пошел таким путем

Код

         Png:=TPNGObject.Create;
         png.Assign(bmp);
         HttpCli1.SendStream:=TMemoryStream.Create;
         png.SaveToStream(HttpCli1.SendStream);
         HttpCli1.SendStream.Seek(0, 0);
         HttpCli1.URL := Trim(ActionURLEdit.Text);
         HttpCli1.PostAsync;



--------------------
PM WWW ICQ   Вверх
Magister Y0da
  Дата 19.2.2010, 09:29 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Зелёненький
*


Профиль
Группа: Участник
Сообщений: 235
Регистрация: 30.11.2004

Репутация: нет
Всего: 2



ИМХО - в шапке форума нужна тема по ICS, и я предлагаю поместить данный топик в шапку и обсуждать все вопросы связанные с ICS

Добавлено @ 09:37
вот у меня код на Indy
Код

  str.Add('username='+login);
  str.Add('password='+password);
  Form1.IdHTTP1.Get('http://site.com/ucp.php?mode=login');
  str.Clear;
  s.Text:=Form1.IdHTTP1.Get('http://site.com/posting.php?mode=reply&f='+fid+'&t='+tid+'&sid='+sid);
  str.Add('subject=');
  str.Add('message='+Form1.ADOz.Fields[3].AsString);
  Form1.IdHTTP1.Post('http://'+link+'/posting.php',str);

покажите мне, пожалуйста, аналог на ICS - я думаю это будет лучший способ понять работу с ICS

Это сообщение отредактировал(а) Magister Y0da - 19.2.2010, 10:23
--------------------
PM MAIL ICQ   Вверх
Akella
Дата 20.2.2010, 01:34 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Творец
****


Профиль
Группа: Модератор
Сообщений: 18485
Регистрация: 14.5.2003
Где: Корусант

Репутация: 4
Всего: 329



Цитата(Magister Y0da @  19.2.2010,  09:29 Найти цитируемый пост)
  str.Add('username='+login);
  str.Add('password='+password);
  Form1.IdHTTP1.Get('http://site.com/ucp.php?mode=login');
  str.Clear;


1. зачем ты заполняшь стринглист логином и паролем, получаешь контент страницы (не используя эти логин и пароль), а потом очищаешь стриглист?

Добавлено через 3 минуты и 4 секунды
Цитата(Magister Y0da @  19.2.2010,  09:29 Найти цитируемый пост)
Form1.IdHTTP1.Get('http://site.com/ucp.php?mode=login');

контент страницы можно получить так
Код

function HttpGetUrl(url: string; HttpCli1: THttpCli): string;
var
 lData: TStringStream;
begin
  lData := TStringStream.Create('');
  httpcli1.URL          := url;
  httpcli1.RcvdStream   := lData;

  try
    HttpCli1.Get;
    Result := lData.DataString;
  except
    result := '';
    FreeAndNil(lData);
    exit;
  end;

  FreeAndNil(lData);

end;


//используем:
s := HttpGetUrl(sURL, HTTPCli1);


Добавлено через 4 минуты и 58 секунд
Цитата(Darksquall @  9.2.2006,  01:37 Найти цитируемый пост)
Ищу хелп или помощь по компонентам ICS,
http://www.overbyte.be
ICS - Internet Component Suite

слева вверху на сайте есть ссылка Support

В инсталляционном пакете, в папке ..\Delphi\Internet есть примеры

Добавлено через 9 минут и 43 секунды
THTTPCli ICS

Добавлено через 14 минут и 17 секунд
HttpCli1.Post

Это сообщение отредактировал(а) Akella - 20.2.2010, 01:34
PM MAIL   Вверх
Akella
Дата 20.2.2010, 01:52 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Творец
****


Профиль
Группа: Модератор
Сообщений: 18485
Регистрация: 14.5.2003
Где: Корусант

Репутация: 4
Всего: 329



Magister Y0da, кстати относительно твое картинки в подписи про поиск в гугле  smile .... всё это я нашёл в гугле
PM MAIL   Вверх
Magister Y0da
  Дата 20.2.2010, 08:16 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Зелёненький
*


Профиль
Группа: Участник
Сообщений: 235
Регистрация: 30.11.2004

Репутация: нет
Всего: 2



Цитата
1. зачем ты заполняшь стринглист логином и паролем, получаешь контент страницы (не используя эти логин и пароль), а потом очищаешь стриглист?

просто я удалил пару лишних строк и выделили основные операции, аналоги которых мне нужны на ICS
Цитата
контент страницы можно получить так

примерно понял
Цитата(Akella @  20.2.2010,  01:52 Найти цитируемый пост)
Magister Y0da, кстати относительно твое картинки в подписи про поиск в гугле   .... всё это я нашёл в гугле 

гугл мне не выдаст аналог.
собственно моя просьба была - показать аналог.

Это сообщение отредактировал(а) Magister Y0da - 20.2.2010, 08:18
--------------------
PM MAIL ICQ   Вверх
Akella
Дата 14.7.2010, 10:01 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Творец
****


Профиль
Группа: Модератор
Сообщений: 18485
Регистрация: 14.5.2003
Где: Корусант

Репутация: 4
Всего: 329



Подскажите, вот если сайт отдаёт контент в упакованном виде, в gzip, как в этом случае быть с THTTPCli?
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Сети"
Snowy
Poseidon
MetalFan

Запрещено:

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делится вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи

Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Snowy, Poseidon, MetalFan.

 
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Сети | Следующая тема »


 




[ Время генерации скрипта: 0.1305 ]   [ Использовано запросов: 21 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.