--- In IBObjects@y..., kristinnolan@h... wrote:

> I tried ... If Seg = 1 then dmdXXXXX.frmForm.FieldByName('ONE') :=
> One;

Try: myQry.FieldByName('ONE').AsString := One;
or AsInteger ...

Regards
Richard