Hi Jeff,
You can get the error from the socket object using the get last error
function, you can also get the last error message.
I think i just copied the httppost function and exposed the block sock obj
so I could get at the error code/msg.
On Mar 31, 2016 8:52 PM, "Jeff Cook" <je...@aspect.co.nz> wrote:
> Hi Tony and Roy (I'm used to seeing {Team Elevate] after your name
>
> Roy
>
> I have now acquired ssleay32.dll v1.0.2.1 and libeay32.dll v1.0.1.5.
>
> Now I get a different error "SSL/TLS not compiled!"
>
> I read on the Synapse site that ssl_openssl and ssl_openssl_lib had to be
> added to the project "uses" clause so that is done. Still the same problem.
>
> Tony
>
> Originally, I did what I think you are suggesting and have resurrected the
> code beneath my signature - the reason that I ditched that code is that it
> doesn't seem to give you an error message or code, so you have to guess
> what the problem might be.
>
> So I am still clueless ....
>
> Cheers
>
> Jeff
> ---
> procedure TfrmMain.btnGoClick(Sender: TObject);
> var
> sURL, sURLData: string;
> msData: TMemoryStream;
> begin
> msData := TMemoryStream.Create;
> try
> memResponse.Lines.Add('========================= ' +
> DateTimeToStr(Now));
> sURL := 'https://my.xxxxxxxx.com/apix/function1';
> sURLData := EncodeURLElement
> ('clientid=2&clienttoken=ThisIsAGUID');
> memResponse.Lines.Add('URL: ' + sURL);
> memResponse.Lines.Add('Data: ' + sURLData);
> if HttpPostURL(sURL, sURLData, msData) then // <<<<<<<<<<<<<<<
> memResponse.Lines.Add('success!')
> else
> memResponse.Lines.Add('oh bugger!');
> finally
> msData.Free;
> end;
> end;
>
> On 31/03/2016 6:56 p.m., Roy Lambert wrote:
>
> Jeff
>
> I don't know if it affects what you're trying to do but Google are looking
> for the latest level of security. It may be that the version of libeay32.dll
> and ssleay32 you have aren't recent enough.
>
> Its a bit of a problem at the moment - for my mail and news client I had to
> find a version that was acceptable to elevatesoft & embarcadero, and
> yesterday to get my business app to access a gmail account I had to find the
> bit in gmail that tells it to accept lower security levels.
>
> I'm currently using 1.0.1q libraries but there is a 1.0.2 something out whih
> may be what you need
>
> Roy Lambert
>
>
> ------------------------------------------------------------------------------
> Transform Data into Opportunity.
> Accelerate data analysis in your applications with
> Intel Data Analytics Acceleration Library.
> Click to learn
> more.http://pubads.g.doubleclick.net/gampad/clk?id=278785471&iu=/4140
> _______________________________________________
> synalist-public mailing
> listsynalist-public@lists.sourceforge.nethttps://lists.sourceforge.net/lists/listinfo/synalist-public
>
>
>
>
> ------------------------------------------------------------------------------
> Transform Data into Opportunity.
> Accelerate data analysis in your applications with
> Intel Data Analytics Acceleration Library.
> Click to learn more.
> http://pubads.g.doubleclick.net/gampad/clk?id=278785471&iu=/4140
> _______________________________________________
> synalist-public mailing list
> synalist-public@lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/synalist-public
>
>
------------------------------------------------------------------------------
Transform Data into Opportunity.
Accelerate data analysis in your applications with
Intel Data Analytics Acceleration Library.
Click to learn more.
http://pubads.g.doubleclick.net/gampad/clk?id=278785471&iu=/4140
_______________________________________________
synalist-public mailing list
synalist-public@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/synalist-public
