Wert von OleVariant überprüfen?

[BorlanDelphiUser]

hmm ... also ich hab das ganze jetzt so gemacht.

Delphi-Quellcode:

procedure TForm1.Button3Click(Sender: TObject);
var
   x, Document : OleVariant;  // nicht Variant
begin
  Document:=WebBrowser.Document;
  x:=Document.getElementById('countdown');

  if VarType(x) = varDispatch then   // <-=====
     ShowMessage(x.innerHTML)
  else
     ShowMessage('nix geladen :-(');
end;

und wenn ich jetzt auf den Button klicke kommt immer noch eine Fehlermeldung und keine Messagebox mit dem Hinweis nix geladen

Mach ich da irgendwas verkehrt oder ist da irgendwas im Code falsch?