Browse CVS Repository
Diff of /gikonavigoeson/gikonavi/NewBoard.pas
Parent Directory
| Revision Log
| Revision Graph
| Patch
| 81 |
if FAbort then |
if FAbort then |
| 82 |
Exit; |
Exit; |
| 83 |
if Item.FContent <> '' then begin |
if Item.FContent <> '' then begin |
|
GikoDM.TabsSaveAction.Tag := 1; |
|
| 84 |
GikoDM.TabsOpenAction.Tag := 1; |
GikoDM.TabsOpenAction.Tag := 1; |
| 85 |
GikoDM.TabsSaveAction.Execute; |
GikoDM.TabsSaveAction.Execute; |
| 86 |
if (UpdateURL(Item.FContent)) then begin |
if (UpdateURL(Item.FContent)) then begin |
| 87 |
GikoForm.ReloadBBS; |
GikoForm.ReloadBBS; |
| 88 |
end; |
end; |
|
GikoDM.TabsSaveAction.Tag := 0; |
|
| 89 |
GikoDM.TabsOpenAction.Tag := 0; |
GikoDM.TabsOpenAction.Tag := 0; |
| 90 |
end else |
end else |
| 91 |
MessageMemo.Lines.Add('ダウンロードが失敗しました[' + IntToStr(Item.FResponseCode) + ']'); |
MessageMemo.Lines.Add('ダウンロードが失敗しました[' + IntToStr(Item.FResponseCode) + ']'); |
|
|
Legend:
| Removed from v.1.25 |
|
| changed lines |
| |
Added in v.1.26 |
|
|
|