WebBrowser1.OleObject.document.forms.item(0).elements.item('FELDNAME').value := Edit1.Text
tut doch genau das.
Falls in das Edit mit Copy&Paste eingefügt wird und ungewollte Leerzeicheichen mit drin sind.
WebBrowser1.OleObject.document.forms.item(0).elements.item('FELDNAME').value := Trim(Edit1.Text)
Du musst nur das 'FELDNAME' durch 'DenrealenNamendesFeldes' ersetzen.
Es sein das die .forms.item() nicht 0 ist.
Testen kann man das so
Delphi-Quellcode:
try
for I := 0 to 20 do
begin
WebBrowser1.OleObject.document.forms.item(I).elements.item('DenrichtigenNamendesFeldes').value:=Trim(Edit1.Text);
ShowMessage(IntToStr(I));
end;
except
end; // try
Gruß
SM
Das ist genau die Lösung, die ich in meinem Ursprungs-Beitrag als "blind" bezeichne, da ich über eine Schleife operiere, die testet und den Wert somit nicht zielgerichtet setzt. Ich fragte nach einer eleganteren Lösung. Wenn es die nicht gibt, dann kann ich meinen Code halt nicht optimieren.
Gruß
Rüd