[Lazarus-es] Indy 10 ,Tidhttp y SSL

[Claudio Romero]

Aqui va un ejemplo de una news de delphi.
Necesistas los clientes DLL de SSL. en http://indy.fulgan.com/SSL/
Necesitas un memo.(lo otro lo crea dinamicamente)
uses IdHTTP, IdSSLOpenSSL;

procedure TForm1.Button2Click(Sender: TObject);
var https: TIdHTTP;URL: string;
	ReturnedPage: string;
	SSLIOHandler: TIdSSLIOHandlerSocketOpenSSL;
begin
	SSLIOHandler:= TIdSSLIOHandlerSocketOpenSSL.Create;
	URL := 'https://mail.google.com';
	https := TIdHTTP.Create(nil);
	try
		https.IOHandler := SSLIOHandler;
		ReturnedPage:= https.Get(URL);
		Memo1.Text := ReturnedPage;
	finally
		https.Free;
		SSLIOHandler.Free;
	end;
end;

Yo no he probado mucho esto, asi que puedes hacerlo tu :)