OSDN Git Service

スレ一覧の底の方にフォーカスがあって、スレ一覧を更新したときに、スレ一覧のアイテム数が
authorh677 <h677>
Mon, 8 Nov 2004 14:40:23 +0000 (14:40 +0000)
committerh677 <h677>
Mon, 8 Nov 2004 14:40:23 +0000 (14:40 +0000)
更新前より少ないとエラーがでて、終了するしかなくなる不具合の修正

Giko.pas

index 1eb3de9..be28f43 100644 (file)
--- a/Giko.pas
+++ b/Giko.pas
@@ -4045,7 +4045,9 @@ begin
                        SetThreadListItem(TBoard(Obj));
                end;
 
-               if idx >= 0 then begin
+               if idx >= 0  then begin
+                       if idx >= ListView.Items.Count then
+                               idx := ListView.Items.Count - 1;
                        ListView.ItemIndex := idx;
                        ListView.ItemFocused := ListView.Items.Item[ idx ];
                end;