Hola.
Lo que se me ocurre es que pongas esto en el evento click del UpDown
Código Delphi
[-]
try
case Button of
btNext: begin
EditEtiquetas.Text := CurrToStr(StrToCurr(EditEtiquetas.Text) + 0.1);
end;
btPrev: begin
EditEtiquetas.Text := CurrToStr(StrToCurr(EditEtiquetas.Text) - 0.1);
end;
end;
except
EditEtiquetas.Text := '0';
end;
Saludos