OSDN Git Service

起動時に意図せず最新100レスのみ表示になってしまうことがあるバグを修正。
authoryoffy <yoffy>
Fri, 6 Aug 2004 02:05:16 +0000 (02:05 +0000)
committeryoffy <yoffy>
Fri, 6 Aug 2004 02:05:16 +0000 (02:05 +0000)
Giko.pas

index c40536b..67ec00e 100644 (file)
--- a/Giko.pas
+++ b/Giko.pas
@@ -1569,7 +1569,7 @@ begin
        SetToolBarPopup;
 
        // \83\8c\83X\95\\8e¦\94Í\88Í
-       FResRangeMenuSelect := 100;
+       FResRangeMenuSelect := GikoSys.ResRange;
        case GikoSys.ResRange of
        Ord( grrAll ):
                begin
@@ -1577,11 +1577,10 @@ begin
                end;
        Ord( grrSelect ):
                begin
-                       SelectComboBox.Text := SelectComboBox.Items[ 0 ];
+                       SelectComboBox.Text := SelectComboBox.Items[ 1 ];
                        SelectResAction.Checked := True;
                end;
        else
-               FResRangeMenuSelect := GikoSys.ResRange;
 //             ResRangeAction.Execute;
                case FResRangeMenuSelect of
                Ord( grrKoko ): OnlyKokoResAction.Checked       := True;