object cxDBF_TestType: TcxDBLookupComboBox Left = 85 Top = 50
AutoSize = False
DataBinding.DataField = 'TestType'
DataBinding.DataSource = dmTest.ds_Test Properties.DropDownListStyle = lsFixedList Properties.ImmediatePost = True
Properties.KeyFieldNames = 'TestTypeTbID' Properties.ListColumns = < item
FieldName = 'TestTypeName' end>
Properties.ListOptions.ShowHeader = False Properties.ListSource = dmTest.ds_TestTypeTb
Style.LookAndFeel.Kind = lfOffice11
Style.LookAndFeel.SkinName = 'Lilian'
StyleDisabled.LookAndFeel.Kind = lfOffice11 StyleDisabled.LookAndFeel.SkinName = 'Lilian' StyleFocused.LookAndFeel.Kind = lfOffice11 StyleFocused.LookAndFeel.SkinName = 'Lilian' StyleHot.LookAndFeel.Kind = lfOffice11 StyleHot.LookAndFeel.SkinName = 'Lilian' TabOrder = 3 Height = 22 Width = 140 end
×××××××××× cxGrid控件的应用方法
var
i: Integer;
FieldName,DisplayName: string; FColumn: TcxGridDBColumn;
for i := 0 to AdoTable1.Fields.Count - 1 do begin
FieldName := AdoTable1.Fields[i].FieldName;
AdoTable1.Fields[i].DisplayLabel := FieldName; FColumn := cxGridDBTableView.CreateColumn; FColumn.DataBinding.FieldName := FieldName; FColumn.MinWidth := 100; end; end; 另一种方法：
procedure TForm1.btnAddRowColumnClick(Sender: TObject); var
Column: TcxGridColumn; begin
Column:= cxGrid1TableView1.CreateColumn; Column.Caption := 'Test';
cxGrid1TableView1.DataController.AppendRecord;
cxGrid1TableView1.DataController.Values[0, 0] := 'ABC'; cxGrid1TableView1.DataController.Post; end;
procedure TForm1.btnDelRowColumnClick(Sender: TObject); begin
cxGrid1TableView1.DataController.DeleteRecord(0); cxGrid1TableView1.Columns[0].Free; end;
最近做了Cxgrid的加强右键菜单工具
新版本已出来,加入了多语控制等功能,优化了速度(希望大家给点意见)
主要功能:(详情请下载后运行其中的cxGridPopupMenuTest.exe文件) 1.多列排序
2.对列进行計數、合計、求最大值、求最小值、求平均值的聚合操作 3.设置列的对齐方式:居中、居左、居右 4.将数据输出到EXCEL、HTML、XML、TEXT 5.过滤数据 6.选择隐藏列
7.图形分析(将直接数据或分组后的数据用条图、屏图等多种图形显示出来) 8.增删改表头操作,也可设置表头的位置
9.增删改非数据关联列的操作,可定义计算列的取值脚本
10.配色设置(可选择统一配色或根据列或记录的值自定义列或行的颜色) 11.打印设置(可打印当前的cxGrid或其它此窗体上的控件) 12.多语功能
13.其它(如加入序号列、块选择数据、使过滤数据在Dataset上也起作用) 如果你有新的需求或更改的地放,请联系,谢谢
所有介绍中的设置都会自动保存，下次打开窗体时会自动加载上次的设置。
联系方式:13641869371 QQ:16187001 SKYPE:grjyubosoft.net
grj208981@163.com,grj208981sina.com 主页:http://grjgrj.512j.com
预览地址
http://grjgrj.512j.com/file/view.bmp 下载地址:
http://grjgrj.512j.com/file/test.rar
××××××××
cxgrid:cxgrid如何框选表中的数据?
cxgrid里已经是多选
但选择时候只能有鼠标+ctrl或是头选下,然后shift选尾
能不能用框选的,就是用鼠标按住拖动进行多选？？？ 怎么设置呀？？
cxGird里面通常有个cxView,需要设置其OptionsSelection－>CellMultiSelect为True 3Q
原来我是打勾MultiSelect
×××××××××××××
cxgrid取某一个列的求和的值，怎么读取？？？
在CXGRID中，已经对某一列在footerkind设置了求和skSum， 我Label.caption：＝这个列的求和？？ 要怎么读取啊？？ 统计功能
解决：cxGrid1DBTableView1->optionsview->Footer 设为True
cxGrid1DBTableView1->DataController->Summary设置FooterSummaryItems即可
可以在那一列的OnCustomDrawFooterCell事件里面写： Label.Caption:=AViewInfo.Text;
获得总计项目 var
AItem: TcxDataSummaryItem; begin
AItem :=
AItem :=
procedure TForm1.cxGrid1DBTableView1DataControllerSummaryAfterSummary( ASender: TcxDataSummary);
V1 := ASender.FooterSummaryValues[ASender.FooterSummaryItems.IndexOfItemLink(cxGrid1DBTableView1CustNo)];
V2 := ASender.FooterSummaryValues[ASender.FooterSummaryItems.IndexOfItemLink(cxGrid1DBTableView1Addr1)];
××××××××××××××××
DevExpress的TcxDBLookupComboBox使用方法及问题 DevExpress的TcxDBLookupComboBox使用方法及问题 如题。
首先，使用方法不会，请各位不吝赐教。。。谢谢
其
次
，
问
题
。
TcxDBLookupComboBox
具
体
属
性
设
置
：
DataSource=S1 , DataBinding.DataField=A , Properties.ListSource=S2 , Properties.KeyFieldName=A , Properties.ListFieldIndex=0 , Properties.ListFieldName=B , Properties.ListColumns只包含B , S1和S2为一样的数据集，但不是同一个。
在这样的设置情况下，当Properties.GridMode设置为TRUE时，编译通过，运行时错误但是错误提示太简单。为什么会发生错误？？
当Properties.GridMode设置为FALSE时，编译通过，运行时无错误。且显示正确即可以显示数据集的所有记录。但是选择条目时无效，即无法选择，无论选择什么条目结果都是同一个条目（第一个）。为什么？？
一直等待。。。。。
谢谢
例子看了，明白了点。测试也通过了。不过和我的本意还是不一样。 也许组件选择错了。。。
我是想这样：表A包含A1,A2字段，A1为数据，A2为显示。用LookupComboBox显示A2，当选择不同A2时获取相应的A1。