Hi
my simply code
procedure TForm1.Button4Click(Sender: TObject);
var
response : String;
Client: TFPHttpClient;
begin
Client := TFPHttpClient.Create(nil);
try
Client.AllowRedirect := true;
Client.AddHeader('User-Agent','Mozilla/5.0 (compatible; fpweb)');
response:=Client.Get('https://www.lazarus-ide.org/','');
finally
ShowMessage(response);
Client.Free;
end;
end;
my uses clause:
Classes, SysUtils, Forms, Controls, Graphics, Dialogs, StdCtrls, fphttpclient, opensslsockets;
After press button get error class EInOutError with message: could not initialize OpenSSL library.
Did I miss something? The code is simply, so where to dig?
Lazarus 2.0.10, fpc 3.2.0, win7 64 bit.