Forular lässt sich nicht ausfüllen

[manakinn]

Ich versuche über den TWebBrowser eine email bei Yahoo zu schreiben, das einloggen
usw. funktioniert ohne Probleme, sobald ich bei "neue email" schreiben bin, füllt
der nur "An" und "Betreff" aus, den Text lässt er leider aus, warum ?

Delphi-Quellcode:

WebBrowser1.OleObject.document.forms.item(1).elements.item('To').value:=Edit3.Text;
WebBrowser1.OleObject.document.forms.item(1).elements.item('Subj').value:=Edit4.Text;
WebBrowser1.OleObject.document.forms.item(1).elements.item('Body').value:=Memo1.Text;

[manakinn]

Weiß denn keiner warum sich das nicht ausfüllen lässt ?

[marabu]

Ist denn der Name 'Body' korrekt? Kannst du denn 'manakinn' in Body einfügen?

marabu

[manakinn]

Zitat:

Zitat von marabu

Ist denn der Name 'Body' korrekt? Kannst du denn 'manakinn' in Body einfügen?

marabu

Der Name Body ist korrekt, hier ein auszug aus dem Quelltext:

Delphi-Quellcode:

<textarea name="Body" id="bodyfield" style="display:none;"></textarea>

Die anderen "To" und "Subj" werden ausgefüllt, nur das "Body" Feld bleibt frei, Delhpi gibt auch keine Fehler, das "Body" nicht existiert

[Taladan]

Da ich keine Webbrowser-VCL habe, kann ich es nicht ausprobieren.
Ich vermute das es sich bei den anderen Elementen nicht um eine Textarea handelt. Daher wird dann wahrscheinlich deine Methode nicht so funktionieren, wie sie soll.

[marabu]

Dann lese den Wert mal sofort nach dem Setzen wieder aus und schau was drin steht. Mit "style=display:none" solltest du eh nicht viel davon sehen.

marabu

[manakinn]

Es lässt sich nicht auslesen nach dem ausfüllen,

Fehler an Adresse ....

Gibt es keine Möglichkeit, das man das ausfüllen kann ?

[marabu]

Pack mal den Quelltext dieser Seite ein und hänge ihn hier rein. Ich habe keine Lust mich bei Yahoo zu registrieren wegen dieser Sache.

marabu

[manakinn]

Kompletter Quelltext vom der yahoo Page wo man Emails Senden kann

[Taladan]

Mir fallen gerade zwei Möglichkeiten ein, die (da es sich scheinbar um eine Art JavaScript handelt) folgender maßen aus sehen müssten.

Delphi-Quellcode:

WebBrowser1.OleObject.document.forms.item(1).elements.item('Body').innerHTML.length:=Memo1.Text;

WebBrowser1.OleObject.document.forms.item(1).elements.item('Body').firstChild.insertData(0,Memo1.Text);

Hoffe es hilft. Problem ist garantiert das die Textarea und dein Script nicht zusammen passen. Eine Textarea hat, wie z.b. ein Input-Feld in HTML keinen Value-Wert...