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