FSearchDialog := nil;
BrowserNullTab := TBrowserRecord.Create;
+ Browser.ControlInterface.FullScreen := true;
BrowserNullTab.Browser := Browser;
+
BrowserNullTab.Browser.Navigate(BLANK_HTML);
FBrowsers := TList.Create;
for i := 0 to BROWSER_COUNT -1 do begin
TOleControl(newBrowser).Left := 0;
TOleControl(newBrowser).Top := 0;
newBrowser.ControlInterface.Silent := true;
+ newBrowser.ControlInterface.FullScreen := true;
newBrowser.OnDocumentComplete := BrowserDocumentComplete;
newBrowser.OnBeforeNavigate2 := BrowserBeforeNavigate2;
newBrowser.OnEnter := BrowserEnter;
doc.Write(s);
doc.Close;
finally
+ ShowWindow(Thread.FBrowser.Handle, SW_SHOW);
end;
end else begin
Self.Caption := CAPTION_NAME + ' - [' + ThreadTitle + ']';