델파이 Tcxgrid 선택한 값 가져오기

델파이 Tcxgrid 선택한 값 가져오기

 

var

i : Integer;

vVal : Variant;

begin

//with cxGridDBTableView16 do

//begin

// ShowMessage(Columns[Controller.FocusedColumnIndex].Caption);

// ShowMessage(Columns[Controller.SelectedColumns[4]].Caption);

//end;

//cxGridDBTableView16.DataController.SelectRows(4);

vVal := Null;

 

for I := 0 to cxGridDBTableView16.DataController.GetSelectedCount-1 do

begin

vVal := cxGridDBTableView16.DataController.Values[cxGridDBTableView16.Controller.SelectedRows[i].RecordIndex,4];

end;

 

ShowMessage(VarToStr(vVal));

if vVal <> Null then

begin

cxGridDBTableView16.DataController.DataSource.DataSet.Post;

CDT_UpdateSum( Acconut_Code, DataSource_Conduit_Sum.DataSet.FieldByName('CDT_Name').AsString );

end;