1. 程式人生 > >CXGRID用法(取行、列值;定位選中某行等等)

CXGRID用法(取行、列值;定位選中某行等等)

定位 caption gdt true llc bind ado edt databind

Delphi Cxgrid獲取選中行列,排序規則,當前正在編輯的單元格內的值

cxGrid1DBTableView1.Controller.FocusedRowIndex 當前行號

cxGrid1DBTableView1.Controller.FocusedRow 當前行
cxGrid1DBTableView1.Controller.FocusedColumn 當前列
cxGrid1DBTableView1.Controller.FocusedColumnIndex 當前列號
cxGrid1DBTableView1.Controller.EditingItem 當前編輯中的單元框
cxGrid1DBTableView1.Controller.EditingController.Edit 當前的編輯框

在編輯狀態下可以這樣取當前單元格的值:
if cxGrid1DBTableView1.Controller.FocusedColumn.Editing then
ShowMessage(cxGrid1DBTableView1.Controller.EditingController.Edit.EditingValue)
else
cxGrid1DBTableView1.DataController.GetValue(cxGrid1DBTableView1.DataController.FocusedRecordIndex,
cxGrid1DBTableView1.Controller.FocusedItemIndex);

非編輯狀態下可以這樣取得單元格內的值:
OnCellClick事件代碼:
procedure TForm1.cxGrid1DBTableView1CellClick(
Sender: TcxCustomGridTableView;
ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
AShift: TShiftState; var AHandled: Boolean);
var
v : Variant;
begin
v := ACellViewInfo.Value;

end;

取列值
i := cxGrid1DBBandedTableView1.Controller.FocusedColumn.Index;
cxGrid1DBBandedTableView1.DataController.GetValue(cxGrid1DBBandedTableView1.Controller.SelectedRows[0].RecordIndex,i);
cxGrid1DBTableView1.DataController.Values[行,列]
取得焦點
cxGrid1DBTableView1.Columns[5].FocusWithSelection;
cxGrid1DBTableView1.Columns[4].Focused:=True;
得到當前點擊的單元格的值
uses Clipbrd;

OnCellClick事件代碼:
procedure TForm1.cxGrid1DBTableView1CellClick(
Sender: TcxCustomGridTableView;
ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
AShift: TShiftState; var AHandled: Boolean);
var
v : Variant;
begin
v := ACellViewInfo.Value;//值
Clipboard.AsText := vartostr(v);//保存到clipboard
end;
cxGrid的DBTableView的名稱為dgtv1

1. 返回選中的行數 gdtv1.DataController.GetSelectedCount;

2. 返回選中行的索引: gdtv1.DataController.GetSelectedRowIndex(0) , 表示第一個選中行的索引

3. 返回選中行的數據;

var
I, J:Integer;
begin
for I:=0 to gdtv1.DataController.GetSelectedCount - 1 do begin
J := gdtv1.DataController.GetSelectedRowIndex(I);
ShowMessage(VarToStr(gdtv1.DataController.GetValue(J, 0))); //選擇中行的第列的值
end;
end;

4. 獲取cxGrid排序規則

const
OrderArray: array[soNone..soDescending] of string = (‘None‘, ‘ASC‘, ‘DESC‘);
var
I: integer;
S, OrderStr: string;
begin
for I := 0 to gdtv1.SortedItemCount - 1 do begin
if S <> ‘‘ then
S := S + ‘, ‘;
OrderStr := OrderStr + gdtv1.SortedItems[I].DataBinding.DefaultCaption + ‘ ‘;
OrderStr := OrderStr + OrderArray[TcxDataSortOrder(gdtv1.SortedItems[I].SortOrder)];
S := S + OrderStr;
end;
ShowMessage(‘ORDER BY ‘ + S);

5.獲取多選的值

for i := 0 to cxgrid1.SelectedRows.Count-1 do
begin
cxgrid1.DataSource.DataSet.GotoBookmark(Pointer(cxgrid1.SelectedRows.Items[i])); //定位選中的字段

end;

6.//選擇行的第1列的值

for I:=0 to cxGrid1DBTableView1.DataController.GetSelectedCount - 1 do
begin
J := cxGrid1DBTableView1.DataController.GetSelectedRowIndex(I);
ShowMessage(VarToStr(cxGrid1DBTableView1.DataController.GetValue(J, 0)));

end;

7.獲取所選行的值

with cxGrid1DBTableView1.Controller do
begin

for i:=0 to SelectedRowCount-1 do
begin
SelectedRows[i].Focused:=True;
ShowMessage(ADOQuery1.fieldbyname(‘mc‘).AsString);
end;

end;

CXGRID用法(取行、列值;定位選中某行等等)