MySQL Data Access 里的 TMyQuery 怎么没有 Sort 属性啊 我要改写一段代码。要用到 TMyQuery
if ADOQuery1.Sort<>(Column.FieldName+' ASC') then //判断原排序方式
begin
ADOQuery1.Sort := Column.FieldName+' ASC';
Column.Title.Font.Color := clRed; //改变标题行字体为红色,表示当前的排序方式为升序
Column.Title.Font.Style := [fsBold];
end
else begin
ADOQuery1.Sort := Column.FieldName+' DESC';
Column.Title.Font.Color := clBlue; //改变标题行字体为红色,表示当前的排序方式为降序
Column.Title.Font.Style := [fsBold];
end;
现在用 tmyquery 替换 tadoquery。却发现 tmyquery 没有 Sort 属性啊
if ADOQuery1.Sort<>(Column.FieldName+' ASC') then //判断原排序方式
begin
ADOQuery1.Sort := Column.FieldName+' ASC';
Column.Title.Font.Color := clRed; //改变标题行字体为红色,表示当前的排序方式为升序
Column.Title.Font.Style := [fsBold];
end
else begin
ADOQuery1.Sort := Column.FieldName+' DESC';
Column.Title.Font.Color := clBlue; //改变标题行字体为红色,表示当前的排序方式为降序
Column.Title.Font.Style := [fsBold];
end;
现在用 tmyquery 替换 tadoquery。却发现 tmyquery 没有 Sort 属性啊
解决方案 »
- DELPHI的Abstract Error
- DELPHI的消息机制怎么理解?
- Delphi如何 用Image显示图片大小是固定的。。而且能看到全图
- 请教不用DSN连接sql server 的方法
- 求助:第一次做审计系统的东西,请大家给提意见
- 那位大侠能帮我看一下这是怎么回事?
- 关于sui pack控件的一个问题
- 100分等你拿!救命!我用report builder7 用了8个subreport,有9页,当我
- delphi 制作PDF水印
- 请教一下小弟怎么用这个东西? 一定给分。
- 如何给Image加上边框,并且可以设置边框的颜色???
- 请教各位老大,如何实现点击WebBrowser控件中链接,打开一IE浏览器,显示连接后的内容。急
例如BDE的TQuery也是一样没有的.可以自己动态构造SQL来排序