TWebBrowser Fensternamen geben

[Blumi]

Hi zusammen

Wie kann ich einem TWebBrowser oder TWebBrowser_V11 einen Namen also Fensternamen geben?

Wieso?
Es läuft nämlich ein Fenster das nur dann richtig angezeigt wird, wenn das aktuelle Datum als Fensternamen steht.

In Javascript sieht das etwa so aus:

Code:

      var date = new Date() ;
      var winname = date.getTime() ;

Gruss

[mkinzler]

Versuch es mal mit

Delphi-Quellcode:

WebBrowser.OleObject.Document.Title := DateToStr(Date());

[Blumi]

Hi mkinzler

Ich bekomme durch DateToStr -> 21.06.2007 heraus.

Ich hätte gerne die Zeit als UnixTime angezeigt. Ich glaube die heisst so. 1182439947

-- edit

Ich habe das jetzt so gemacht

WebBrowser_V11.OleObject.Document.Title := IntToStr(GetUnixTime);

- erhalte aber immer eine Zugriffsverletzung Meldung!

-- edit2

Danke trotzdem - klappt wohl nicht so wie ich es mir vorgestellt habe .( So wird nur der Titel aber nicht der Name geändert.

[marabu]

Hallo,

die Zugriffsverletzung kommt wahrscheinlich, weil du das Document noch nicht initialisiert hast:

Delphi-Quellcode:

WebBrowser.Navigate('about:blank');

Document.Title kannst du auch so setzen:

Delphi-Quellcode:

WebBrowser.OleObject.Document.Title := IntToStr(DateTimeToUnix(Now));

Die Komponente selbst hat keinen Fenstertitel, die Anzeige von Document.Title erledigt die Host Application, in diesem Fall also deine Anwendung. Je nach dem wie geprüft wird, musst du Application.Title oder WebForm.Caption auf den entsprechenden Wert setzen.

Grüße vom marabu