单击dbgrid列标题排序 升降序

delphi中如何通过单击列标题进行升降排序， 在dbgrid的ontitleclick事件里添加这样的事件处理 1 procedure TForm3.DBGrid1TitleClick(Column: TColumn); 2 begin 3 if frmDataPool.qry需要做的事.SQL.Text.Contains('DESC') then 4 begin 5

>>阅读原文<<