Browse CVS Repository
Diff of /gikonavigoeson/gikonavi/Giko.pas
Parent Directory
| Revision Log
| Revision Graph
| Patch
| 4183 |
else |
else |
| 4184 |
FHistoryList.Add( favItem ); |
FHistoryList.Add( favItem ); |
| 4185 |
// SetContent(ThreadItem); |
// SetContent(ThreadItem); |
| 4186 |
|
while GikoSys.Setting.AddressHistoryCount < FHistoryList.Count do begin |
| 4187 |
|
i := FHistoryList.Count - 1; |
| 4188 |
|
TObject( FHistoryList.Items[ i ] ).Free; |
| 4189 |
|
FHistoryList.Delete( i ); |
| 4190 |
|
end; |
| 4191 |
|
|
| 4192 |
if FTreeType = gttHistory then begin |
if FTreeType = gttHistory then begin |
| 4193 |
Node := TreeView.Items.Add( nil, favItem.Title ); |
Node := TreeView.Items.Add( nil, favItem.Title ); |
| 4206 |
Node.ImageIndex := ITEM_ICON_THREADLOG1; |
Node.ImageIndex := ITEM_ICON_THREADLOG1; |
| 4207 |
Node.SelectedIndex := ITEM_ICON_THREADLOG2; |
Node.SelectedIndex := ITEM_ICON_THREADLOG2; |
| 4208 |
Node.Data := favItem; |
Node.Data := favItem; |
| 4209 |
|
while GikoSys.Setting.AddressHistoryCount < TreeView.Items.Count do begin |
| 4210 |
|
i := TreeView.Items.Count - 1; |
| 4211 |
|
TreeView.Items.Item[ i ].Delete; |
| 4212 |
|
end; |
| 4213 |
end; |
end; |
| 4214 |
end; |
end; |
| 4215 |
|
|
|
|
Legend:
| Removed from v.1.460 |
|
| changed lines |
| |
Added in v.1.461 |
|
|
|