Develop and Download Open Source Software

Browse CVS Repository

Diff of /gikonavigoeson/gikonavi/Favorite.pas

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.21 by h677, Tue Jan 6 16:14:39 2004 UTC revision 1.22 by h677, Tue Mar 16 15:37:55 2004 UTC
# Line 188  begin Line 188  begin
188          for i := 0 to TreeView.Items.Count - 1 do begin          for i := 0 to TreeView.Items.Count - 1 do begin
189                  TObject(TreeView.Items[i].Data).Free;                  TObject(TreeView.Items[i].Data).Free;
190          end;          end;
191        TreeView.Free;
192  end;  end;
193    
194  procedure TFavoriteDM.SetFavTreeView(TreeView: TTreeView);  procedure TFavoriteDM.SetFavTreeView(TreeView: TTreeView);

Legend:
Removed from v.1.21  
changed lines
  Added in v.1.22

Back to OSDN">Back to OSDN
ViewVC Help
Powered by ViewVC 1.1.26