如题!

解决方案 »

  1.   

    就是如何使DBGrid左侧的黑色箭头指向选中的记录,唉
      

  2.   

    if SimpleDataSet_Check.Locate('SupplierTypeID',
                    SimpleDataSet_SupplierTypeSupplierTypeID.Value,[]) then
                    begin
                       。
    用查找命令找到后,黑色箭头自动指向选中的记录,不需要做什么
      

  3.   

    query1.Locate('查询字段',查询值,[loCaseInsensitive]);
      

  4.   

    你的意思是不是,选中多行时,依据指针的移动将当前的记录置为黑色箭头吗?
    是的话就用..... Book,BookList 吧
      

  5.   

    请教zhyanger() ,在下正有此意,只是不知具体如何进行。
      

  6.   


    procedure TFrmMaterialData.MPrint;
    var
      BookList:TBookListEH;   //定义指针
      Book:TBook;
    begin
        Book:=ADOQuery.GetBook;      //保存当前记录的指针
        BookList:=grid.SelectedRows; //将选中行的数据指针存于书签
        for n:=0 to BookList.Count-1 do              //取的选中的行
        begin
          ADOQuery.GotoBook(pointer(booklist[n]));
        end;
        ADOQuery.GotoBook(Book);
        ADOQuery.FreeBook(Book);
    endGrid的datasource是ADOQuery