Dbgrideh显示从表中查询出来的各个列的值,因为用到表头实现排序,使列数增加,循环一次,增加一次。
for i:=0 to 4 do
begin
DBGridEh1.Columns.Add;
DBGridEh1.Columns.Items[i].Title.TitleButton:=true;
end;
去除办法:
for i:=0 to 4 do
DBGridEh1.Columns.Delete(0);//删除列
for i:=0 to 4 do
begin
DBGridEh1.Columns.Add;
DBGridEh1.Columns.Items[i].Title.TitleButton:=true;
end;