Hola.
Yo he utilizado algo similar a lo que te sugirió newtron.
Código Delphi
[-]
procedure TForm1.FormCreate(Sender: TObject);
begin
FValor:= 0; UpDown1.Associate:= Edit1;
end;
procedure TForm1.UpDown1Click(Sender: TObject; Button: TUDBtnType);
begin
if Button = btNext then
FValor:= FValor + 0.1
else
FValor:= FValor - 0.1;
TCustomEdit(UpDown1.Associate).Text:= CurrToStr(FValor);
end;
Saludos.