OSDN Git Service

未取得レスの表示がおかしい不具合の修正
authorh677 <h677>
Sat, 5 Nov 2005 00:24:49 +0000 (00:24 +0000)
committerh677 <h677>
Sat, 5 Nov 2005 00:24:49 +0000 (00:24 +0000)
Giko.pas

index cf5edf7..df0c392 100644 (file)
--- a/Giko.pas
+++ b/Giko.pas
@@ -1293,7 +1293,9 @@ begin
 
        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
@@ -1304,6 +1306,7 @@ 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;
@@ -3945,6 +3948,7 @@ begin
                                doc.Write(s);
                                doc.Close;
                        finally
+                               ShowWindow(Thread.FBrowser.Handle, SW_SHOW);
                        end;
                end else begin
                        Self.Caption := CAPTION_NAME + ' - [' + ThreadTitle + ']';