请问:怎样制作具有排序功能的DBgrid.即点击某一字段可以进行升序与降序.
解决方案 »
- Byte数组问题
- 谁在delphi中用过连接池?
- delphi类的派生求助
- ==想兼职的兄弟看过来==
- TCollection
- 怎么动态的设置数组的大小?
- Delphi做的多页面浏览器源码,谁要?
- 怎样禁止用户修改系统时间(100分相送)
- 高分求解,请用DELPHI控制WORD及EXCEL的高手指点,因不知问题有没有可行的解决方案,故暂时只给50分,如果确实解决了,再加200分
- 谁有DELPHI的TAPI.PAS头文件!!!!!(急…急…………)
- 我想在在工程运行之前注册一个控件。
- 小弟我找了近一个月,但还是没有找到画圆的反走样算法呀.我只找到vc++的代码,没有找到delphi的代码,请高手帮助呀,或有没有控件可以支持画
procedure TForm1.DBGrid1TitleClick(Column: TColumn);
begin
Str:=Column.Title.Caption;
if Adoquery1.Sort=Column.FieldName +' ASC ' then
Adoquery1.Sort:=Column.FieldName +' DESC ' //a
else
Adoquery1.Sort:= Column.FieldName +' ASC '; //b
end;