[kr3v3tkus]

как правильно получить значение другой записи?
DM.IBQ_Spreading.ParamByName('spreader').AsInteger := DM.IBQ_Spreaders.DataSource.DataSet.FieldByName('I D').AsInteger;
не прокатывает...

[Yurk@]

Сообщение от kr3v3tkus

как правильно получить значение другой записи?
DM.IBQ_Spreading.ParamByName('spreader').AsInteger := DM.IBQ_Spreaders.DataSource.DataSet.FieldByName('I D').AsInteger;
не прокатывает...

А так не пробывал?

Код:

1	DM.IBQ_Spreading.DataSource.DataSet.FieldByName('spreader').AsInteger := DM.IBQ_Spreaders.DataSource.DataSet.FieldByName('ID').AsInteger;

[kr3v3tkus]

оу сори я забыл сказать, у меня нужно делать param by name тк вся она выглядит так:

Код:

1 2 3 4 5

DM.IBQ_Spreading.SQL.Text :='insert into spreading(spreader, publ, amount) values(:spreader, :publ, :amount)'; DM.IBQ_Spreading.ParamByName('spreader').AsInteger := DM.IBQ_Spreaders.FieldByName('ID').AsInteger; DM.IBQ_Spreading.ParamByName('publ').AsInteger := DM.IBQ_Publishing.FieldByName('ID').AsInteger; DM.IBQ_Spreading.ParamByName('amount').AsInteger := StrToInt(Er_Phone.Text); DM.IBQ_Spreading.ExecSQL;

[Aristarh Dark]

У TParametr нет методов AsInteger, AsString и т.п. Следует делать так:

Код:

1	DM.IBQ_Spreading.ParamByName('spreader').Value := DM.IBQ_Spreaders.FieldByName('ID').AsInteger;