cxGrid 知识点

  • cxGrid 知识点

    • 设置 TableView.OptionsView.HeaderAutoHeight 为 True 时栏目标题高度自动调整
    • 网格上选择了记录,当焦点移走时,看不到选择的记录,解决办法:修改 TableView 的属性,OptionsSelection->HideSelection 设为 False
    • 遍历选中记录:
      with ATableView.DataController do
      begin
      VOldFocusedRecordIndex := FocusedRecordIndex;

      for VIndex := 0 to ATableView.Controller.SelectedRowCount - 1 do
      begin
      FocusedRecordIndex := ATableView.Controller.SelectedRows[VIndex].RecordIndex;
      AQry.UpdateObject.ExecSQL(ukInsert);
      end;

      FocusedRecordIndex := VOldFocusedRecordIndex;
      end;

    • 遍历当前视图所有记录:
      with ATableView.DataController do
      begin
      VOldFocusedRecordIndex := FocusedRecordIndex;

      for VIndex := 0 to FilteredRecordCount - 1 do
      begin
      FocusedRecordIndex := FilteredRecordIndex[VIndex];
      AQry.UpdateObject.ExecSQL(ukInsert);
      end;

      FocusedRecordIndex := VOldFocusedRecordIndex;
      end;

    • 调用 TableView 的 DataController.Groups.FullExpand 方法展开所有节点
    • 在使用自定义数据源,删除记录时,先 BeginUpdate,处理完后再 EndUpdate,否则会偶尔抛出索引超出范围:
      tvProducePlan.BeginUpdate;
      try
      FCustomDataSource.DeleteSelectedRecord(GetSelectedIds);
      finally
      tvProducePlan.EndUpdate;
      end;
    • 获取选中记录某列的值:
      function TMainForm.GetSelectedIds: TStringArray;
      var
      VIndex: Integer;
      begin
      SetLength(Result, tvProducePlan.Controller.SelectedRowCount);
      for VIndex := 0 to tvProducePlan.Controller.SelectedRowCount - 1 do
      Result[VIndex]:= tvProducePlan.DataController.Values[tvProducePlan.Controller.SelectedRecords[VIndex].RecordIndex, 0];
      end;
    • 根据某网格的数据定位另一个网格:
      procedure TMainForm.LinkFocusRecord(AParentColumn, AChildColumn: TcxGridColumn; AParentGrid, AChildGrid: TcxGridTableView);
      var
      VIndex: Integer;
      VValue: STring;
      FocusedRecord: TcxGridFocusedRecordChangedEvent;
      begin
      FocusedRecord:= AParentGrid.OnFocusedRecordChanged;
      AParentGrid.OnFocusedRecordChanged := nil;
      try
      with AChildGrid.DataController do
      begin
      VValue := GetDisplayText(FocusedRecordIndex, AChildColumn.Index);
      end;

      VIndex := AParentGrid.DataController.FindRecordIndexByText(0, AParentColumn.Index, VValue, False, False, True);

      if VIndex < 0 then
      begin
      AParentGrid.DataController.ClearSelection;
      Exit;
      end;

      AParentGrid.DataController.FocusedRecordIndex := VIndex;
      AParentGrid.DataController.SyncSelectionFocusedRecord;
      finally
      AParentGrid.OnFocusedRecordChanged := FocusedRecord;
      end;
      end;

    • TableView 的 FocusedRecordChanged 事件表示当前聚焦记录改变
    • 使用 TcxGridTableView.Controller 的 TopRowIndex、LeftPos 获取或设置当前可见视图顶部行号、左边位置

你可能感兴趣的:(#,Delphi控件,开发语言,c语言)