Тема: ADOQuery
Показать сообщение отдельно
  #4  
Старый 20.03.2011, 21:08
Аватар для FlyAway
FlyAway FlyAway вне форума
Прохожий
 
Регистрация: 18.02.2011
Адрес: Украина , г. Одесса
Сообщения: 19
Версия Delphi: 7
Репутация: 12
По умолчанию

Спасибо , люди добрые )

Ещё столкнулся с такой вот проблемой - добавляет нормально , но не могу сделать refresh.
Вот сам код :
Код:
with DataModule2.qry1
   do
   begin
   Close;
   Parameters.ParamByName('fio').value:=(Form6.edt1.text+' '+Form6.edt2.text+' '+Form6.edt3.text);
   Parameters.ParamByName('staj').value:=StrToInt(Form6.medt1.text);
   Parameters.ParamByName('post').value:=Form6.edt5.text;
   Parameters.ParamByName('zp').value:=StrToInt(Form6.medt2.text);
   SQL.Clear;
   SQL.add ('INSERT INTO sotrud ( ФИО, Стаж, Должность, Зарплата ) VALUES (:fio, :staj, :post, :zp );');
   ExecSQL;
   end;
DataModule2.dbgrd2.refresh; //эта процедура не работает
ShowMessage('Сотрудник добавлен!');
Form6.Close;

Также при первом нажатии кнопки добавить с введёнными мною данными в эдиты всё проходит хорошо , а при повторном в таблицу (.mdb) добавляется строка со счётчиком , но без данных.
__________________
Ответить с цитированием