 |
BorlandTalk.com Borland discussion newsgroups
|
| View previous topic :: View next topic |
| Author |
Message |
nuwankkumara Guest
|
Posted: Wed Jan 12, 2005 5:53 am Post subject: indy 9 for HTTPS |
|
|
Dear experts,
Actually I am working with Delphi 5,
I tried wth using TIdHTTP , TIdSSLIOHandlerSocket ,
and TIdSocksInfo components in indy9
to develop a browser capable of access https
but I failed,
pls tell ur sugessions?
thanx in advance,
Nuwan
|
|
| Back to top |
|
 |
opro Guest
|
Posted: Mon Jan 17, 2005 10:41 am Post subject: Re: indy 9 for HTTPS |
|
|
thanx
I got the result
relevent codes,
TForm1 = class(TForm)
Edit1: TEdit;
Button1: TButton;
Memo1: TMemo;
IdSSLIOHandlerSocket1: TIdSSLIOHandlerSocket;
IdHTTP1: TIdHTTP;
IdAntiFreeze1: TIdAntiFreeze;
procedure Button1Click(Sender: TObject);
//and
var
FS: TFileStream;
begin
Screen.Cursor := crHourGlass;
try
Memo1.Clear;
IdSSLIOHandlerSocket1.SSLOptions.Method := sslvTLSv1;
IdSSLIOHandlerSocket1.SSLOptions.VerifyDepth := 1;
Memo1.Lines.Text := IdHTTP1.Get(Edit1.Text);
try
FS := TFileStream.Create('c:tempaaa.gif', fmCreate);
IdHTTP1.Get(Edit1.Text, FS);
finally
FS.Free;
end;
finally Screen.Cursor := crDefault; end;
end;
Nuwan
|
|
| Back to top |
|
 |
|
|
You cannot post new topics in this forum You cannot reply to topics in this forum You cannot edit your posts in this forum You cannot delete your posts in this forum You cannot vote in polls in this forum
|
|