我想给StringGrid做列字段名按钮的BUTTONClick过程，该怎样才可以实现呢？在线等

主要是用来实现按该字段进行排序的功能！

解决方案 »

  1.   

    不是很明白你的意思，
    是按某一字段名排序？那用SQL语句实现不就行了
    先帮你顶一下吧！
      

  2.   

    谢谢
    我这里问的不是如何排序的问题，是如何在stringgrid上加上colclick（列名按钮）单击事件！
      

  3.   

    关于DBGRID一些功能可以用第三方控件来解决的，呵呵
    不用麻烦自己动手！
    一样帮你UP！
      

  4.   

    你用topgrid吧，对于这个问题很好解决
      

  5.   

    刚才没发出去，StringGrid之FixedRows不响应OnClick事件，你可设其FixedRows为0，再处理其OnClick事件；似乎又达不到楼主想要的结果，建议用第二方控件TopGrid来实现
      

  6.   

    建意你用listView控件，这个实现你要求的功能很方便。
      

  7.   

    不知道这样能不能满足你的要求
    AdvStringGrid有个ONClickCell事件，可以实现某个坐标的单击事件在advSTRINGGRID的ONClickCell事件里面写代码：
    procedure TForm1.AdvstringGridclickCell(
      Sender: TObject; ARow, ACol: Integer);
    var
      colName: string;
      iCol: integer;
    begin
      iCol := sgCertificateSearch.GetRealCol; //取得鼠标单击的列数
      colName:= sgCertificateSearch.Cols[Icol].Strings[0];//取得列名
      showmessage(colName);
      //添加你要实现的操作
    end;
      

  8.   

    上面的sgCertificateSearch就是ADVSTRINGGRID的名字
    忘改了，不好意思！
      

  9.   

    这是一个按数字排序的过程，如果是字符串，你可以修改一下，具体查看帮助。
        procedure TForm1.ListView1Compare(Sender: TObject; Item1, Item2: TListItem; 
         Data: Integer; var Compare: Integer); 
        var m, n :integer; 
        begin 
         m := StrToInt(Item1.Caption); 
         n := StrToInt(Item2.Caption); 
         Compare := m - n; 
        end; 
      

  10.   

    第三方控件  我不是没想过啊 网上下载的都只支持delphi6 可我用的是七谁给个能用的连接  分数照给呀！！
      

  11.   

    lzy6204(学无止境)  我试试你的方法先
      

  12.   

    我晕  哪里有什么ONClickCell事件啊  你用的是stringgrid组件么？
      

  13.   

    是三方控件
    TADVSTRINGGRID
    在TMS组件里面的