Browse CVS Repository
Diff of /gikonavigoeson/gikonavi/Giko.pas
Parent Directory
| Revision Log
| Revision Graph
| Patch
| 7749 |
Node.SelectedIndex := 16; |
Node.SelectedIndex := 16; |
| 7750 |
end; |
end; |
| 7751 |
|
|
| 7752 |
|
if not (TObject(SenderNode.Data) is TFavoriteFolder) then |
| 7753 |
|
FavoriteMoveTo( SenderNode, Node ); |
| 7754 |
|
|
| 7755 |
end; |
end; |
| 7756 |
|
|
| 7757 |
procedure TGikoForm.FavoriteDragDrop( SenderNode: TTreeNode; Source: TObject ); |
procedure TGikoForm.FavoriteDragDrop( SenderNode: TTreeNode; Source: TObject ); |
| 7810 |
FavoriteDragDrop( SenderNode, Source ); |
FavoriteDragDrop( SenderNode, Source ); |
| 7811 |
end; |
end; |
| 7812 |
|
|
| 7813 |
|
if FDropSpaceNode <> nil then begin |
| 7814 |
|
FDropSpaceNode.Free; |
| 7815 |
|
FDropSpaceNode := nil; |
| 7816 |
|
end; |
| 7817 |
|
|
| 7818 |
end; |
end; |
| 7819 |
|
|
| 7820 |
procedure TGikoForm.FavoriteTreeViewEdited(Sender: TObject; |
procedure TGikoForm.FavoriteTreeViewEdited(Sender: TObject; |
|
|
Legend:
| Removed from v.1.112 |
|
| changed lines |
| |
Added in v.1.113 |
|
|
|