From: h677 Date: Sun, 12 Sep 2004 11:20:20 +0000 (+0000) Subject: StatusBarに使用しているNGワードの名前が出ない不具合の解消と X-Git-Tag: v1_64_1_820~886 X-Git-Url: http://git.osdn.net/view?a=commitdiff_plain;h=b558e9cfadc544e92964bd88d416fc71a11b7ce7;p=gikonavigoeson%2Fgikonavi.git StatusBarに使用しているNGワードの名前が出ない不具合の解消と スレッド表示エリアのリサイズの修正 --- diff --git a/Giko.dfm b/Giko.dfm index 6fba2dc..61be6d0 100644 --- a/Giko.dfm +++ b/Giko.dfm @@ -38,11 +38,7 @@ object GikoForm: TGikoForm Width = 500 end item - Style = psOwnerDraw Width = 50 - end - item - Width = 100 end> SimplePanel = False OnResize = StatusBarResize @@ -320,7 +316,6 @@ object GikoForm: TGikoForm ViewStyle = vsReport OnAdvancedCustomDrawItem = ListViewAdvancedCustomDrawItem OnColumnClick = ListViewColumnClick - OnColumnDragged = ListViewColumnDragged OnColumnRightClick = ListViewColumnRightClick OnCustomDraw = ListViewCustomDraw OnData = ListViewData diff --git a/Giko.pas b/Giko.pas index 4a5c73a..1f4fd07 100644 --- a/Giko.pas +++ b/Giko.pas @@ -11053,9 +11053,7 @@ var i: Integer; begin for i := BROWSER_COUNT - 1 downto 0 do begin - SendMessage(TWebBrowser(FBrowsers[i]).Handle, WM_SETREDRAW, 0, 0); //•`‰æ’âŽ~ SetWindowPos(TWebBrowser(FBrowsers[i]).Handle, HWND_NOTOPMOST, 0, 0, NewWidth, NewHeight, SWP_NOMOVE + SWP_NOZORDER); - SendMessage(TWebBrowser(FBrowsers[i]).Handle, WM_SETREDRAW, 1, 0); //•`‰æ end; end;