请问一个变量的赋值问题。 ( 积分: 100 )

R

rackrain

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-13

• #1

代码如下：
procedure TForm_InputDetail.Button5Click(Sender: TObject);
var i,total_mete:integer;
begin
total_mete:=0;
total_mete:=total_mete+strtoint(edit1.Text);
end;
编译时出现如下消息：
[Hint] inputdetail.pas(719): Value assigned to 'total_mete' never used
请问这是怎么回事，如何解决，谢谢。

 

R

rackrain

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-13

• #2

代码如下：
procedure TForm_InputDetail.Button5Click(Sender: TObject);
var i,total_mete:integer;
begin
total_mete:=0;
total_mete:=total_mete+strtoint(edit1.Text);
end;
编译时出现如下消息：
[Hint] inputdetail.pas(719): Value assigned to 'total_mete' never used
请问这是怎么回事，如何解决，谢谢。

 

C

chenybin

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-13

• #3

不是错误，是提示信息，因为你定义了一个变量total_mete，而且给它赋值了，但是没有用他就离开了它的作用域，所以有这个提示，相当于就是告诉你，这个变量对程序来说根本没用，完全可以删除它，明白了吗

 

S

shine007

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-13

• #4

同意楼上的，
Value assigned to 'total_mete' never used　对应的意思是：
赋给'total_mete'的值从未用过。
对其它地方不影响。。。

 

L

luckysw

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-13

• #5

Value assigned to 'total_mete' never used
翻译过来就是说你只付值了,但是没没有使用啊...
而且,这只是一个hint,只是提示你一下,没事的,不用管它.
如果你不愿意看到它,可以在编译器选项里面设置一下,不显示提示的信息[]

 

J

JohnSun2002

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-13

• #6

这不是错误，是“无用的代码行”提示。连续的对同一变量赋值，前面一行肯定是没用的，
我们写的程序代码，编译时最好是什么Hint,Warning都没有，才算是合格的代码。

 

R

rackrain

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-13

• #7

问题是我的这个变量是计算用的，我在后面加上
edit2.text:=inttostr(total_mete);
编译时还是会出现提示。
我只是写出简单的情况，实际代码比这长。
代码如何写才能不出现提示。
编译时看到它出现总是不舒服。

 

金

金卡绣球jk8.com

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-13

• #8

total_mete:=total_mete + strtointdef(edit1.Text，0);

 

饭

饭前饭后

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-14

• #9

楼上的都不正确，看看我的见解吧：
提示的意思是说有多余的代码行，int变量默认值为0，无需初始化，把下面那行删除就行：
total_mete:=0;

 

J

jeffrey_s

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-14

• #10

// 提示的意思是说有多余的代码行，int变量默认值为0，无需初始化
很可惜，Delphi不是这样想的，当未赋值就调用时，会提示 未被初始化 。

另外，楼主这两句罗嗦了点吧，
total_mete:=0;
total_mete:=total_mete+strtoint(edit1.Text);
远不如这句好
total_mete:=strtoint(edit1.Text);

//
出现提示还有的情况是重复赋值，如：
total_mete:=0;
total_mete:=strtoint(edit1.Text);
那么就会被提示第一行未被使用。

 

G

gooodlife

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-14

• #11

不会长到 300 行吧..把函数代码贴出来吧...

这样看不到问题的所在的...纸上谈兵...........................

 

E

EllaSouth

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-15

• #12

其实你有没发现那个i也会提示这个,我弄的时候,total_mete不会有这个提示,我明白你的意思,是想要累计edit1的数值,但你这样做是不行的,因为你每次都会把total_mete给重置0
如果你是要累计total_mete的话,建议,在total_mete声明的时候:
var total_mete:integer=0;
begin total_mete:=total_mete+strtoint(edit1.text)
end;
这样子应该就可以了

 

E

EllaSouth

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-15

• #13

那个total_mete在初始化的时候要放在全局的地方

 

R

rackrain

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-27

• #14

多人接受答案了。