Pastehtml + Link Läßt Sich Nicht Entfernen

[horst]

Hallo...
ich entferne das Bild einfach mit der "Entfernentaste"
Mittlerweile mache ich es so:

Delphi-Quellcode:

procedure TForm1.Button16Click(Sender: TObject);
var
  HTMLDocument2Ifc: IHTMLDocument2;
begin
  HTMLDocument2Ifc := WebBrowser1.Document as IHTMLDocument2;
  HTMLDocument2Ifc.execCommand('Justifyleft', false, '0');
  try
    WebBrowser1.ExecWB(OLECMDID_DELETE, OLECMDEXECOPT_PROMPTUSER);
  except
  end;
  HTMLDocument2Ifc.execCommand('Justifyleft', false, '0');
  try
    WebBrowser1.ExecWB(OLECMDID_DELETE, OLECMDEXECOPT_PROMPTUSER);
  except
  end;
end;

Das klappt, ist aber bestimmt nicht richtig so.
Wie würdest du das machen?

Grüße
Horst