JAVA AJAX教程第二章-JAVASCRIPT基础知识
2009-10-12 23:40
771 查看
var f: TcxGridDBTableSummaryItem;
cx_for_mctv.OptionsView.Footer := true;
//cxGrid1DBTableView1.OptionsView.Footer := True;
f := (cx_for_mctv.DataController.Summary.FooterSummaryItems.Add) as TcxGridDBTableSummaryItem;
f.FieldName := cx_for_mctv.Columns[2].DataBinding.FieldName;
f.Column := cx_for_mctv.Columns[2];
f.Kind := skSum;
///////////////////////////////////////////////////////////////////
procedure Tform_for_cz.CreateSumFooter(cxTableView: TcxGridDBTableView;
const fieldList: string);
var
i: Integer;
f: TcxGridDBTableSummaryItem;
l: TStringList;
begin
l := TStringList.Create;
l.DelimitedText := fieldList;
l.Delimiter := ',';
cxTableView.OptionsView.Footer := True;
for i := 0 to cxTableView.ColumnCount - 1 do
begin
if l.IndexOf(cxTableView.Columns[i].DataBinding.FieldName) <> -1 then
begin
f := (cxTableView.DataController.Summary.FooterSummaryItems.Add) as TcxGridDBTableSummaryItem;
f.FieldName := cxTableView.Columns[i].DataBinding.FieldName;
f.Column := cxTableView.Columns[i];
if f.FieldName <> '凭证号' then
f.Kind := skSum
else
f.kind := skcount;
end;
end;
l.Free;
end;
本文出自 “一切有为法,如梦幻泡影” 博客,请务必保留此出处http://kaixinbuliao.blog.51cto.com/2567365/885644
cx_for_mctv.OptionsView.Footer := true;
//cxGrid1DBTableView1.OptionsView.Footer := True;
f := (cx_for_mctv.DataController.Summary.FooterSummaryItems.Add) as TcxGridDBTableSummaryItem;
f.FieldName := cx_for_mctv.Columns[2].DataBinding.FieldName;
f.Column := cx_for_mctv.Columns[2];
f.Kind := skSum;
///////////////////////////////////////////////////////////////////
procedure Tform_for_cz.CreateSumFooter(cxTableView: TcxGridDBTableView;
const fieldList: string);
var
i: Integer;
f: TcxGridDBTableSummaryItem;
l: TStringList;
begin
l := TStringList.Create;
l.DelimitedText := fieldList;
l.Delimiter := ',';
cxTableView.OptionsView.Footer := True;
for i := 0 to cxTableView.ColumnCount - 1 do
begin
if l.IndexOf(cxTableView.Columns[i].DataBinding.FieldName) <> -1 then
begin
f := (cxTableView.DataController.Summary.FooterSummaryItems.Add) as TcxGridDBTableSummaryItem;
f.FieldName := cxTableView.Columns[i].DataBinding.FieldName;
f.Column := cxTableView.Columns[i];
if f.FieldName <> '凭证号' then
f.Kind := skSum
else
f.kind := skcount;
end;
end;
l.Free;
end;
View_Client.DataController.Summary.FooterSummaryValues[0],//得到值 View_Client.DataController.Summary.FooterSummaryTexts //得到显示文字 View_Client.DataController.Summary.FooterSummarys //得到合计对象 |
相关文章推荐
- (转)JAVA AJAX教程第二章-JAVASCRIPT基础知识
- JAVA AJAX教程第二章-JAVASCRIPT基础知识
- java基础知识记录--html javascript ajax(摘自张孝祥整理java面试题)
- java基础63 JavaScript中的Number、Math、String、Date对象(网页知识)
- java基础64 JavaScript中的Arrays数组对象和prototype原型属性(网页知识)
- java基础68 JavaScript城市联动框(网页知识)
- Java培训实战教程之Java基础知识精华部分(二)
- Java培训实战教程之Java基础知识精华部分(六)-继承
- Java教程:软件开发基础知识
- Ajax基础教程---1.3 Web应用的发展历程 CGI->applet->JavaScript->flash ->DHTML->AJAX
- java基础 第二章 基础知识
- java基础知识精讲视频教程百度云盘分享!
- 从零开始学_JavaScript_系列(26)——只需要前端知识的ajax教程
- JAVA AJAX教程第五章—DOM和JAVASCRIPT深入
- java基础65 JavaScript中的Window对象(网页知识)
- JAVA教程-Java语言基础知识
- 黑马程序员_java基础笔记(09)...HTML基本知识、CSS、JavaScript、DOM
- Java的Socket网络编程基础知识入门教程
- AJAX 教程---基础知识
- Java培训实战教程之Java基础知识精华部分(一)(二)(三)