[srr]

Помогите пожалуйста!
Есть DBGrid из 14 колонок, есть соответствующее меню и форма из CheckBox - ов, всё работает, если не перемещать колонки, если переместишь то понятно индексы то остаются, что делать, покажите плз примерный код, буду очень благодарен

Одна из процедур формы, поправьте плз

Код:

procedure TViborForm.CheckBox2Click(Sender: TObject);
begin
if CheckBox2.Checked  then
MainForm.DBGrid1.Columns[1].Visible:=true
else
MainForm.DBGrid1.Columns[1].Visible:=false;
end;

Admin: Используем теги для форматирования кода!