转学delphi问题之二:如何实现tdbgrid组件的单击column的标题后排序？

[tiantianpb]

谢谢！，刚学delphi第一天，什么都不会！多多帮助大姐我，谢谢！

[hanzq]

procedure TForm1.DBGrid6TitleClick(Column: TColumn);
begin
Query.sql.add('select * from table where order by '''+ Column +''')
end;

end.

[DavidBone]

ding