procedure TForm1.Button1Click(Sender: TObject);
var
AColumn: TcxGridColumn;
i: Integer;
AData: Integer;
begin
AColumn := cxGrid1TableView1.CreateColumn;
AColumn.DataBinding.ValueType := 'Integer';
AColumn.Summary.FooterKind := skSum;
with cxGrid1TableView1.DataController do
begin
BeginUpdate;
for i := 0 to RecordCount - 1 do
begin
AData := StrToInt(Values[i, 0]) + StrToInt(Values[i, 1]);
SetValue(i, AColumn.Index, AData);
end;
EndUpdate;
end;
end;
잘 지내시죠 ? ^^
drizzle 님이 쓰신 글 :
: 퀀텀그리드에서 A, B의 컬럼이 있고 C라는 컬럼을 Add하여 만들었습니다.
:
: c = a + b 하여서 결과값을 보여주려고 합니다.
: c의 이벤트 onGetDisplayText 에서 a + b를 해서 c컬럼에 보여지기는 하는데.
: 문제는 onGetDisplayText 에서 받은 값이 문자형이다 보니 Footer에서 해당 컬럼의 합을 보여
: 주고 싶은데 여러가지를 시도해 봐도 안되네요.
:
: 어떻게 추가한 컬럼의 값들을 합산하여 Footer에서 보여주는 방법은 없을지요?
:
: 감사합니다.
|