Develop and Download Open Source Software

Browse CVS Repository

Diff of /gikonavigoeson/gikonavi/ItemDownload.pas

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.40 by h677, Mon Oct 25 12:37:17 2004 UTC revision 1.41 by q9_, Sun Nov 21 06:36:11 2004 UTC
# Line 1263  begin Line 1263  begin
1263                                                  if OldCnt >= Body.Count then OldCnt := Body.Count - 1;                                                  if OldCnt >= Body.Count then OldCnt := Body.Count - 1;
1264                                                  NewRes := Body.Count - OldCnt;                                                  NewRes := Body.Count - OldCnt;
1265    
1266                                                    // ここまで読んだが新着レス番を超さないように(異常終了時のリカバリ)
1267                                                    if ThreadItem.Kokomade > OldCnt then begin
1268                                                            if OldCnt > 0 then
1269                                                                    ThreadItem.Kokomade := OldCnt;
1270                                                            else
1271                                                                    ThreadItem.Kokomade := 1;
1272                                                    end;
1273    
1274                                          finally                                          finally
1275                                                  oldBody.Free;                                                  oldBody.Free;

Legend:
Removed from v.1.40  
changed lines
  Added in v.1.41

Back to OSDN">Back to OSDN
ViewVC Help
Powered by ViewVC 1.1.26