Einzelnen Beitrag anzeigen

horst

Registriert seit: 1. Jul 2003
347 Beiträge
 
Delphi 2007 Professional
 
#3

Re: Pastehtml + Link Läßt Sich Nicht Entfernen

  Alt 19. Jun 2005, 23:12
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
  Mit Zitat antworten Zitat