Correct delphi code to get the SSL finger print for google

Hi all, I have a source code of delphi (Attached) which retrieves the SSL finger print of any site correctly: So if I enter [login to view URL] I get F5:6B:F2:44:63:B0:BD:61:36:C5:E8:72:34:6B:32:04:28:FF:4D:7C The only issue I have with it is with [login to view URL] I think the http component gets the page from the local ISP and reports wrong SSL as the following: F4:69:4A:F2:CF:F8:46:95:35:A2:44:E5:F9:CE:6A:4E:8D:33:43:45 Wrong SSL for [login to view URL] From local ISP via Delphi ‎25:89:c1:70:6b:04:54:43:9f:28:fa:8f:3e:d3:7c:45:05:79:9b:c4 Correct SSL for [login to view URL] from Chrome and Firefox webbrowser What is required from you : 1- Fix the code to give me correct SSL finger print for [login to view URL] 2- If the site queried is using ECDHE as key exchange mechanism this should be displayed on different edit box ( google is using it) or popup message. U can find this in chrome browser by checking the ssl information. 3- If site is using Extended Validation SSL this should be shown on a different edit box or popup message. 4- Currently the application uses Indy components from theVCL IdHTTP1 + IdSSLIOHandlerSocketOpenSSL1 I want it to be converted to native api code so I use native code no visual component like the following example: ================ procedure [login to view URL]; var HTTP: TIdHTTP; SSL: TIdSSLIOHandlerSocketOpenSSL; i: Integer; HTTPResponse, HostIP: string; begin HTTP := [login to view URL](nil); SSL := [login to view URL](nil); try [login to view URL] := sslvSSLv23; // set SSL version (ver 2 + 3) [login to view URL] := [sslvSSLv2, sslvSSLv3, sslvTLSv1, sslvTLSv1_1, sslvTLSv1_2]; [login to view URL] := [sslvrfPeer]; // set verifymode otherwise getting local ISP ssl finger print fails [login to view URL] := IdSSLIOHandlerSocketOpenSSL1VerifyPeer; // set onVerifyPeer event [login to view URL] := 10 * 1000; // set connect timeout [login to view URL] := 10 * 1000; // set read response timeout [login to view URL] := SSL; [login to view URL] := True; ================ I will attach the code I have ... I will not accept the bit unless u show me a working exe that I will test more than once site on it to make sure it does what I want. It should be fully commented so I can modify it they way I want. I want a working application form + button + url input text box + ssl fingerprint on memo box. Do not use any ActiveX use pure delphi code. project should not take more than one day after acceptance. Need ur support if I need to tweak the code Additional resources: Extended Validation SSL Example: [login to view URL] EV SSL resources Cool with source code [login to view URL] IDS OF EV from Fire fox [login to view URL] Ids from wiki [login to view URL] more: [login to view URL] [login to view URL]