1 Как при использовании TDomNodeList получить содержимое произвольного контейнера (ноды) в виде куска исходного HTML кода?
(Полезно в отладке и вообще ингода проще конечную операцию извлечения данных "в ручном режиме" делать, а не писать что-то сомнительное вроде NodeList[i].ChildNodes[1].ChildNodes[1].ChildNodes[3].ChildNodes[1].ChildNodes[0].TextContent )
2 Как установить компонент InternetTools в Лазарусе 2.0.8 и 2.0.10 ?
(Простота использования подкупает ... да там есть автономный simplehtmlparser.pas но примеров именно его использования я не обнаружил )
3 Почему httpclient.Free; сразу после чтения httpclient.Get ИНОГДА выдает ошибку? (Убрал httpclient.Free; а httpclient сделал глобальной переменной проблемы резко исчезли )
- Код: Выделить всё
httpclient := TFPHttpClient.Create(nil);
httpclient.AddHeader('User-Agent',
'Mozilla/5.0 (Windows NT 6.1; WOW64; rv:54.0) Gecko/20100101 Firefox/54.0');
try
st:=TMemoryStream.Create;
httpclient.Get(S_URL,St);
if st <> Nil then begin
St.Seek(0, soFromBeginning);
Image1.Picture.LoadFromStream(ST);
end;
finally
St.Free ;
httpclient.Free;
end;