几个菜鸟问题

Question

为什么我的to-do list总是空的，每次保存后，下次启动后又没了？我的机子上也找不到todo类型的文件？这个文件大吗？不大的话，发给我一个吧，[email protected]，谢了！！！你们都安了些什么组件呀？
怎样在运行时动态加入多级菜单？谁能简单介绍一下TeamSource的用法？你们都用什么版本控制软件呀？谢谢谢谢了！！！
祝所有人永远快乐！！！

Answer 1

为什么我的to-do list总是空的，每次保存后，下次启动后又没了？我的机子上也找不到todo类型的文件？这个文件大吗？不大的话，发给我一个吧，[email protected]，谢了！！！这个冬冬是不太好用！你们都安了些什么组件呀？
CodeRush比较好用，是IDE增强的
怎样在运行时动态加入多级菜单？谁能简单介绍一下TeamSource的用法？你们都用什么版本控制软件呀？
别用TeamSource，用SourceSafe吧

Answer 2

这是我从数据库中取信息，然后构建菜单的程序，你参考一下，用到了递归procedure TForm_Main.MakeMenu(IsMainMenu: Boolean = True; S: String = ''; N: Integer = 0) ;
var i: Integer ;
    MenuItem: TMenuItem ;
    Name_EN, Name_CN: String ;
begin
     i := 0 ;     with TADOQuery.Create(Self) do
       begin
       Connection := ADOConnection_OAM ;
       if IsMainMenu then
          SQL.Add(ycSQLMainMenu)
       else
          SQL.Add(Format(ycSQLChildMenu, [QuotedStr(S)])) ;
       Prepared ;
       Open ;
       First ;       while not Eof do
           begin
           Name_EN := Fields[0].AsString ;
           Name_CN := Fields[1].AsString ;           MenuItem := TMenuItem.Create(Self) ;
           MenuItem.Hint    := Name_EN ;
           MenuItem.Caption := Name_CN ;           if IsMainMenu then
              begin
              MenuItem.GroupIndex := 1 ;
              MainMenu_OAM.Items.Insert(i + 2, MenuItem) ;
              end //of if
           else
              begin
              if ((i mod 20) = 0) and (i <> 0) then
                 MenuItem.Break   := mbBarBreak ;
              MenuItem.Tag := (N + 2) * 1000 + i ;
              MenuItem.OnClick := OpenChild ;
              MainMenu_OAM.Items[N + 2].Add(MenuItem);
              end ; //of else           if IsMainMenu then MakeMenu(False, Name_EN, i) ;
           Next ;
           Inc(i) ;
           end ; //of while
       if Active then Close ;
       Free ;
       end ;  //of with
end;

Answer 3

呵呵..
我体会不到TO DO LIST 的好处