Código Delphi [-]procedure TForm1.Button1Click(Sender: TObject); var n:integer; begin n:=DbEdit2.Field.AsInteger; ShowMessage(IntToStr(n)); end;
procedure TForm1.Button1Click(Sender: TObject); var n:integer; begin n:=DbEdit2.Field.AsInteger; ShowMessage(IntToStr(n)); end;