Hello,
I'm trying connect / use an API from a service in Lazarus (and OS X), but things don't go ahead.
Its my first contact trying to use an API on Lazarus.
The api is from:
http://api.proofhq.comI tryed connect to start with this code, but return error 500
var
http: THTTPSend;
Url: string;
begin
http := THTTPSend.Create;
Url := 'https://soap.proofhq.com/19_2_6/soap.wsdl';
if not http.HTTPMethod('GET', Url) then
begin
ShowMessage(http.Headers.text + #13 + '(' + IntToStr(http.ResultCode) + ')' + http.ResultString);
end
else
begin
ShowMessage(http.Headers.text + #13 + '(' + IntToStr(http.ResultCode) + ')' + http.ResultString);
end;
http.Free;
end;
I added ssl_openssl in the uses but stay returning error 500.
What i doing wrong?