首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > .NET > .NET >

第一天学delphi就编译出错解决方法

2012-06-03 
第一天学delphi就编译出错一个edit,一个label,一个button程序功能:计算机用户输入数字的个位数button代码:

第一天学delphi就编译出错
一个edit,一个label,一个button
程序功能:计算机用户输入数字的个位数
button代码:

Delphi(Pascal) code
var i:integer;begin i:=edit1.text; label1.text:=i mod 10;end;


编译出错,怎么回事?

[解决办法]
i是整数型变量,text是字符串变量,所以不能直接赋值
应该这样:
Delphi(Pascal) code
vari:integer;begin  i:=StrToInt(edit1.text);  label1.Caption:=IntToStr(i mod 10);end;
[解决办法]
数据类型不一样i为integer ,edit1.text、label1.caption为string,必须用inttostr、strtoint之类函数转换。
还有,是label1.caption 不是label1.text!
[解决办法]
VB里面可以直接赋值,delphi里面不行,需要转换

i:=StrToInt(edit1.text);
label1.Caption:=IntToStr(i mod 10);
[解决办法]
探讨

i是整数型变量,text是字符串变量,所以不能直接赋值
应该这样:
Delphi(Pascal) code

var
i:integer;
begin
i:=StrToInt(edit1.text);
label1.Caption:=IntToStr(i mod 10);
end;

热点排行