TWEbbrowser : String im Dokument suchen

[FbAi]

hi leute.
Ich möchte gerne in einem Dokument des TWebbrowsers nach einem bestimmte String suchen.
Ich habe daszu folgendes geschrieben:

Delphi-Quellcode:

  code.Text := browser.OleObject.Document.body.OuterHTML;
  RegCheck.Expression := '([_a-zA-Z\d\-\.]{5,10})';
  if RegCheck.Exec(code.Text) then begin
    logbook.Log(ltStep,'Ergebniss enthalten');
  end else
    logbook.Log(ltError,'Ergebniss nicht enthalten');
  logbook.Log(ltStep,code.Lines.Text);

code : TMemo;
logbook : TStringLogger;
log : TMemo;
RegCheck : TRegExpr;

um die Komponenten TStringlistLogger und TRegExpr brauchen wir uns nicht kümmern,
der Logger schrreibt eben nur eine Zeile in ein Memo-Objekt
und TRegExpr ist eine Komponente um reguläre Ausdrücke zu überprüfen.

Das Problem ist jetzt, dass anscheinend irgendwas mitcode nicht stimmt,
da das ergebniss der Überprüfung immer negativ ausfällt;
wenn ich aber den html-code in das Memo-Objekt log packe dann funktioniert alles.
Der unterschied zwischen den beiden dass das Memo-Objekt log auf der Form ist

und ich das Memo-Objekt code einfach in die private deklaration geschrieben habe:
code : TMemo;

ist das nicht möglich ???

Ausserdem gibt es immer einen Fehler beim ausführen des Programms bei dieser Zeile:
logbook.Log(ltStep,code.Lines.Text); liegt das an dem Memo-feld ???

Wer kann helfen das Problem zu lösen ??