[Aristarh Dark]

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

Код:

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