WebBrowser Quelltext mit ner Label anzeigen?

[napstar]

hey.. wieder ich
ich versuche schon seit ner stunde rum.. und es will einfach nicht funktionieren.. die seite auf die zugegriffen wird ist meine.. und der quelltext besteht nur aus einer zeile.. besser gesagt einer zahl..
mein versucht.. allerdings läst sich das ganze nicht kompilieren..
habt ihr eine idee?

Code:

procedure TForm1.FormCreate(Sender: TObject);
var i:TStringList;
    s:string;
begin
  i:=TStringList.Create;
  WebBrowser1.Navigate('xyxyxyxyxy.net/1.txt');
  s:=WebBrowser1.OleObject.Document.Body.InnerHtml;
  i.Add(s);
  Label1.Caption:=i[1];
  i.free;
end;