Nano Hash - криптовалюты, майнинг, программирование

Как прочитать ответ от Indy IdHTTP получить

Я написал код для использования get с компонентом indy IdHTTP.

var
get_url: string;
resp: TMemoryStream;
begin
  get_url := 'http://localhost/salesapp/is_run.php?ser=';
  resp := TMemoryStream.Create;

  IdHTTP1.Get(get_url+'v', resp);
  memo1.Lines.LoadFromStream(resp);

Этот URL-адрес http://localhost/salesapp/is_run.php?ser=v возвращает ответ JSON, но я не знаю, как его прочитать из Delphi.

delphi indy
11.02.2015

  • Это известный формат или вы придумали свой? 11.02.2015
  • Вы имеете в виду ответ PHP? Я использовал fetchAll(PDO::FETCH_ASSOC) 11.02.2015
  • Дело в том, что вам нужен синтаксический анализатор на стороне вашего клиента Delphi, и я сомневаюсь, что он есть для необработанного набора результатов PHP. Вы должны обмениваться данными с клиентом в каком-то известном формате, например, например. XML или JSON. 11.02.2015
  • В случае, если я вернул JSON, как я могу прочитать его из независимых компонентов? 11.02.2015
  • Вы запускаете его через анализатор JSON, как сказал TLama. 11.02.2015
  • Любой пример чтения JSON? 11.02.2015
  • Есть много примеров JSON. Куда вы смотрели до сих пор? 11.02.2015
  • Я хочу прочитать JSON, используя Indy, но пока не могу найти. 11.02.2015
  • Вы не читаете JSON, используя Indy. Вы извлекаете или получаете JSON с помощью Indy, а затем читаете этот JSON из своего кода Delphi. 12.02.2015

Ответы:


1

Когда Get() выходит, Position потока находится в конце потока. Вам нужно сбросить Position обратно в 0 перед вызовом LoadFromStream(), иначе ему нечего будет загружать:

var
  get_url: string;
  resp: TMemoryStream;
begin
  get_url := 'http://localhost/salesapp/is_run.php?ser=';
  resp := TMemoryStream.Create;
  try
    IdHTTP1.Get(get_url+'v', resp);
    resp.Position := 0; // <-- add this!!
    memo1.Lines.LoadFromStream(resp);
  finally
    resp.Free;
  end;
end;

В качестве альтернативы можно удалить TMemoryStream и позволить Get() вместо этого вернуть JSON как String:

memo1.Text := IdHTTP1.Get(get_url+'v');
11.02.2015
Новые материалы
Кластеризация: более глубокий взгляд
Кластеризация — это метод обучения без учителя, в котором мы пытаемся найти группы в наборе данных на основе некоторых известных или неизвестных свойств, которые могут существовать. Независимо от..
Как написать эффективное резюме
Предложения по дизайну и макету, чтобы представить себя профессионально Вам не позвонили на собеседование после того, как вы несколько раз подали заявку на работу своей мечты? У вас может..
Частный метод Python: улучшение инкапсуляции и безопасности
Введение Python — универсальный и мощный язык программирования, известный своей простотой и удобством использования. Одной из ключевых особенностей, отличающих Python от других языков, является..
Как я автоматизирую тестирование с помощью Jest
Шутка для победы, когда дело касается автоматизации тестирования Одной очень важной частью разработки программного обеспечения является автоматизация тестирования, поскольку она создает..
Работа с векторными символическими архитектурами, часть 4 (искусственный интеллект)
Hyperseed: неконтролируемое обучение с векторными символическими архитектурами (arXiv) Автор: Евгений Осипов , Сачин Кахавала , Диланта Хапутантри , Тимал Кемпития , Дасвин Де Сильва ,..
Понимание расстояния Вассерштейна: мощная метрика в машинном обучении
В обширной области машинного обучения часто возникает необходимость сравнивать и измерять различия между распределениями вероятностей. Традиционные метрики расстояния, такие как евклидово..
Обеспечение масштабируемости LLM: облачный анализ с помощью AWS Fargate и Copilot
В динамичной области искусственного интеллекта все большее распространение получают модели больших языков (LLM). Они жизненно важны для различных приложений, таких как интеллектуальные..