为什么我的Tbookmark类型再运行中总是包错说‘书签无效‘呢？

这是初始化书签部分：
GoBack := Hao_Dm.Pro_SearchTotal.GetBook ;
    while Lstv_ids.Items.Count<200 do begin  //每页显示200条
        mylist := Lstv_ids.Items.Add ;
        if  not(hao_dm.Pro_SearchTotal.Eof) then
            with mylist do begin
                caption := conertAction(hao_dm.Pro_SearchTotal.FieldValues ['Action']);
                SubItems.Add(Hao_DM.Pro_SearchTotal.FieldValues ['_Timestamp']);
                SubItems.Add(Hao_DM.Pro_SearchTotal.FieldValues ['Protocol']);
                SubItems.Add(Hao_Dm.Pro_SearchTotal.FieldValues ['Atk_Type']);
                SubItems.Add(convertlevel(Hao_Dm.Pro_SearchTotal.FieldValues ['Atk_Level']));
                SubItems.Add(Hao_DM.Pro_SearchTotal .FieldValues['src_ip']);
                SubItems.Add(ConvertPort(Hao_DM.Pro_SearchTotal.FieldValues['src_port']));
                SubItems.Add(Hao_DM.Pro_SearchTotal.FieldValues['dst_ip']);
                SubItems.Add(ConvertPort(Hao_DM.Pro_SearchTotal.FieldValues['dst_port']));
                SubItems.Add(Hao_DM.Pro_SearchTotal.FieldValues['ReMark']);
                SubItems.Add(Hao_DM.Pro_SearchTotal.FieldValues['ID']);
                GoAhead := Hao_DM.Pro_SearchTotal.GetBook ;
                hao_dm.Pro_SearchTotal.Next ;
            end
        else
            break;
然后再调用他：
GoBack := GoAhead;
Hao_dm.Pro_SearchTotal.GotoBook (GoAhead);
Hao_Dm.Pro_SearchTotal.Next ;运行到调用的第二句的时候就出错，说书签无效，请问这是为什么呢？