DBGrid，如何排序后在Title上加上箭头？

Question

单击Title后，按所在列排序，同时在该列加上上或下的箭头，如何实现？

Answer 1

dbgrid.Columns.Items[I].Title.caption := dbgrid.Columns.Items[I].Title.caption + '▲▼'

Answer 2

Column.Title.Caption := Column.Title.Caption+' ▲';

Answer 3

加图片代码
procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
  DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
     DBgrid1.Canvas.FillRect(Rect);
     DBGrid1.Canvas.Draw(Rect.left,Rect.top,image1.picture.graphic);
end;

Answer 4

简单、方便、美观的不要用dbgrid了，找个第3

Answer 5

干脆改用DevExpress 的cxGrid吧，又好用又漂亮

Answer 6

回复人： belllab(bell) ( ) 信誉：100  2003-07-18 10:28:00  
干脆改用DevExpress 的cxGrid吧，又好用又漂亮如果能很方便实现，我不想使用第三方控件，主要是不敢保证Delphi升级后，其也会跟着升级。

Answer 7

谢谢xiaoxiao197821(你的笑对我很重要)、belllab(bell)，还有好办法吗？

Answer 8

用devexpress的grid控件，可以实现排序（箭头），查找等功能

Answer 9

怎么控制　 DBGrid  有的列可以更改，有的点不能更改呢？？？？？？？

Answer 10

怎么控制　 DBGrid  有的列可以更改，有的列不能更改呢？？？？？？？

Answer 11

回复人： ghpy(zhenhailu) ( ) 信誉：100  2003-07-23 12:14:00
怎么控制　 DBGrid  有的列可以更改，有的列不能更改呢？？？？？？？把想不能改的列的ReadOnly设为True。

Answer 12

为什么我找不到cxgrid???devexpress在哪儿？？
我是小学生，不好意思，谢谢了！
顺便up一下！

Answer 13

www.51delphi.comqgrid,ehlib均可，不用，看看他怎么画的也可以