<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<meta content="text/html; charset=ISO-8859-1"
http-equiv="Content-Type">
</head>
<body bgcolor="#ffffff" text="#000000">
Thanks Cameron<br>
<br>
Will give these a go.<br>
<br>
<div class="moz-signature">
<meta http-equiv="Content-Type" content="text/html; charset=ISO-8859-1">
<meta name="ProgId" content="Word.Document">
<meta name="Generator" content="Microsoft Word 11">
<meta name="Originator" content="Microsoft Word 11">
<link rel="File-List" href="Robert%20Martin_files/filelist.xml">
<title>Robert Martin</title>
<!--[if gte mso 9]><xml>
<o:DocumentProperties>
<o:Author>Wild Software Ltd</o:Author>
<o:LastAuthor>Wild Software Ltd</o:LastAuthor>
<o:Revision>6</o:Revision>
<o:TotalTime>55</o:TotalTime>
<o:Created>2009-02-13T02:47:00Z</o:Created>
<o:LastSaved>2009-02-13T03:42:00Z</o:LastSaved>
<o:Pages>1</o:Pages>
<o:Words>13</o:Words>
<o:Characters>77</o:Characters>
<o:Company>Wild Software Ltd</o:Company>
<o:Lines>1</o:Lines>
<o:Paragraphs>1</o:Paragraphs>
<o:CharactersWithSpaces>89</o:CharactersWithSpaces>
<o:Version>11.9999</o:Version>
</o:DocumentProperties>
</xml><![endif]--><!--[if gte mso 9]><xml>
<w:WordDocument>
<w:SpellingState>Clean</w:SpellingState>
<w:GrammarState>Clean</w:GrammarState>
<w:PunctuationKerning/>
<w:ValidateAgainstSchemas/>
<w:SaveIfXMLInvalid>false</w:SaveIfXMLInvalid>
<w:IgnoreMixedContent>false</w:IgnoreMixedContent>
<w:AlwaysShowPlaceholderText>false</w:AlwaysShowPlaceholderText>
<w:Compatibility>
<w:BreakWrappedTables/>
<w:SnapToGridInCell/>
<w:WrapTextWithPunct/>
<w:UseAsianBreakRules/>
<w:DontGrowAutofit/>
</w:Compatibility>
<w:BrowserLevel>MicrosoftInternetExplorer4</w:BrowserLevel>
</w:WordDocument>
</xml><![endif]--><!--[if gte mso 9]><xml>
<w:LatentStyles DefLockedState="false" LatentStyleCount="156">
</w:LatentStyles>
</xml><![endif]-->
<style>
<!--
/* Style Definitions */
p.MsoNormal, li.MsoNormal, div.MsoNormal
{mso-style-parent:"";
margin:0cm;
margin-bottom:.0001pt;
mso-pagination:widow-orphan;
font-size:12.0pt;
font-family:"Times New Roman";
mso-fareast-font-family:"Times New Roman";}
span.SpellE
{mso-style-name:"";
mso-spl-e:yes;}
@page Section1
{size:595.3pt 841.9pt;
margin:72.0pt 90.0pt 72.0pt 90.0pt;
mso-header-margin:35.4pt;
mso-footer-margin:35.4pt;
mso-paper-source:0;}
div.Section1
{page:Section1;}
-->
</style><!--[if gte mso 10]>
<style>
/* Style Definitions */
table.MsoNormalTable
{mso-style-name:"Table Normal";
mso-tstyle-rowband-size:0;
mso-tstyle-colband-size:0;
mso-style-noshow:yes;
mso-style-parent:"";
mso-padding-alt:0cm 5.4pt 0cm 5.4pt;
mso-para-margin:0cm;
mso-para-margin-bottom:.0001pt;
mso-pagination:widow-orphan;
font-size:10.0pt;
font-family:"Times New Roman";
mso-ansi-language:#0400;
mso-fareast-language:#0400;
mso-bidi-language:#0400;}
</style>
<![endif]-->
<div class="Section1">
<p class="MsoNormal"><i style=""><span
style="font-size: 10pt; font-family: Arial;" lang="EN-NZ">Robert Martin<o:p></o:p></span></i></p>
<p class="MsoNormal"><i style=""><span
style="font-size: 10pt; font-family: Arial;" lang="EN-NZ">Software
development
manager<o:p></o:p></span></i></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Arial;"
lang="EN-NZ"><o:p> </o:p></span></p>
<p class="MsoNormal"><span class="SpellE"><span
style="font-size: 10pt; font-family: Arial;" lang="EN-NZ">Chreos</span></span><span
style="font-size: 10pt; font-family: Arial;" lang="EN-NZ"><o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Arial;"
lang="EN-NZ"><a class="moz-txt-link-abbreviated" href="http://www.chreos.co.nz">www.chreos.co.nz</a><o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Arial;"
lang="EN-NZ">Ph +64 03 377-0495<o:p></o:p></span></p>
<p class="MsoNormal"><span style="" lang="EN-NZ"><o:p> </o:p></span></p>
<p class="MsoNormal"><span style="color: rgb(255, 153, 0);" lang="EN-NZ"><o:p> </o:p></span></p>
<p class="MsoNormal"><span style="" lang="EN-NZ"><o:p> </o:p></span></p>
</div>
</div>
<br>
On 26/02/2010 12:19 p.m., Cameron Hart wrote:
<blockquote
cite="mid:DBC5CCA98A0EE4459C8BE38BF3028F124654E9@flowserver.flow.net.nz"
type="cite">
<meta http-equiv="Content-Type"
content="text/html; charset=ISO-8859-1">
<meta name="Generator" content="Microsoft Word 12 (filtered medium)">
<!--[if !mso]>
<style>
v\:* {behavior:url(#default#VML);}
o\:* {behavior:url(#default#VML);}
w\:* {behavior:url(#default#VML);}
.shape {behavior:url(#default#VML);}
</style>
<![endif]-->
<title>Robert Martin</title>
<style>
<!--
/* Font Definitions */
@font-face
{font-family:Calibri;
panose-1:2 15 5 2 2 2 4 3 2 4;}
@font-face
{font-family:Tahoma;
panose-1:2 11 6 4 3 5 4 4 2 4;}
@font-face
{font-family:"Trebuchet MS";
panose-1:2 11 6 3 2 2 2 2 2 4;}
@font-face
{font-family:Consolas;
panose-1:2 11 6 9 2 2 4 3 2 4;}
@font-face
{font-family:Webdings;
panose-1:5 3 1 2 1 5 9 6 7 3;}
/* Style Definitions */
p.MsoNormal, li.MsoNormal, div.MsoNormal
{margin:0cm;
margin-bottom:.0001pt;
font-size:12.0pt;
font-family:"Times New Roman","serif";
color:black;}
a:link, span.MsoHyperlink
{mso-style-priority:99;
color:blue;
text-decoration:underline;}
a:visited, span.MsoHyperlinkFollowed
{mso-style-priority:99;
color:purple;
text-decoration:underline;}
pre
{mso-style-priority:99;
mso-style-link:"HTML Preformatted Char";
margin:0cm;
margin-bottom:.0001pt;
font-size:10.0pt;
font-family:"Courier New";
color:black;}
p.MsoAcetate, li.MsoAcetate, div.MsoAcetate
{mso-style-priority:99;
mso-style-link:"Balloon Text Char";
margin:0cm;
margin-bottom:.0001pt;
font-size:8.0pt;
font-family:"Tahoma","sans-serif";
color:black;}
span.BalloonTextChar
{mso-style-name:"Balloon Text Char";
mso-style-priority:99;
mso-style-link:"Balloon Text";
font-family:"Tahoma","sans-serif";
color:black;}
span.EmailStyle19
{mso-style-type:personal;
font-family:"Trebuchet MS","sans-serif";
color:#2D3A44;}
span.HTMLPreformattedChar
{mso-style-name:"HTML Preformatted Char";
mso-style-priority:99;
mso-style-link:"HTML Preformatted";
font-family:Consolas;
color:black;}
span.EmailStyle22
{mso-style-type:personal-reply;
font-family:"Trebuchet MS","sans-serif";
color:#2D3A44;}
.MsoChpDefault
{mso-style-type:export-only;
font-size:10.0pt;}
@page Section1
{size:595.3pt 841.9pt;
margin:72.0pt 90.0pt 72.0pt 90.0pt;}
div.Section1
{page:Section1;}
-->
</style>
<!--[if gte mso 9]><xml>
<o:shapedefaults v:ext="edit" spidmax="2050" />
</xml><![endif]--><!--[if gte mso 9]><xml>
<o:shapelayout v:ext="edit">
<o:idmap v:ext="edit" data="1" />
</o:shapelayout></xml><![endif]-->
<div class="Section1">
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);">Hi
Robert<o:p></o:p></span></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);"><o:p> </o:p></span></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);">CIMA
is the new app that is replacing the “soon to be outdated
app” you refer to below.<o:p></o:p></span></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);"><o:p> </o:p></span></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);">The
dlls are sitting at <a moz-do-not-send="true"
href="ftp://ftp.flow.net.nz/Temp/ssleay32.zip">ftp://ftp.flow.net.nz/Temp/ssleay32.zip</a>
for the next 15 minutes.<o:p></o:p></span></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);"><o:p> </o:p></span></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);">The
password in </span><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);">SSLIOHandlerGetPassword
is generally
not needed. It is the password for decrypting a client side
certificate. You don’t
need one ofr CourierPost webservices<o:p></o:p></span></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);"><o:p> </o:p></span></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);">SSLIOHandler.SSLOptions.RootCertFile
:= ‘’;</span><o:p></o:p></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);">
SSLIOHandler.SSLOptions.KeyFile := ‘’;</span><o:p></o:p></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);">
SSLIOHandler.SSLOptions.CertFile := ‘’;</span><o:p></o:p></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);">
SSLIOHandler.SSLOptions.Method := idSSL23 or something</span><o:p></o:p></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);">
SSLIOHandler.SSLOptions.Mode := sslmUnassigned; </span><o:p></o:p></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);"><o:p> </o:p></span></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);"><o:p> </o:p></span></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);"><o:p> </o:p></span></p>
<div>
<table class="MsoNormalTable" style="width: 487.5pt;" border="0"
cellpadding="0" width="650">
<tbody>
<tr style="height: 26.25pt;">
<td style="padding: 0cm; height: 26.25pt;">
<p class="MsoNormal"><b><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(146, 199, 95);">*
Please note I will be on leave from Monday 8th March through to
Wednesday 24th March. For support during this time please contact <a
moz-do-not-send="true" href="mailto:support@flowsoftware.co.nz"><span
style="font-size: 8pt; color: rgb(18, 32, 41);">support@flowsoftware.co.nz
</span></a>or 09 476 3577 </span></b><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);"><o:p></o:p></span></p>
</td>
</tr>
</tbody>
</table>
<p class="MsoNormal"><span
style="color: rgb(45, 58, 68); display: none;"><o:p> </o:p></span></p>
</div>
<table class="MsoNormalTable" style="width: 525pt;" border="0"
cellpadding="0" width="700">
<tbody>
<tr style="height: 26.25pt;">
<td colspan="4" style="padding: 0cm; height: 26.25pt;">
<p class="MsoNormal"><b><span
style="font-size: 11pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(18, 32, 41);">Cameron
Hart </span></b><span
style="font-size: 6.5pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(18, 32, 41);">Development
Manager </span><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);"><o:p></o:p></span></p>
</td>
</tr>
<tr>
<td style="padding: 0cm; width: 17.25pt;" width="23"><br>
</td>
<td style="padding: 0cm;">
<p class="MsoNormal"><b><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(146, 199, 95);">Flow
Software Limited </span></b><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);"><o:p></o:p></span></p>
</td>
<td rowspan="4" style="padding: 0cm; width: 3.75pt;"
valign="bottom" width="5">
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);"><img
id="_x0000_i1028" src="cid:part1.00060606.06030105@chreos.co.nz"
border="0" height="55" width="1"></span><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);"><o:p></o:p></span></p>
</td>
<td style="padding: 0cm;"><br>
</td>
<td style="padding: 0cm;"><br>
</td>
<td rowspan="4" style="padding: 0cm;">
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);"><img
id="_x0000_i1027" src="cid:part2.02020304.08010604@chreos.co.nz"
alt="Flow" border="0" height="38" width="158"></span><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);"><o:p></o:p></span></p>
</td>
</tr>
<tr>
<td style="padding: 0cm;"><br>
</td>
<td style="padding: 0cm;">
<p class="MsoNormal"><span
style="font-size: 8pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(18, 32, 41);">PO
Box 305-237, Triton Plaza </span><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);"><o:p></o:p></span></p>
</td>
<td style="padding: 0cm;">
<p class="MsoNormal"><b><span
style="font-size: 8pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(146, 199, 95);">P
</span></b><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);"><o:p></o:p></span></p>
</td>
<td style="padding: 0cm;">
<p class="MsoNormal"><span
style="font-size: 8pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(18, 32, 41);">+64
9 476 3579 </span><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);"><o:p></o:p></span></p>
</td>
</tr>
<tr>
<td style="padding: 0cm;"><br>
</td>
<td style="padding: 0cm;">
<p class="MsoNormal"><span
style="font-size: 8pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(18, 32, 41);">Auckland
0757, New Zealand </span><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);"><o:p></o:p></span></p>
</td>
<td style="padding: 0cm;">
<p class="MsoNormal"><b><span
style="font-size: 8pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(146, 199, 95);">M
</span></b><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);"><o:p></o:p></span></p>
</td>
<td style="padding: 0cm;">
<p class="MsoNormal"><span
style="font-size: 8pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(18, 32, 41);">+64
21 222 3569 </span><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);"><o:p></o:p></span></p>
</td>
</tr>
<tr>
<td style="padding: 0cm;"><br>
</td>
<td style="padding: 0cm;">
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);"><a
moz-do-not-send="true" href="http://www.flowsoftware.co.nz"><span
style="font-size: 8pt; color: rgb(18, 32, 41);">www.flowsoftware.co.nz
</span></a><o:p></o:p></span></p>
</td>
<td style="padding: 0cm;">
<p class="MsoNormal"><b><span
style="font-size: 8pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(146, 199, 95);">E
</span></b><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);"><o:p></o:p></span></p>
</td>
<td style="padding: 0cm;">
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);"><a
moz-do-not-send="true" href="mailto:cameron.hart@flowsoftware.co.nz"><span
style="font-size: 8pt; color: rgb(18, 32, 41);">cameron.hart@flowsoftware.co.nz
</span></a><o:p></o:p></span></p>
</td>
</tr>
</tbody>
</table>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);"> <o:p></o:p></span></p>
<table class="MsoNormalTable" style="width: 487.5pt;" border="0"
cellpadding="0" width="650">
<tbody>
<tr style="height: 26.25pt;">
<td style="padding: 0cm; height: 26.25pt;">
<p class="MsoNormal"><span
style="font-size: 7pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(18, 32, 41);">This
message is intended for the addressee named above. It may contain
privileged or confidential information. If you are not the intended
recipient of this message you must not use, copy, distribute or
disclose it to anyone. </span><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);"><o:p></o:p></span></p>
</td>
</tr>
</tbody>
</table>
<p class="MsoNormal"><span
style="font-size: 8pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(146, 199, 95);"> </span><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);">
</span><span
style="font-size: 8pt; font-family: Webdings; color: rgb(146, 199, 95);">P</span><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);">
</span><span
style="font-size: 7pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(18, 32, 41);">Please
consider the environment before printing this email</span><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);">
<o:p></o:p></span></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);"> </span><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);"><o:p></o:p></span></p>
<div>
<div
style="border-style: solid none none; border-color: rgb(181, 196, 223) -moz-use-text-color -moz-use-text-color; border-width: 1pt medium medium; padding: 3pt 0cm 0cm;">
<p class="MsoNormal"><b><span
style="font-size: 10pt; font-family: "Tahoma","sans-serif"; color: windowtext;">From:</span></b><span
style="font-size: 10pt; font-family: "Tahoma","sans-serif"; color: windowtext;">
<a class="moz-txt-link-abbreviated" href="mailto:delphi-bounces@delphi.org.nz">delphi-bounces@delphi.org.nz</a>
[<a class="moz-txt-link-freetext" href="mailto:delphi-bounces@delphi.org.nz">mailto:delphi-bounces@delphi.org.nz</a>] <b>On Behalf Of </b>Robert
martin<br>
<b>Sent:</b> Friday, 26 February 2010 12:01 p.m.<br>
<b>To:</b> NZ Borland Developers Group - Delphi List<br>
<b>Subject:</b> Re: [DUG] Http help<o:p></o:p></span></p>
</div>
</div>
<p class="MsoNormal"><o:p> </o:p></p>
<p class="MsoNormal">Hi Cameron<br>
<br>
We were advised by them to not use the soon to be outdated app. We
have
everything else working and were to be installing this afternoon. There
test
service has been accepting our messages find but further viewing showed
they
had not items !<br>
<br>
I am trying to install the dlls from <a moz-do-not-send="true"
href="http://www.slproweb.com/products/Win32OpenSSL.html">http://www.slproweb.com/products/Win32OpenSSL.html</a>
but this seems to be a full install and currently is frozen !<br>
<br>
I am using Indy 10 on D2007 any way you could get your dlls to me,
please......<br>
<br>
p.s. thanks for the code snippet <br>
<br>
<br>
p.p.s Do I need to set passwords in the ssl handler AND the
idHttp.request as
well?<br>
<br>
Cheers<br>
Rob <o:p></o:p></p>
<div>
<div>
<p class="MsoNormal"><o:p> </o:p></p>
<p class="MsoNormal" style=""><span lang="EN-NZ"> </span><o:p></o:p></p>
</div>
</div>
<p class="MsoNormal"><br>
On 26/02/2010 11:36 a.m., Cameron Hart wrote: <o:p></o:p></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);">Just
sent this with attached dll but the list doenst like it as its
too big so you will have to find your own Open SSL dlls.…</span><o:p></o:p></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);"> </span><o:p></o:p></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);">You
get </span>'Invalid IOHandler' because you have not applied
a SSL handler to your idHTTP object, yet you are posting to a HTTPS
address. The bits of code you need are below<o:p></o:p></p>
<p class="MsoNormal"> <o:p></o:p></p>
<p class="MsoNormal"> <o:p></o:p></p>
<p class="MsoNormal">Uses IdSSLOpenSSL, IdSSL<o:p></o:p></p>
<p class="MsoNormal"> <o:p></o:p></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);">SSLIOHandler:
TIdSSLIOHandlerSocketOpenSSL;</span><o:p></o:p></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);"> </span><o:p></o:p></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);">function
SSLIOHandlerVerifyPeer(Certificate: TIdX509; AOk:
Boolean; ADepth: Integer): Boolean;</span><o:p></o:p></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);">begin</span><o:p></o:p></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);">
Result := True;</span><o:p></o:p></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);">end;</span><o:p></o:p></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);"> </span><o:p></o:p></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);">procedure
SSLIOHandlerGetPassword(var Password: String);</span><o:p></o:p></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);">begin</span><o:p></o:p></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);">
Password := ‘’;</span><o:p></o:p></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);">end;</span><o:p></o:p></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);"> </span><o:p></o:p></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);"> </span><o:p></o:p></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);">SSLIOHandler
:= TIdSSLIOHandlerSocketOpenSSL.Create(nil);
//was Self 6/6/06</span><o:p></o:p></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);">SSLIOHandler.MaxLineAction
:= maSplit;</span><o:p></o:p></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);"> </span><o:p></o:p></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);">SSLIOHandler.OnVerifyPeer
:= SSLIOHandlerVerifyPeer;</span><o:p></o:p></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);">SSLIOHandler.OnGetPassword
:= SSLIOHandlerGetPassword;</span><o:p></o:p></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);"> </span><o:p></o:p></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);">
SSLIOHandler.SSLOptions.RootCertFile := RootCertificate;</span><o:p></o:p></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);">
SSLIOHandler.SSLOptions.KeyFile := SSLClientKeyFile;</span><o:p></o:p></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);">
SSLIOHandler.SSLOptions.CertFile := SSLClientCertFile;</span><o:p></o:p></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);">
SSLIOHandler.SSLOptions.Method :=
IndySSLTypeArray[FSSLCLientType];</span><o:p></o:p></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);">
SSLIOHandler.SSLOptions.Mode := sslmUnassigned;
//sslmClient;</span><o:p></o:p></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);">
SSLIOHandler.SSLOptions.VerifyMode := [sslvrfPeer];</span><o:p></o:p></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);"> </span><o:p></o:p></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);">HTTP.IOHandler
:= SSLIOHandler</span><o:p></o:p></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);"> </span><o:p></o:p></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);"> </span><o:p></o:p></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);">The
hard part is getting the correct ssl dlls for the version of
indy you have. The attached work for me with indy 10.</span><o:p></o:p></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);"> </span><o:p></o:p></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);"> </span><o:p></o:p></p>
<div>
<table class="MsoNormalTable" style="width: 487.5pt;" border="0"
cellpadding="0" width="650">
<tbody>
<tr style="height: 26.25pt;">
<td style="padding: 0cm; height: 26.25pt;">
<p class="MsoNormal"><b><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(146, 199, 95);">*
Please note I will be on leave from Monday 8th March through to
Wednesday 24th March. For support during this time please contact <a
moz-do-not-send="true" href="mailto:support@flowsoftware.co.nz"><span
style="font-size: 8pt; color: rgb(18, 32, 41);">support@flowsoftware.co.nz
</span></a>or 09 476 3577 </span></b><o:p></o:p></p>
</td>
</tr>
</tbody>
</table>
<p class="MsoNormal"><span style="color: rgb(45, 58, 68);"> </span><o:p></o:p></p>
</div>
<table class="MsoNormalTable" style="width: 525pt;" border="0"
cellpadding="0" width="700">
<tbody>
<tr style="height: 26.25pt;">
<td colspan="4" style="padding: 0cm; height: 26.25pt;">
<p class="MsoNormal"><b><span
style="font-size: 11pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(18, 32, 41);">Cameron
Hart </span></b><span
style="font-size: 6.5pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(18, 32, 41);">Development
Manager </span><o:p></o:p></p>
</td>
</tr>
<tr>
<td style="padding: 0cm; width: 17.25pt;" width="23"><br>
</td>
<td style="padding: 0cm;">
<p class="MsoNormal"><b><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(146, 199, 95);">Flow
Software Limited </span></b><o:p></o:p></p>
</td>
<td rowspan="4" style="padding: 0cm; width: 3.75pt;"
valign="bottom" width="5">
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);"><img
id="_x0000_i1025" src="cid:part3.06050504.03080301@chreos.co.nz"
border="0" height="55" width="1"></span><o:p></o:p></p>
</td>
<td style="padding: 0cm;"><br>
</td>
<td style="padding: 0cm;"><br>
</td>
<td rowspan="4" style="padding: 0cm;">
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);"><img
id="_x0000_i1026" src="cid:part2.02020304.08010604@chreos.co.nz"
alt="Flow" border="0" height="38" width="158"></span><o:p></o:p></p>
</td>
</tr>
<tr>
<td style="padding: 0cm;"><br>
</td>
<td style="padding: 0cm;">
<p class="MsoNormal"><span
style="font-size: 8pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(18, 32, 41);">PO
Box 305-237, Triton Plaza </span><o:p></o:p></p>
</td>
<td style="padding: 0cm;">
<p class="MsoNormal"><b><span
style="font-size: 8pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(146, 199, 95);">P
</span></b><o:p></o:p></p>
</td>
<td style="padding: 0cm;">
<p class="MsoNormal"><span
style="font-size: 8pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(18, 32, 41);">+64
9 476 3579 </span><o:p></o:p></p>
</td>
</tr>
<tr>
<td style="padding: 0cm;"><br>
</td>
<td style="padding: 0cm;">
<p class="MsoNormal"><span
style="font-size: 8pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(18, 32, 41);">Auckland
0757, New Zealand </span><o:p></o:p></p>
</td>
<td style="padding: 0cm;">
<p class="MsoNormal"><b><span
style="font-size: 8pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(146, 199, 95);">M
</span></b><o:p></o:p></p>
</td>
<td style="padding: 0cm;">
<p class="MsoNormal"><span
style="font-size: 8pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(18, 32, 41);">+64
21 222 3569 </span><o:p></o:p></p>
</td>
</tr>
<tr>
<td style="padding: 0cm;"><br>
</td>
<td style="padding: 0cm;">
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);"><a
moz-do-not-send="true" href="http://www.flowsoftware.co.nz"><span
style="font-size: 8pt; color: rgb(18, 32, 41);">www.flowsoftware.co.nz
</span></a></span><o:p></o:p></p>
</td>
<td style="padding: 0cm;">
<p class="MsoNormal"><b><span
style="font-size: 8pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(146, 199, 95);">E
</span></b><o:p></o:p></p>
</td>
<td style="padding: 0cm;">
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);"><a
moz-do-not-send="true" href="mailto:cameron.hart@flowsoftware.co.nz"><span
style="font-size: 8pt; color: rgb(18, 32, 41);">cameron.hart@flowsoftware.co.nz
</span></a></span><o:p></o:p></p>
</td>
</tr>
</tbody>
</table>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);"> </span><o:p></o:p></p>
<table class="MsoNormalTable" style="width: 487.5pt;" border="0"
cellpadding="0" width="650">
<tbody>
<tr style="height: 26.25pt;">
<td style="padding: 0cm; height: 26.25pt;">
<p class="MsoNormal"><span
style="font-size: 7pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(18, 32, 41);">This
message is intended for the addressee named above. It may contain
privileged or confidential information. If you are not the intended
recipient of this message you must not use, copy, distribute or
disclose it to anyone. </span><o:p></o:p></p>
</td>
</tr>
</tbody>
</table>
<p class="MsoNormal"><span
style="font-size: 8pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(146, 199, 95);"> </span><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);">
</span><span
style="font-size: 8pt; font-family: Webdings; color: rgb(146, 199, 95);">P</span><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);">
</span><span
style="font-size: 7pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(18, 32, 41);">Please
consider the environment before printing this email</span><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);">
</span><o:p></o:p></p>
<p class="MsoNormal"><span
style="font-size: 9pt; font-family: "Trebuchet MS","sans-serif"; color: rgb(45, 58, 68);"> </span><o:p></o:p></p>
<div>
<div
style="border-style: solid none none; border-color: -moz-use-text-color; border-width: 1pt medium medium; padding: 3pt 0cm 0cm;">
<p class="MsoNormal"><b><span
style="font-size: 10pt; font-family: "Tahoma","sans-serif"; color: windowtext;">From:</span></b><span
style="font-size: 10pt; font-family: "Tahoma","sans-serif"; color: windowtext;">
<a moz-do-not-send="true" href="mailto:delphi-bounces@delphi.org.nz">delphi-bounces@delphi.org.nz</a>
[<a moz-do-not-send="true" href="mailto:delphi-bounces@delphi.org.nz">mailto:delphi-bounces@delphi.org.nz</a>]
<b>On Behalf Of </b>Robert martin<br>
<b>Sent:</b> Friday, 26 February 2010 11:13 a.m.<br>
<b>To:</b> NZ Borland Developers Group - Delphi List<br>
<b>Subject:</b> [DUG] Http help</span><o:p></o:p></p>
</div>
</div>
<p class="MsoNormal"> <o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom: 12pt;">Hi Guys<br>
<br>
I had imported a WSDL file and built a soap service to send data to a
web
service. Unfortunately there is a bug in the WSDL that impacts delphi
but
seems to be ignored in Microsoft tools (it really is a problem with the
wsdl
file). Anyway since it is a simple job I thought it might be quicker
to
fix by just removing the soap and building the XML manually and posting
it with
idHttp. <br>
<br>
However I cant get it to work ! When I try and post my test xml to the
web serivce I get an 'Invalid IOHandler' message in the app. I have no
ioHandler defined but that works fine in my other apps where I post to
php
based web services. I am sure it is just some weird indy bug but I am
under a huge deadline and need to sort this. Any help would be greatly
appreciated.<br>
<br>
code follows (this is quick and dirty proof of concept code)<br>
<br>
var<br>
sl
: TStringList;<br>
PostDataStream :
TStringStream;<br>
SendStream : TStringStream;<br>
begin<br>
PostDataStream := TStringStream.Create('');<br>
sl := TStringList.Create;<br>
try<br>
IdHTTP.Request.Username :=
'9313527067946306';<br>
IdHTTP.Request.Password :=
'passdfsw9634306';<br>
IdHTTP.ReadTimeout := 5000;<br>
<br>
sl.LoadFromFile('E:\Work\Test
post\TestRequest.XML');<br>
SendStream := TStringStream.Create(sl.text);<br>
<br>
<br>
IdHTTP.Post('<a moz-do-not-send="true"
href="https://uateclonline.nzpost.co.nz/eclonlinewebnowse/Services.asmx">https://uateclonline.nzpost.co.nz/eclonlinewebnowse/Services.asmx</a>',
SendStream,
PostDataStream); //Error here <br>
<br>
ShowMessage(PostDataStream.DataString);<br>
finally<br>
sl.Free;<br>
PostDataStream.Free;<br>
SendStream.Free;<br>
end;<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<o:p></o:p></p>
<div>
<p class="MsoNormal">-- <br>
<br>
<br>
<o:p></o:p></p>
<p class="MsoNormal"><i><span
style="font-size: 10pt; font-family: "Arial","sans-serif";"
lang="EN-NZ">Robert Martin</span></i><o:p></o:p></p>
<p class="MsoNormal"><i><span
style="font-size: 10pt; font-family: "Arial","sans-serif";"
lang="EN-NZ">Software development manager</span></i><o:p></o:p></p>
<p class="MsoNormal"><span
style="font-size: 10pt; font-family: "Arial","sans-serif";"
lang="EN-NZ"> </span><o:p></o:p></p>
<p class="MsoNormal"><span
style="font-size: 10pt; font-family: "Arial","sans-serif";"
lang="EN-NZ">Chreos</span><o:p></o:p></p>
<p class="MsoNormal"><span
style="font-size: 10pt; font-family: "Arial","sans-serif";"
lang="EN-NZ"><a moz-do-not-send="true" href="http://www.chreos.co.nz">www.chreos.co.nz</a></span><o:p></o:p></p>
<p class="MsoNormal"><span
style="font-size: 10pt; font-family: "Arial","sans-serif";"
lang="EN-NZ">Ph
+64 03 377-0495</span><o:p></o:p></p>
<p class="MsoNormal"><span lang="EN-NZ"> </span><o:p></o:p></p>
<p class="MsoNormal"><span style="color: rgb(255, 153, 0);"
lang="EN-NZ"> </span><o:p></o:p></p>
<p class="MsoNormal"><span lang="EN-NZ"> </span><o:p></o:p></p>
</div>
<pre><o:p> </o:p></pre>
<pre><o:p> </o:p></pre>
<pre>_______________________________________________<o:p></o:p></pre>
<pre>NZ Borland Developers Group - Delphi mailing list<o:p></o:p></pre>
<pre>Post: <a moz-do-not-send="true"
href="mailto:delphi@delphi.org.nz">delphi@delphi.org.nz</a><o:p></o:p></pre>
<pre>Admin: <a moz-do-not-send="true"
href="http://delphi.org.nz/mailman/listinfo/delphi">http://delphi.org.nz/mailman/listinfo/delphi</a><o:p></o:p></pre>
<pre>Unsubscribe: send an email to <a moz-do-not-send="true"
href="mailto:delphi-request@delphi.org.nz">delphi-request@delphi.org.nz</a> with Subject: unsubscribe<o:p></o:p></pre>
</div>
<pre wrap="">
<fieldset class="mimeAttachmentHeader"></fieldset>
_______________________________________________
NZ Borland Developers Group - Delphi mailing list
Post: <a class="moz-txt-link-abbreviated" href="mailto:delphi@delphi.org.nz">delphi@delphi.org.nz</a>
Admin: <a class="moz-txt-link-freetext" href="http://delphi.org.nz/mailman/listinfo/delphi">http://delphi.org.nz/mailman/listinfo/delphi</a>
Unsubscribe: send an email to <a class="moz-txt-link-abbreviated" href="mailto:delphi-request@delphi.org.nz">delphi-request@delphi.org.nz</a> with Subject: unsubscribe</pre>
</blockquote>
</body>
</html>