TQuery и TUpdateSQL

@Kamero · Регистрация: 08.02.2013

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

Необходимо реализовать на связке этих компонентов редактирование информации прямо в гриде. Все что нашел в интернете я сделал и подключил. Нооо работает оно очень странно, сами запросы(insert, delete) генерируется с параметрами, а обращаться к ним ни одним известным мне способом не получается.
sql2 - это TADUpdateSQL1
Получаеться только через Датасет, напрямую в query.
Добавление

Delphi

  With sql2.DataSet do begin
    Append;
    FieldByName('fio').AsString := edit10.text;
    FieldByName('Age').Value:=edit9.Text;
    Post;
  end;

Удаление

Delphi

1	sql2.DataSet.Delete;

Сохранение

Delphi

with sql2.DataSet do
begin
  if State in [dsEdit,dsInsert] then
  Post;
  ApplyUpdates;
  CommitUpdates;
end;
sql2.DataSet.Refresh;

Отмена

Delphi

with sql2.DataSet do
begin
  if State in [dsEdit,dsInsert] then
   Cancel;
   CancelUpdates;
end;

А все должно работать как часы. Метод этот очень древний еще со времен BDE. Может кто знает как с ним работать?

@krapotkin · 16.05.2016, 14:07

и вообще я никак не могу понять ваши синтаксические попытки
в параметры автоматически уходят новые значения полей
имена параметров должны совпадать с именами полей
тогда вся эта система работает
параметры у Query
updateSql предназначен только для хранения выражений на INSERT UPDATE REFRESH DELETE

Добавлено через 1 минуту
дбгрид тут никаким местом ни при чем
q.Insert;
q.FieldByName('aaa').AsString := 'Вася';
q.Post;

куда и зачем здесь нужно подставить параметры?

@Kamero · 16.05.2016, 14:08 **[ТС]**

Некоторые поля должны брать значение с других едитов. Тут не полное добавление через грид.

@krapotkin · 16.05.2016, 14:24

ну так поля и заполняйте

например в q.OnNewRecord:

Delphi

1 2	q.fieldByName('bbb').AsString := Edit1.text; q.fieldByName('ccc').AsInteger := 2;

@krapotkin 5785 / 4527 / 1431 Регистрация: 14.04.2014 Сообщений: 20,157 Записей в блоге: 20
	16.05.2016, 14:07	21
	и вообще я никак не могу понять ваши синтаксические попытки в параметры автоматически уходят новые значения полей имена параметров должны совпадать с именами полей тогда вся эта система работает параметры у Query updateSql предназначен только для хранения выражений на INSERT UPDATE REFRESH DELETE Добавлено через 1 минуту дбгрид тут никаким местом ни при чем q.Insert; q.FieldByName('aaa').AsString := 'Вася'; q.Post; куда и зачем здесь нужно подставить параметры? 0

@Kamero 12 / 10 / 7 Регистрация: 08.02.2013 Сообщений: 254
	16.05.2016, 14:08 [ТС]	22
	Некоторые поля должны брать значение с других едитов. Тут не полное добавление через грид. 0

	16.05.2016, 14:24