Browse CVS Repository
Diff of /gikonavigoeson/gikonavi/ItemDownload.pas
Parent Directory
| Revision Log
| Revision Graph
| Patch
| 5 |
uses |
uses |
| 6 |
Windows, SysUtils, Classes, ComCtrls, Controls, Forms, IdHTTP, |
Windows, SysUtils, Classes, ComCtrls, Controls, Forms, IdHTTP, |
| 7 |
{HTTPApp,} YofUtils, IdGlobal, IdException, IdComponent, IniFiles, {DateUtils,} |
{HTTPApp,} YofUtils, IdGlobal, IdException, IdComponent, IniFiles, {DateUtils,} |
| 8 |
GikoSystem, BoardGroup, MonaUtils, ExternalBoardManager, ExternalBoardPlugInMain, |
GikoSystem, BoardGroup, ExternalBoardManager, ExternalBoardPlugInMain, |
| 9 |
Sort; |
Sort; |
| 10 |
|
|
| 11 |
type |
type |
| 375 |
|
|
| 376 |
if Trim(FIndy.Response.RawHeaders.Values['Date']) <> '' then begin |
if Trim(FIndy.Response.RawHeaders.Values['Date']) <> '' then begin |
| 377 |
if Item.DownType = gdtBoard then |
if Item.DownType = gdtBoard then |
| 378 |
Item.Board.LastGetTime := MonaUtils.DateStrToDateTime(FIndy.Response.RawHeaders.Values['Date']) |
Item.Board.LastGetTime := GikoSys.DateStrToDateTime(FIndy.Response.RawHeaders.Values['Date']) |
| 379 |
else |
else |
| 380 |
Item.ThreadItem.ParentBoard.LastGetTime := MonaUtils.DateStrToDateTime(FIndy.Response.RawHeaders.Values['Date']); |
Item.ThreadItem.ParentBoard.LastGetTime := GikoSys.DateStrToDateTime(FIndy.Response.RawHeaders.Values['Date']); |
| 381 |
end; |
end; |
| 382 |
|
|
| 383 |
if DownloadResult then begin |
if DownloadResult then begin |
|
|
Legend:
| Removed from v.1.54 |
|
| changed lines |
| |
Added in v.1.55 |
|
|
| |