if DBGridEh1.Selection.SelectionType = gstRectangle thenbeginDBGridEh1.DataSource.DataSet.Bookmark := DBGridEh1.Selection.Rect.TopRow;DBGridEh1.DataSource.DataSet.Next;
SelectionType=gstRetangle时
进行处理的话,就要用到
AGridEh.Selection.Rect.LeftCol
DBGridEh1.Selection.Rect.TopRow 这样的数据了
其它处理可以这样去用
// for i:=0 to DBGridEhInStroe.SelectedRows.Count-1 do begin
// bkm:= Pointer(DBGridEhInStroe.SelectedRows.Items[i]);
// gotoBookMark(bkm);
// end;
// StoreNumList:= '';
// cdsOutStore.First;
// while not cdsOutStore.Eof do begin
// if DBGridEhInStroe.SelectedRows.CurrentRowSelected then begin
// cdsOutStore.Edit;
// //StoreNumList:= StoreNumList + QuotedStr(cdsOutStore.fieldByName('号').AsString)+',';
// if cdsOutStore.FieldByName('').AsString<>'1' then begin
// cdsOutStore.FieldByName('').Value:= 1;
// cdsOutStore.FieldByName('').Value:= dm_func.lstGVars.Values['loginemployeename'];
// cdsOutStore.FieldByName('').Value:= Now;
// end;
// end;
// cdsOutStore.Next;
// end;
联系客服