Код
DM.IBQ_Publishing.SQL.Text := 'select max(id) from publishing';
DM.IBQ_Spreaders.SQL.Text :='insert into spreaders(fio, adress, phone) values(:fio, :adress, :phone)';
DM.IBQ_Spreaders.ParamByName('fio').AsInteger := DM.IBQ_Spreading.DataSource.DataSet.FieldByName('ID').AsInteger;
DM.IBQ_Spreaders.ParamByName('adress').AsInteger := DM.IBQ_Publishing.DataSource.DataSet.FieldByName('ID').AsInteger;
DM.IBQ_Spreaders.ParamByName('phone').AsInteger := StrToInt(Er_Phone.Text);
DM.IBQ_Spreaders.ExecSQL;
DM.IBQ_Spreaders.SQL.Text :='insert into spreaders(fio, adress, phone) values(:fio, :adress, :phone)';
DM.IBQ_Spreaders.ParamByName('fio').AsInteger := DM.IBQ_Spreading.DataSource.DataSet.FieldByName('ID').AsInteger;
DM.IBQ_Spreaders.ParamByName('adress').AsInteger := DM.IBQ_Publishing.DataSource.DataSet.FieldByName('ID').AsInteger;
DM.IBQ_Spreaders.ParamByName('phone').AsInteger := StrToInt(Er_Phone.Text);
DM.IBQ_Spreaders.ExecSQL;
не хочет присваивать значение из другой записи. почему? нет доступа? или так вообще нельзя присваивать?