5,929
社区成员




if key =#32 then
DBGrid1.Columns[3].Visible:=False;
我想按下空格后隐藏一个列,
但是这样写,如果把表格顺序拖动了,隐藏的就不是我要的那个效果了,怎么能换成是固定字段的列,例如,按下空格就隐藏“联系电话”这列
隐藏列我是用
DBGridEh1.Columns[DBGridEh1.Col - 1].Visible := False;
这里需要点到该列不能点列名,点列名无效果
用个PopupMenu 加给删除列就好了
if key =#32 then
for i := 0 to DBGrid1.Columns.Count - 1 do
if DBGrid1.Columns[i].Field.Name = '联系电话' then
begin
DBGrid1.Columns[i].Visible := false;
break;
end;