如题。
解决方案 »
- 小弟跪求帮助,关于fastreport中报表的问题,在线ING
- 问一个小学数学课本上的题,请大家不吝赐教
- 如何将服务程序做成一个图标放在系统托盘里,单击图标能显示窗体?
- 为什么在installshield Express中设置安装文件夹是中文时,就会出现乱码
- 困惑:高手们给意见
- 急问:哪里有delphi 6.0 或5.0下载?
- 小问题,回答马上有分!
- 一个远程关机程序问题
- 如何将两个相同结构的access数据库中的一个库中数据完全导入另一个库中(重复数据不导入)
- 急救!!!!有关自启动的问题,如何在注册表中加入自启动的项,就象QQ鱼夫一样的隐藏功能,如何实现,谢谢了!急救???????
- 无效的类别字符串
- 求手机号码数据!!!!!!!!!!!!!!!!!!
3、自动显示标题行的升降排序标志符(▽降序△升序)并做相应排序DBGridEh组件可以在标题行单元格中显示小三角形升、降排序标志符图片,在运行时可点击标题行,图片自动切换并做相应排序。具体属性设置如下:OptionsEh=dghAutoSortMarkingColumn=TRUE Title.TitleButton=true SortMarkedColumns 为当前排序列可在运行时使用.然后在该列的ontitleclick事件中添加代码:
procedure TForm_Query.DBGridEh1TitleBtnClick(Sender: TObject;ACol: Integer; Column: TColumnEh);
var
sortstring:string; //排序列
begin//进行排序
with Column do
begin
if FieldName = '' then
Exit;case Title.SortMarker of
smNoneEh:
begin
Title.SortMarker := smDownEh;
sortstring := Column.FieldName + ' ASC';
end;
smDownEh: sortstring := Column.FieldName + ' ASC';
smUpEh: sortstring := Column.FieldName + ' DESC';
end;
//进行排序
try
adoquery1.Sort := sortstring //dataset为实际数据集变量名
except
end;
end;
end;
切记lookup型字段不可做上述设置,否则系统会提示错误。
1.dbgrideh.optionseh.dghautosorting:=true;
2. .columndefvalues.title.titlebutton:=true;
3. .sortlocal:=true;
4.如果有用到clientdataset,则单元内要加uses EhlibCDS
不懂再问我:31716762
"冷区
冷区是数据网格列集左边显示的不可滚动的区域。与固定列不同的是,冷区的列可以获得编辑焦点。可以通过设置FrozenCols属性来设置右边不可滚动的列集。 "那么怎么设置“固定列”呢?