Im Rahmen meiner Bemühungen um OAuth bin ich jetzt ziemlich weit gekommen. Nun scheitert es derzeit leider an dem eigentlich simplen GET-Befehl.

Ich erhalte den runtime error "IOHandler value is not valid." -- woran liegt das?

Der Aufruf ist doch so simpel -- was für einen IOHandler braucht man denn überhaupt?

markieren

Code:

procedure TForm1.ButtonAPIcallClick(Sender: TObject);
 var
    AHTTP       : TIdHTTP;
    AResponse   : String;
begin
  AHTTP := TIdHTTP.Create(nil);
  AResponse := AHTTP.Get(MyURL);
  AHTTP.Free;
end;

MyURL ist korrekt; im Browser funktioniert es problemlos. Auch mit diesen Ergänzungen geht es leider nicht:

markieren

Code:

  AHTTP.ProtocolVersion     := pv1_1;
  AHTTP.HTTPOptions         := AHTTP.HTTPOptions + [hoKeepOrigProtocol];
  AHTTP.Request.ContentType := 'application/x-www-form-urlencoded; charset=utf-8';
  AHTTP.Request.UserAgent   := 'Mozilla/5.0 (Windows NT 5.1; rv:5.0) Gecko/20100101';

Inzwischen vermute ich, dass es daran liegt, dass die URl mit https:// anfängt und SSL erfordert.

wie weise ich denn einen passenden SSL-IOHandler zu? ich kann darüber nichts klares finden.

erster Treffer bei Google:
http://www.delphipraxis.net/335275-post9.html

Zitat von HJay:

Inzwischen vermute ich, dass es daran liegt, dass die URl mit https:// anfängt und SSL erfordert.

wie weise ich denn einen passenden SSL-IOHandler zu? ich kann darüber nichts klares finden.

TIdOpenSSLIOHandler (Name ähnlich) der Eigenschaft IOHandler von IdhTTP zuweisen. Außerdem musst du noch die OpenSSL-DLLs in dein Programmverzeichnis (zur Exe) legen. Download hier: http://slproweb.com/products/Win32OpenSSL.html Das ZIP-File reicht, du brauchst nur die 2 enthaltenen DLLs. Installieren ist nicht notwendig.

@Andreas: Danke für die tolle Antwort. Hat alles geklappt. HTTPS-GET geht jetzt einwandfrei.

Vielen Dank!