Подсчитать количество принятых/отправленных байт idHTTP
, Delphi XE7
 |
Наши проекты:
Журнал · Discuz!ML · Wiki · DRKB · Помощь проекту |
|
| ПРАВИЛА | FAQ | Помощь | Поиск | Участники | Календарь | Избранное | RSS |
| [216.73.216.223] |
|
|
Соблюдайте общие правила форума
Пожалуйста, выделяйте текст программы тегом [сode=pas] ... [/сode]. Для этого используйте кнопку [code=pas] в форме ответа или комбобокс, если нужно вставить код на языке, отличном от Дельфи/Паскаля.
Указывайте точные версии Delphi и используемых сетевых библиотек.
Не приветствуется поднятие старых тем. Если ваш вопрос перекликается со старой темой, то для вопроса лучше создать новую тему, а старую указать в первом сообщении с описанием взаимосвязи.
Внимание:
попытки открытия обсуждений реализации вредоносного ПО, включая различные интерпретации спам-ботов, наказывается предупреждением на 30 дней.
Повторная попытка - 60 дней. Последующие попытки бан.
Мат в разделе - бан на три месяца...
Полезные ссылки:
MSDN Library 
FAQ раздела 
Поиск по разделу 
Как правильно задавать вопросы
Выразить свое отношение к модераторам раздела можно здесь:
Krid, Rouse_
Указывайте точные версии Delphi и используемых сетевых библиотек.
Не приветствуется поднятие старых тем. Если ваш вопрос перекликается со старой темой, то для вопроса лучше создать новую тему, а старую указать в первом сообщении с описанием взаимосвязи.
Внимание:
попытки открытия обсуждений реализации вредоносного ПО, включая различные интерпретации спам-ботов, наказывается предупреждением на 30 дней.
Повторная попытка - 60 дней. Последующие попытки бан.
Мат в разделе - бан на три месяца...
Полезные ссылки:
MSDN Library FAQ раздела Поиск по разделу Как правильно задавать вопросыВыразить свое отношение к модераторам раздела можно здесь:
Krid, Rouse_
Подсчитать количество принятых/отправленных байт idHTTP
, Delphi XE7
Сообщ.
#1
,
|
|
  |
В Delphi XE7 с помощью IdHTTP.Post / Get работаю с php-скриптами.
  //процедура 1 var M : TStringStream; html : String; begin M := TStringStream.Create(); IdHTTP1.Get('http://сайт.ру/test.php', M); html := M.DataString; end; //процедура 2 var html : String; begin html := IdHTTP1.Get('http://сайт.ру/test2.php'); end; //процедура 3 var ss, M : TStringStream; html : String; begin ss := TStringStream.Create(s, 1251); M := TStringStream.Create; ss.Position := 0; M.Position := 0; ss.WriteString('ACTION=edit'); IdHTTP1.Request.ContentType := 'application/x-www-form-urlencoded'; IdHTTP1.Post('http://сайт.ру/test3.php', ss, M); //отправляем данные через ss и принимаем ответ-результат в M if trim(M.DataString) = 'ok' then showmessage('всё ок.'); Как считать и суммировать все переданные и полученные данные в байтах в течении всей работы приложения? |
|
Сообщ.
#2
,
Сообщение отклонено: Flex Ferrum -
|
0 пользователей читают эту тему (0 гостей и 0 скрытых пользователей)
0 пользователей:
[ Script execution time: 0.0561 ] [ 16 queries used ] [ Generated: 23.08.26, 22:45 GMT ]