SpinEdit

[Caminante]

A mi me funciona bien

Código Delphi [-]
procedure TForm1.SpinEdit1Change(Sender: TObject);
var
  N:integer;
begin
  n:=spinedit1.Value;
  label1.caption:=inttostr(n)
end;