Lazarus: Establecer User-Agent en TFPHttpClient

El TFPHttpClient proporciona la función AddHeader, que le permite agregar cualquier header que desee a su request.

AddHeader toma dos parámetros, el nombre del header y el valor. Para establecer el agente de usuario, por ejemplo, en Mozilla/5.0, sería este:

AddHeader('User-Agent', 'Mozilla/5.0');

En total, la llamada se puede implementar así:

hc := TFPHttpClient.Create(Nil);
try
  hc.AddHeader('User-Agent', 'Mozilla/5.0');
  html := hc.Get(url);
finally
  hc.Free;
end;

Por supuesto, en lugar de Mozilla/5.0, también puede pasar cualquier otra cadena de su deseo.
30/10/2022 a las 23:43