在DBGrid的OnTitleClick事件中这样写：select * from users order by column.fieldname 好象不行

Question

query1.close;
query1.sql.clear;
query1.sql.add('select * from users order by :n');
query1.parambyname('n').asstring:=you_value;
try
query1.open;
except
query1.execsql;
这段程序对你可能没有用。
你是要实现 点击排序。
那，我认为，只能重新来一遍了。呵呵

Answer 1

做一个循环检测，当点击某个title时，令其color变成某种颜色，然后在循环中判断标题颜色即可。
tmpstr := 'order by '
for I := 0 to dbgrid1.columns.count -1 do
begin
  
  if dbgrid1.columns[I].color = clred then
  begin
    tmpstr := tmpstr + 'dbgrid1.columns[i].title'
  end;
end;