idhttp in einem Fenster ausgeben

[weenex]

Hallo,

ich habe vor mich in mein webmail panel einzuloggen und eben die seite die ich mit idhttp per post daten füttere in meiner programmoberfläche anzuzeigen.

Delphi-Quellcode:

    postdata.AddFormField('a', Edit1.Text);
    postdata.AddFormField('b', Edit2.Text);
    postdata.AddFormField('dom', 'meineemail.de');
    postdata.AddFormField('x', '28');
    postdata.AddFormField('y', '3');

    // Abschicken
    s := IdHTTP1.Post('http://www.meineemail.de/login/', postdata);
        ShowMessage(s);

nun wollte ich das ganze per twebbrowser ersichtlich machen, was auch irgendwie geht aber auch doch nicht.

kann man denn irgendwie mit IdHTTP und einem Element das ganze ersichtlich machen?

wäre für jede Hilfe dankbar, stecke noch in den Kinderschuhen...

grüße
weenex

[geskill]

Zitat von weenex:

nun wollte ich das ganze per twebbrowser ersichtlich machen

Warum nimmst du dann nicht gleich die TWebBrowser Komponente?


Wenn es dir nur darum geht zu prüfen, ob das Login geklappt hat, erstelle aus dem Quellcode eine *.htm Datei und öffne die mit den Webbrowser deine Wahl.

[weenex]

Hallo, mir geht es ja auch darum das ich dann die Seite angezeigt bekomme, der Login mit idhttp klappt das habe ich mir ja schon mit

ShowMessage(s);

anzeigen lassen und ich sehe auch die Übersicht.

Problem das ich den Login mit Twebbrowser nicht hinbekommen habe daher dachte ich mir nun evtl klappt die Ausgabe der Seite in einem Programmfenster auch mit idhttp

Code:

<form action="/login/" method="post" name="log">            
<div id="ad">
<div class="boxheader" id="logheading">Login</div>
                         <div class="boxcontent" id="logbox">
                                                        <div style="float:left; width:87px; height:20px;"><input type="text" name="a" class="logfield" id="loginfield" /></div>
                     <div style="float:left; width:15px; height:20px; font-weight:bold;">@</div>

                     <div style="float:left; width:105px; height:20px;">
                        <select name="dom">
                           <option value="meineemail.de">meineemail.de</option>
                           <option value="meineemail1.de">meineemail1.de</option>
                           <option value="meineemail2.de" selected="selected">meineemail2.de</option>
                        </select> 
                     </div>
                     <div style="float:left; width:100px; height:20px;">

                           <input type="image" src="/icon/login.png" />                        
                     </div>
                     
                     <div class="breakline" style="height:auto; width:100%; font-size:10px; color:red;">
                     
                     <script type="text/javascript">
                       if(adblock) {
                             document.getElementById("loginfield").setAttribute("readonly", "readonly");
                           document.write('Bitte deaktiveren Sie Ihren Adblocker, damit diese Website korrekt dargestellt wird.');
                       }
                       </script>
                          
                     </div>
                         </div>
                  <div style="width:300px; height:250px; margin-left:15px; margin-top:20px;">

Habe das ganze mit Twebbrowser probiert wie folgt:

WebBrowser1.OleObject.document.forms.item(0).eleme nts.item('dom').value:= Edit1.Text;
WebBrowser1.OleObject.document.forms.item(0).eleme nts.item('x').value:='28';
WebBrowser1.OleObject.document.forms.item(0).eleme nts.item('y').value:='3';
WebBrowser1.OleObject.Document.Forms.item('login') .all.namedItem('login').Click;
WebBrowser1.Navigate('http://www.meineemail.de/login/');
WebBrowser1.SetFocus;

bekomme ich aber immer eine Zugriffsverletzung....

[geskill]

Du musst erst die Webseite mit Navigate() betreten und dann die Formularfelder ausfüllen und auf login klicken.