Werte in Formulare mit TWebbrowser auslesen?

[greyblue]

Hallo nochmal,

kann ich die Werte in eine Formular mit Twebbrowser auslesen? geht es?

Danke voraus ..

Viele Grüße

[alcaeus]

Schau mal das hier an: Forumal im IExplorer ausfüllen

oder hier: twebbrowser and formular

[greyblue]

Zitat von alcaeus:

Schau mal das hier an: Forumal im IExplorer ausfüllen

oder hier: twebbrowser and formular

Vielen Dank!! Es scheint zu funktionieren..

[greyblue]

ich kann nun zwar die Werte der Textfelder auslesen, aber wie kann ich bekommen,ob eine Radiobutton gecheckt oder nicht? Vielen Dank!!

[greyblue]

Code:

<form name="abc">
      <input type="text" name="T1" size="20">
      <input type="radio" value="V1" checked name="R1">a
      <input type="radio" name="R1" value="V2">b

Delphi-Quellcode:

Listbox1.Items.Add(WebBrowser1.OleObject.Document.abc.T1.Value; // das geht
        Listbox1.Items.Add(WebBrowser1.OleObject.Document.abc.R1.Value; // das geht nicht :-(

[alcaeus]

Jeder Radiobutton gehört zu einer Group, die mit dem Name-Attribut gesetzt wird:

Code:

<input type="radio" name="einradio" value="0" />Eins
<input type="radio" name="einradio" value="1" />Zwei
...

Du kannst den Wert von "einradio" überprüfen, und anhand des Values das ausgewählte Radio finden.

[greyblue]

Zitat von alcaeus:

Jeder Radiobutton gehört zu einer Group, die mit dem Name-Attribut gesetzt wird:

Code:

<input type="radio" name="einradio" value="0" />Eins
<input type="radio" name="einradio" value="1" />Zwei
...

Du kannst den Wert von "einradio" überprüfen, und anhand des Values das ausgewählte Radio finden.

aber eine Fehlermeldung kommt," Method Value not supported by automation Object", wenn ich auf Radiobutton zugreife

[alcaeus]

Code:

<input type="radio" name="einradio" value="0" checked="checked" />Eins 
<input type="radio" name="einradio" value="1" />Zwei 
...

Hier wird das erste Radio ausgewählt. Mit JavaScript kannst du so darauf zugreifen:

Code:

if (document.<formname>.<radiogroupname>.checked == true)
  alert("Checkbox ausgewählt.");

Es gibt sicher eine Möglichkeit, diesen Code auf Delphi umzubauen, welche Fehlermeldung bekommst du überhaupt?

[scp]

Es geht auch anders:
Wenn du den Wert eines Items so ermittelst:
AStr := ovElements.item(i).Value; dann kannst du den Status (Gehakt oder nicht) so abrufen:
ABool := ovElements.item(i).Checked;

[greyblue]

Zitat von alcaeus:

Es gibt sicher eine Möglichkeit, diesen Code auf Delphi umzubauen, welche Fehlermeldung bekommst du überhaupt?

exception Class EOleError With Message "Method Value not supported by automation Object"