[artemavd]

Помогите сделать так, чтобы можно было удалять столбцы ненужные в DBGrid-e. При запуске программы в гриде отображается 15 столбцов, но возможно понадобится удалить лишние. Я начал делать так:

Код:

var
 i,j:integer;
begin
 i:=14; //15 столбцов
 j:=1; //при каждом нажатии надо, чтобы удалялся один столбец
   DBGrid1.Columns[i-j].Destroy;
end;

но когда я нажимаю на кнопку один раз, то в таблице остается нумерация столбцов такая: 1,2,3,4,5,6,7,8,9,10,11,12,13,15, а должно быть 1,2,3,4,5,6,7,8,9,10,11,12,13,14. Нажимаю еще раз остается такая последовательность: 1,2,3,4,5,6,7,8,9,10,11,12,13. Нажимаю третий раз появляется ошибка: "List index out of bounds (13)" и все. Как сделать, чтобы заработало правильно? Помогите пожалуйста)