Laufzeitfehler bei Variante in DLL

[Tommy82]

Hallo,

Ich habe eine DLL welche eine weitere DLL aufruft.
Ich nenne die erste DLL mal DLL1 und die andere Spaßeshalber DLL2.

In der DLL2 möchte ich eine Webseite auslesen. Da dieses auf dieser Seite irgendwie nicht mit IDHTTP geht, mache ich dies mit TWebBrowser.

Hier ist nun der Quellcode dazu.

Delphi-Quellcode:

Procedure TForm2.Starten;
var   ini : TIniFile;
Quelltext,    
      URL : String;
    vTemp : Variant;
begin
 ini := TIniFile.Create(ExtractFilePath(ParamStr(0)) + 'Config/einstellungen.ini');
 Try
   URL := ini.ReadString('Aktuell','URL','');
   ShowMessage(URL);
   Fertig := False;
   Webbrowser1.Navigate(URL);
   if fertig <> True then Application.ProcessMessages;
   vTemp := WebBrowser1.Document;
   Quelltext := vTemp.Body.OuterHTML;  <--- hier ist ein Fehler
   ShowMessage(Quelltext);
 Finally
   ini.free;
 End;
END;

Sobald ich aber den Quelltext in einen String laden möchte, bekomme ich immer einen Laufzeitfehler.
Interressanterweise funktioniert aber genau dashier in der DLL1 wunderbar. Aus Organisatorischen Gründen möchte ich es aber in DLL2 haben. Sobald ich die Zeile rausnehme geht auch alles nur ich habe keinen Quelltext.
Was mache ich falsch ?

mfg

Tommy82