Hallo,
Zugriff auf den Text einer
HTML-Seite bekommst Du folgendermaßen:
Delphi-Quellcode:
uses
[...] MSHTML;
procedure DoSomething;
var
r : IHTMLTxtRange;
s : WideString;
begin
r := ((WebBrowser1.Document as IHTMLDocument2).body as IHTMLBodyElement).createTextRange;
s := r.text;
// weitere Funktionalität
end;
Text markieren geht dann so:
Delphi-Quellcode:
p := 0; // Position ab der im Text gesucht werden soll
t := 'some text';
r.moveStart('character', 1);
r.moveEnd ('textedit', 0);
r.moveStart ('character', -1);
if r.findText (t, p, 0) then
begin
r.select;
// und wenn Du ersetzen willst
r.pasteHTML ('replace some text');
end;
Nachtrag: Natürlich solltest Du vorher WebBrowser1.Document <> nil etc. prüfen!
Gruß