我想在点击dbgrid的标题,就按这个标题来排序!
procedure TForm1.DBGrid1TitleClick(Column: TColumn);
var Qry:TQuery; FieldName:String;
begin
adoquery1.close;
adoquery1.sql.clear;
adoquery1.sql.add('select * from cuntry order by '+column.fieldname);
adoquery1.open;
end;
运行出错啊!
procedure TForm1.DBGrid1TitleClick(Column: TColumn);
var Qry:TQuery; FieldName:String;
begin
adoquery1.close;
adoquery1.sql.clear;
adoquery1.sql.add('select * from cuntry order by '+column.fieldname);
adoquery1.open;
end;
运行出错啊!
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货