Du bekommst doch in der Message den Wert den du statt I einsetzen kannst um dann die Schleife wegzulassen.
Wahlweise kannst du auch statt dem Integer den 'Formnamen' eingeben.
embdwb1.OleObject.document.forms.item('vbform').elements.item('message').value := Value;
embdwb1.OleObject.Document.GetElementByID('Feldname').value := Value;
Kannst du auch testen.
Wenn du auf Embedded WB wechselst hast du z.B. FillForm, in dem du nur noch den Namen und die Message einträgst. Es gibt da schon einige Wege nach Rom.
Gruß
SM
Ps:
Delphi-Quellcode:
try
if FormItem.Item(j).Name = 'FELDNAME' then ...
Wenn ich das richtig sehe vergleichst du dort die FormNamen mit dem Feldnamen. Das sollte auch so nicht funktionieren.