DBGridEh实现单击标题栏排序方法 选择自 snowfall 的 Blog
 
1.添加引用:DBClient
2.置DBGridEh控件属性:
  设置dghAutoSortMarking属性为true
  设置希望排序的Column的TitleButton属性为true
3.//表格排序过程
procedure OrderGrid(dataSet:TClientDataset;orderField:string);
var
  i:integer;
begin
  if dataSet.IndexFieldNames<>'' then
  begin
    i:=TClientDataSet(DataSet).IndexDefs.IndexOf('i'+orderField);
    if i=-1 then
    begin
      with Dataset.IndexDefs.AddIndexDef do
      begin
        Name:='i'+orderField;
        Fields:=orderField;
        DescFields:=orderField;
      end;
    end;
    dataSet.IndexFieldNames:='';
    dataSet.IndexName:='i'+orderField;
  end
  else
  begin
    dataSet.IndexName:='';
    dataSet.IndexFieldNames:=orderfield;
  end;
end;
4.在DBGridEh的OnTitleClick事件中调用
OrderGrid(DM.ClientDataset,Column.FieldName);
阅读更多
想对作者说点什么? 我来说一句

单击DBGridEh标题栏排序

2011年04月25日 35KB 下载

没有更多推荐了,返回首页

不良信息举报

DBGridEh实现单击标题栏排序方法 选择自 snowfall 的 Blog

最多只允许输入30个字

加入CSDN,享受更精准的内容推荐,与500万程序员共同成长!
关闭
关闭