TWebbrowser Werte in Lable.Caption darstellen

**cobus_tschulz**

Hallo zusammen,

ich bin noch recht neu hier unterwegs und brauche einmal Hilfe.
Ich bin dabei ein kleines Tool zu schreiben wo ich Eingabewerte einer TEdit Übergebe und mittels TWebbrowse anzeigen lasse.

Klappt auch soweit gut.

Jetzt bekomme ich die Seite angezeigt jedoch brauche ich einen Wert der auf der Seite steht in einem lable.caption bez. geht auch TEdit.

Folgenes bekomme ich im TWebbrowse als Quelltext:

zusammenfalten · markieren

Delphi-Quellcode:

			<params>

<param>

<value><array><data>

<value><string>UstId_1</string></value>

<value><string></string></value>

</data></array></value>

</param>

<param>

<value><array><data>

<value><string>ErrorCode</string></value>

<value><string>215</string></value>

</data></array></value>

</param>

Davon brauche ich nur ErrorCode und den Wert (in diesem Fall 215) dieser kann sich aber ändern.

Und so öffne ich den TWebbrowser:

zusammenfalten · markieren

Delphi-Quellcode:

			procedure TTFrmMain.btnAnfrageSendenClick(Sender: TObject);

begin

csWeb.Navigate('http://evatr.bff-online.de/evatrRPC?UstId_1='+eUSTID1.Text+

            '&UstId_2='+eUSTID2.Text+

            '&Firmenname='+eFirmenname.Text+

            '&Ort='+eOrt.Text+

            '&PLZ='+ePlz.Text+

            '&Strasse='+eStrasse.Text+

            '&Druck='+eDruck.Text);

end;

end.

Vielen Dank euch schonmal !!!
Und denkt dran .. bin total neu hier

)) Nicht gleich erschlagen

lach ...

TWebbrowser Werte in Lable.Caption darstellen

TWebbrowser Werte in Lable.Caption darstellen

Forumregeln