HTTPS Captcha auslesen

[geskill]

Delphi-Quellcode:

var 
  IdHTTP: TIdHTTP; 
  IdSSLIOHandlerSocketOpenSSL: TIdSSLIOHandlerSocketOpenSSL;
begin
  IdHTTP:=TIdHTTP.Create(nil);
  IdSSLIOHandlerSocketOpenSSL:=TIdSSLIOHandlerSocketOpenSSL.Create(nil);
  try
    IdHTTP1.IOHandler:=IdSSLIOHandlerSocketOpenSSL;
    ...
  finally
    IdHTTP.Free;
    IdSSLIOHandlerSocketOpenSSL.Free; // <--- unschön
  end;
end;

besser so:

Delphi-Quellcode:

var 
  IdHTTP: TIdHTTP; 
  IdSSLIOHandlerSocketOpenSSL: TIdSSLIOHandlerSocketOpenSSL;
begin
  IdHTTP:=TIdHTTP.Create(nil);
  IdSSLIOHandlerSocketOpenSSL:=TIdSSLIOHandlerSocketOpenSSL.Create(nil);
  try
    IdHTTP.IOHandler:=IdSSLIOHandlerSocketOpenSSL;
    ...
  finally
    IdSSLIOHandlerSocketOpenSSL.Free;
    IdHTTP.Free;
  end;
end;

EDIT2:
Der IOHandler wird nicht automatisch freigegeben, deshalb wäre dies so in Ordnung, jedoch sollte man grundsätzlich immer zuerst das freigeben, was man zuletzt erstellt hat. So bringt man auch keine anderen DP-User durcheinander