Browse CVS Repository
Diff of /gikonavigoeson/gikonavi/Giko.pas
Parent Directory
| Revision Log
| Revision Graph
| Patch
| 824 |
var Handled: Boolean); |
var Handled: Boolean); |
| 825 |
private |
private |
| 826 |
{ Private 宣言 } |
{ Private 宣言 } |
| 827 |
|
//RoundList : TRoundList; |
| 828 |
FSortIndex: Integer; |
FSortIndex: Integer; |
| 829 |
FSortOrder: Boolean; |
FSortOrder: Boolean; |
| 830 |
|
|
| 1685 |
AddressHistoryDM := nil; |
AddressHistoryDM := nil; |
| 1686 |
except |
except |
| 1687 |
end; |
end; |
| 1688 |
|
//巡回リスト保存&破棄 |
| 1689 |
|
try |
| 1690 |
|
RoundList.SaveRoundFile; |
| 1691 |
|
except |
| 1692 |
|
end; |
| 1693 |
|
|
| 1694 |
|
try |
| 1695 |
|
RoundList.Clear; |
| 1696 |
|
except |
| 1697 |
|
end; |
| 1698 |
|
try |
| 1699 |
|
//RoundList.Free; |
| 1700 |
|
except |
| 1701 |
|
end; |
| 1702 |
|
|
| 1703 |
// TBBS は保持している TCategory, TBoard, TThreadItem すべてを開放する |
// TBBS は保持している TCategory, TBoard, TThreadItem すべてを開放する |
| 1704 |
// TBoard, TThreadItem のデストラクタはプラグインに破棄を伝えるので |
// TBoard, TThreadItem のデストラクタはプラグインに破棄を伝えるので |
| 1731 |
except |
except |
| 1732 |
end; |
end; |
| 1733 |
|
|
|
//巡回リスト保存&破棄 |
|
|
try |
|
|
RoundList.SaveRoundFile; |
|
|
except |
|
|
end; |
|
|
|
|
|
try |
|
|
RoundList.Clear; |
|
|
except |
|
|
end; |
|
|
try |
|
|
RoundList.Free; |
|
|
except |
|
|
end; |
|
| 1734 |
|
|
| 1735 |
try |
try |
| 1736 |
//Hint破棄 |
//Hint破棄 |
|
|
Legend:
| Removed from v.1.181 |
|
| changed lines |
| |
Added in v.1.182 |
|
|
|