También podrías evitar el condicional:
Código Delphi
[-]
DmAbon.IBDtsAbonBULTOS.AsInteger := (2*Integer(EsAbono) - 1)*ABS(DmAbon.IBDtsAbonBULTOS.Value);
DmAbon.IBDtsAbonUNIDADES.AsInteger := (2*Integer(EsAbono) - 1)*ABS(DmAbon.IBDtsAbonUNIDADES.Value);
// Saludos