Обновление данных в DBGrid

@RibSlicer · Регистрация: 16.03.2013

Студворк — интернет-сервис помощи студентам

В общем результаты теста добавляются в бд Access. В саму базу данных добавляются как надо, а вот в программе DBGrid показывает их только после перезапуска программы. Использую ADOConnection-ADOTable-DataSource-DBGrid.
Если в кнопку прописать

Код

adotable1.active:=false;
adotable1.active:=true;

То кнопка обновляет, а если в событие формы OnActivate или FormCreate то не обновляется само.
Как можно сделать что бы без кнопки автоматически обновлялось еще?

@Gantzer61 · 18.05.2013, 14:19

Вы как добавляете данные в базу. Через команду Post или через SQL? Если через Post то ADOTable должен показывать добавленные данные. Покажите код добавления данных.

@RibSlicer · 18.05.2013, 14:22 **[ТС]**

Код

ADOTable1.Active:=false;
ADOTable1.TableName:='result';
ADOTable1.Active:=true;
  ADOTable1.Insert;
ADOTable1.FieldByName('ФИО').AsString:=NameStudent;
ADOTable1.FieldByName('Группа').AsString:=Group;
ADOTable1.FieldByName('Результат').AsString:=V;
ADOTable1.Post;

@Gantzer61 · 18.05.2013, 14:41

По коду должны отображаться изменения в базе. Возможно у вас DBGrid привязан к другому ADOTable который отображает эти данные. Так это?

Добавлено через 1 минуту
Попробуйте вот так:

Delphi

With ADOTAble1 do
  begin
    Close;
    TableName:='result';    
    Open;
    Insert;
    FieldByName('ФИО').AsString:=NameStudent;
    FieldByName('Группа').AsString:=Group;
    FieldByName('Результат').AsString:=V;
    post;
  end;

@RibSlicer · 19.05.2013, 09:26 **[ТС]**

Все равно так же только после перезапуска программы или кнопки обновить появляются.

Добавлено через 18 часов 38 минут
Если в FormShow прописать

Код

adotable1.active:=false;
adotable1.active:=true;

то он тогда обновляется как надо, только ячейки растянуты.
А если добавляю

Код

Ini:=TiniFile.Create(extractfilepath(paramstr(0))+'MyIni.ini');
DBGrid1.Columns[0].width:=ini.ReadInteger('Size', 'width0',200 );
DBGrid1.Columns[1].width:=ini.ReadInteger('Size', 'width1',70 );
DBGrid1.Columns[2].width:=ini.ReadInteger('Size', 'width1',35 );
DBGrid1.Columns[3].width:=ini.ReadInteger('Size', 'width1',331 );

или любой другой код на изменение размера столбца, то она сразу перестает обновляться почему то.

@RibSlicer 0 / 0 / 0 Регистрация: 16.03.2013 Сообщений: 18
		1
	Обновление данных в DBGrid 18.05.2013, 12:26. Показов 4028. Ответов 4 Метки нет (Все метки) В общем результаты теста добавляются в бд Access. В саму базу данных добавляются как надо, а вот в программе DBGrid показывает их только после перезапуска программы. Использую ADOConnection-ADOTable-DataSource-DBGrid. Если в кнопку прописать Код adotable1.active:=false; adotable1.active:=true; То кнопка обновляет, а если в событие формы OnActivate или FormCreate то не обновляется само. Как можно сделать что бы без кнопки автоматически обновлялось еще? 0

@Gantzer61 6 / 6 / 4 Регистрация: 11.12.2011 Сообщений: 142
	18.05.2013, 14:19	2
	Вы как добавляете данные в базу. Через команду Post или через SQL? Если через Post то ADOTable должен показывать добавленные данные. Покажите код добавления данных. 0

@RibSlicer 0 / 0 / 0 Регистрация: 16.03.2013 Сообщений: 18
	19.05.2013, 09:26 [ТС]	5
	Все равно так же только после перезапуска программы или кнопки обновить появляются. Добавлено через 18 часов 38 минут Если в FormShow прописать Код adotable1.active:=false; adotable1.active:=true; то он тогда обновляется как надо, только ячейки растянуты. А если добавляю Код Ini:=TiniFile.Create(extractfilepath(paramstr(0))+'MyIni.ini'); DBGrid1.Columns[0].width:=ini.ReadInteger('Size', 'width0',200 ); DBGrid1.Columns[1].width:=ini.ReadInteger('Size', 'width1',70 ); DBGrid1.Columns[2].width:=ini.ReadInteger('Size', 'width1',35 ); DBGrid1.Columns[3].width:=ini.ReadInteger('Size', 'width1',331 ); или любой другой код на изменение размера столбца, то она сразу перестает обновляться почему то. 0

Опции темы