-
-
[求助]delphi的编程问题！急！
-
发表于: 2005-11-14 06:42
-
首先定义s为string,sum是integer
s:=Edit1.Text;
sum:=1000+ strtoint(copy(s,1,4)) + strtoint(copy(s,6,9)) + strtoint(copy(s,11,14)) + strtoint(copy(s,16,19)) + strtoint(copy(s,21,24)) + strtoint(copy(s,26,29));
Edit2.Text:=inttostr(sum);
运行程序之后，在Edit1输入6343-2464-9706-9486-6953-6715
却提示：‘2464-9706’不是有效的整型
大虾们这个问题怎么解决啊，我经常遇到这样的
问题，程序一运行都要检测Edit1框里面的是不是
整型！大虾们救救我啊
s:=Edit1.Text;
sum:=1000+ strtoint(copy(s,1,4)) + strtoint(copy(s,6,9)) + strtoint(copy(s,11,14)) + strtoint(copy(s,16,19)) + strtoint(copy(s,21,24)) + strtoint(copy(s,26,29));
Edit2.Text:=inttostr(sum);
运行程序之后，在Edit1输入6343-2464-9706-9486-6953-6715
却提示：‘2464-9706’不是有效的整型
大虾们这个问题怎么解决啊，我经常遇到这样的
问题，程序一运行都要检测Edit1框里面的是不是
整型！大虾们救救我啊
[招生]科锐逆向工程师培训(2024年11月15日实地，远程教学同时开班, 第51期)
|
|
|---|---|
|
|
|
|
|
|
|
|
|
