Hallo Wissende,
mit folgendem Code ersetze ich nun Inhalte in einem Webbrowser bei Elementen, die eine ID haben und die direkt von mir angesprochen werden:
UpdateContent('ptsa',pts_a,1);
Delphi-Quellcode:
procedure TForm1.UpdateContent(ID,Content:String;FrameNr:integer);
var
doc, fdoc: IHTMLDocument2;
e: IHTMLElement;
begin
doc := web_cis.Document as IHTMLDocument2;
if doc<>nil then
begin
fdoc := GetFrameDoc(doc, FrameNr);
e := fdoc.all.item(ID, 0) as IHTMLElement;
if Assigned(e) then
e.innerText := Content;
end;
end;
Mein Problem dabei ist nun, dass zum Beispiel , was ja einen Leerestring darstellen soll, nach dem Update direkt als lesbarer Text da steht. Das wäre ja noch zu umgehen, indem man einfach einen richtigen Leerstring a´la '' sendet. Was mache ich aber, wenn ich ein Image erstzen will? In dem Falle wird dann das Bild nicht angezeigt, sondern auch nur der String des Img-Tags.
Im Anhang sind 2 Bilder, die zeigen, was das Problem ist.
Wer hat damit Erfahrungen und kann helfen?