保存断点、书签

请问Delphi5/6中怎样保存断点、书签？ 问题点数：20、回复次数：4Top

1 楼quark（夸克）回复于 2002-03-06 20:46:44 得分 10

//==============================================================================  
  //全选DBGrid中所有数据**********************************************************  
  //==============================================================================  
  procedure   DBGridSelectAll(DBGrid:   TDBGrid);  
  var   SavePlace:   TBookmark;  
  begin  
      with   DBGrid   do  
      begin//01  
          if   (dgMultiSelect   in   Options)   and   DataSource.DataSet.Active  
          then   with   DataSource.Dataset   do  
                    begin//02  
                        if   (BOF   and   EOF)   then   Exit;  
                        DisableControls;  
                        try  
                            SavePlace   :=   GetBookmark;//保存  
                            try  
                                First;  
                                while   not   EOF   do  
                                begin//03  
                                    SelectedRows.CurrentRowSelected   :=   True;  
                                    Next;  
                                end;//03  
                            finally  
                                try  
                                    GotoBookmark(SavePlace);//回到书签  
                                except  
                                end;  
                                FreeBookmark(SavePlace);//释放  
                            end;  
                        finally  
                            EnableControls;  
                        end;  
                    end;//02  
      end;//01  
  end;  
  Top

2 楼jovian0999（）回复于 2002-03-06 21:06:08 得分 0

对不起，我没有说清楚，我是说在Delphi   IDE环境中怎样保存断点、书签，以便下次调试？Top

3 楼lastlove（活着真没劲）回复于 2002-03-06 21:14:09 得分 5

想法有创意，不知道怎么保存，大概要问宝朗公司的人~~Top

4 楼INeedCa（缺钙）回复于 2002-03-06 21:58:36 得分 5

断点（BreakPoint）自己会保存的吧？  
  书签（Ctrl+Shift+Number）好像不会保存。Top

相关问题

• 断点
• 书签
• 保存
• saveplace
• dbgrid
• do begin
• try

• 帖主：jovian0999
• quark
• lastlove
• INeedCa

• Delphi类图书
• Delphi类源码下载
• Delphi控件下载