OSDN Git Service

Tmpファイルの処理の中のほとんど使われない部分に多少問題があったので修正
authorh677 <h677>
Wed, 23 Jun 2004 14:46:36 +0000 (14:46 +0000)
committerh677 <h677>
Wed, 23 Jun 2004 14:46:36 +0000 (14:46 +0000)
GikoSystem.pas

index 709557f..8058890 100644 (file)
@@ -587,6 +587,8 @@ begin
 
                                                        tmpStr := ini.ReadString('Setting', 'LastModified', DateTimeToStr(ZERO_DATE));
                                                        ThreadItem.LastModified := ConvertDateTimeString(tmpStr);
+                                                       ThreadItem.Count := ini.ReadInteger('Setting', 'Count', 0);
+                                                       ThreadItem.NewReceive := ini.ReadInteger('Setting', 'NewReceive', 0);
 
                                                        ThreadItem.Size := ini.ReadInteger('Setting', 'Size', 0);
                                                        if(ThreadItem.Size = 0) and (FileExists(ThreadItem.GetThreadFileName)) then begin
@@ -595,8 +597,8 @@ begin
                                                                except
                                                                end;
                                                        end;
-                                                       ThreadItem.Count := ini.ReadInteger('Setting', 'Count', 0);
-                                                       ThreadItem.NewReceive := ini.ReadInteger('Setting', 'NewReceive', 0);
+
+
                                                        ThreadItem.Round := ini.ReadBool('Setting', 'Round', False);
                                                        ThreadItem.UnRead := False;//ini.ReadBool('Setting', 'UnRead', False);
                                                        ThreadItem.ScrollTop := ini.ReadInteger('Setting', 'ScrollTop', 0);
@@ -1398,13 +1400,11 @@ var
        CSSFileName: string;
        BBSID: string;
        FileName: string;
-       NewReceiveNo: Integer;
        Res: TResRec;
        boardPlugIn : TBoardPlugIn;
 
        UserOptionalStyle: string;
        SkinHeader: string;
-       SkinNewRes: string;
        SkinRes: string;
        tmp, tmp1: string;
        function LoadSkin( fileName: string ): string;
@@ -1424,7 +1424,6 @@ begin
                if ThreadItem.IsBoardPlugInAvailable then begin
                        //===== \83v\83\89\83O\83C\83\93\82É\82æ\82é\95\\8e¦
                        boardPlugIn             := ThreadItem.BoardPlugIn;
-                       NewReceiveNo    := ThreadItem.NewReceive;
                        // \83t\83H\83\93\83g\82â\83T\83C\83Y\82Ì\90Ý\92è
                        if Length( GikoSys.Setting.BrowserFontName ) > 0 then
                                UserOptionalStyle := UserOptionalStyle +
@@ -1485,7 +1484,6 @@ begin
        ShortDayNames[5] := '\96Ø';               ShortDayNames[6] := '\8bà';
        ShortDayNames[7] := '\93y';
        BBSID := ThreadItem.ParentBoard.BBSID;
-       NewReceiveNo := ThreadItem.NewReceive;
        ReadList := TStringList.Create;
        try
                if ThreadItem.IsLogFile then begin
@@ -1677,7 +1675,7 @@ const
        _END: string = '&END=';
 var
        i, j, k: Integer;
-       tmpBody, tmp: string;
+       tmp: string;
 begin
        Result := '';
        i := AnsiPos(_HEAD, res);