メッセージを削除し忘れていたので修正。

diff --git a/Giko.pas b/Giko.pas
index 5ad7fd5..e9658cf 100644 (file)
--- a/Giko.pas
+++ b/Giko.pas
@@ -3748,7 +3748,7 @@ var
        ThreadScrollTop: Integer;
        ThreadIsLog, ThreadUnRead, ThreadNewArraical: boolean;
 begin
-       AddMessageList('SetContent', nil, gmiWhat);
+//     AddMessageList('SetContent', nil, gmiWhat);
        Thread := inThread;
        idx := BrowserTab.TabIndex;
        if (FActiveContent <> nil) and
@@ -6609,7 +6609,7 @@ var
        doc                                     : Variant;
        threadItem      : TThreadItem;
 begin
-       AddMessageList('DocumentComplete', nil, gmiWhat);
+//     AddMessageList('DocumentComplete', nil, gmiWhat);
        if TObject(Sender) is TWebBrowser then begin
                BrowserRecord := nil;
                if TWebBrowser(Sender) <> Browser then begin