Inconveniente con una columna de mi grid

[el_barto]

Gracias por responder
estuve mirando en los eventos de mi DataSet y me encontre con uno que dice:
BeforeInsert y pues intente asignarle a mi columna el valor de un consecutivo pero..... me saca error.

procedure TForm1.IBDataSet1BeforeInsert(DataSet: TDataSet);
var
x : integer
begin
x=x+1
BDGrid.Columns[0] := x;
end;

Pero me genera el siguiente error:
[Error] Unit1.pas(41): Incompatible types: 'TColumn' and 'Integer'
Evidentemente mi error radica en que no se como asignarle un valor a mi columna en especifico, saben ustedes como obligarlo a tomar este valor

Gracias por su ayuda