integer类型问题

Question

举例：
在一个窗体上有两个EDIT和一个BUTTON，BUTTON下写入如下代码：
procedure TForm1.Button1Click(Sender: TObject);
var istr:longint;
begin
Edt2.Text:='';
if Edt1.Text='' then
exit;
istr:=strtoint(trim(Edt1.Text));
Edt2.Text:=inttostr(istr+1);
end;
当在Edt1里输入11个1点击BUTTON，一定报错，原因是11位太长了，怎么办？
istr已经是longint型了，还有更长的么？？？没了吧

Answer 1

你限制一下Edt1的长度，让Edt1.MacLength=11;

Answer 2

TO 耗子：int64在delphi里直接var int64不行，请教怎么定义TO 小强：输入11个已经报错了，再说我不是想现在，因为要输入的是手机号，11位。

Answer 3

TO 耗子：补充--我用的是delphi3，定义不了int64的类型

Answer 4

恕兄弟愚蠢，double型。
结帖了