[stas8359]

Приветсвую. Записывается статистика по прохождению тестирования с помощью SQL запроса в БД на Access.

Код:

ADOQuery1.SQL.Clear;
 ADOQuery1.SQL.Text := 'INSERT INTO Statistic (ФИО, Группа, Тема_тестирования, Оставшееся_время, Результативность) VALUES (' + QuotedStr(UserFIO) + ',' + QuotedStr(UserNom) + ',' + QuotedStr(Predmet) + ',' + QuotedStr(IntToStr(Min)+':'+IntToStr(Sec)) + ',' + QuotedStr(FloatToStr(Delen)+'%') + ')';
 ADOQuery1.ExecSQL;

А в другой форме эта статистика выводится

Код:

ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('SELECT * FROM Statistic');
ADOQuery1.Active:=True;

Проблема в том, что для того чтобы вывелась последняя статистика необходимо перезапускать программу. Как же сделать что бы можно было увидеть новые данные не перезапуская программу?

[Kailon]

Код:

ADOQuery1.Close;
ADOQuery1.Open;

[stas8359]

Добавил на первой форме обращение к ADOQuery1 второй формы и все заработало

Код:

 Form15.ADOQuery1.Active:=False;
 Form15.ADOQuery1.Active:=True;