Browse CVS Repository
Diff of /gikonavigoeson/gikonavi/Giko.pas
Parent Directory
| Revision Log
| Revision Graph
| Patch
| 2533 |
|
|
| 2534 |
//巡回ありの場合&1000超は巡回削除 |
//巡回ありの場合&1000超は巡回削除 |
| 2535 |
if (Item.ThreadItem.Round) and (Item.ThreadItem.Count > 1000) then begin |
if (Item.ThreadItem.Round) and (Item.ThreadItem.Count > 1000) then begin |
| 2536 |
Item.ThreadItem.Round := False; |
// 2ch以外は、1000が最高か不明なので、2ch限定にする |
| 2537 |
//Item.ThreadItem.RoundName := ''; |
if (Item.ThreadItem.ParentBoard.Is2ch) then begin |
| 2538 |
AddMessageList('★1000発言を超えたので巡回を削除しました - [' + Item.ThreadItem.Title + ']', nil, gmiOK); |
Item.ThreadItem.Round := False; |
| 2539 |
|
AddMessageList('★1000発言を超えたので巡回を削除しました - [' + Item.ThreadItem.Title + ']', nil, gmiOK); |
| 2540 |
|
end; |
| 2541 |
end; |
end; |
| 2542 |
TreeView.Refresh; |
TreeView.Refresh; |
| 2543 |
//ListViewでこのスレが含まれる板を表示しているときの更新処理 |
//ListViewでこのスレが含まれる板を表示しているときの更新処理 |
|
|
Legend:
| Removed from v.1.661 |
|
| changed lines |
| |
Added in v.1.662 |
|
|
|