[pesi]

Burka, спасибо за ответ все сделал. DBGridEh у меня лежал на главной форме и после добавления кода, делфи выдавал ошибку. Решил проверить код на другой форме. Добавил форму, бросил DBGridEh и все заработало. Тогда переделал код для главной формы на такой//

Код:

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
var
  Ini: Tinifile;
begin
 Ini:=TiniFile.Create(extractfilepath(paramstr(0))+'MyIni.ini');
 Ini.WriteInteger('options' , 'Width', DBGridEh1.Columns[1].width);
Ini.Free;
end;

procedure TForm1.FormActivate(Sender: TObject);
var
  Ini: Tinifile;
begin
Ini:=TiniFile.Create(extractfilepath(paramstr(0))+'MyIni.ini');
DBGridEh1.Columns[1].width:=ini.ReadInteger(' options ', 'width',60 );
Ini.Free;
end;

и о чудо, все заработало.
Admin, учту ваше замечание!!!