delhi里的程序,tt怎么是false?

Question

delhi里的程序,tt怎么是false?不知道问题出在那里,请高手指教.谢谢.. var tt :boolean;
qj_wucha1,bijiaogs1,bijiaogs2 :string;
bijiaogs1:='2.00 3.20 3.20';
bijiaogs1:='1.90 3,25 3.40';
qj_wucha1:='0.10';
tt1:=(StrToFloat(LeftStr(bijiaogs1,4))-StrToFloat(LeftStr(bijiaogs2,4)))=StrToFloat(qj_wucha1);
.....
tt怎么是false?..???
怎么写,tt才能是ture?错就错 即要2.00-1.90=0.10 给tt...

Answer 1

delhi里的程序,tt怎么是false?不知道问题出在那里,请高手指教.谢谢.. var 
tt :boolean; 
qj_wucha1,bijiaogs1,bijiaogs2 :string; 
bijiaogs1:='2.00 3.20 3.20'; 
bijiaogs1:='1.90 3,25 3.40'; 
qj_wucha1:='0.10'; 
tt:=(StrToFloat(LeftStr(bijiaogs1,4))-StrToFloat(LeftStr(bijiaogs2,4)))=StrToFloatqj_wucha1); 
..... 
tt怎么是false?..??? 
怎么写,tt才能是ture?错就错 即要2.00-1.90=0.10 给tt... 

Answer 2

是..bijiaogs2:='1.90 3,25 3.40';...

Answer 3

另
if (StrToFloat(LeftStr(bijiaogs1,4))-StrToFloat(LeftStr(bijiaogs2,4)))=StrToFloat(qj_wucha1) then
 tt:=true
else
 tt:=false

Answer 4

if (StrToFloat(LeftStr(bijiaogs1,4))-StrToFloat(LeftStr(bijiaogs2,4)))=StrToFloat(qj_wucha1) then
 tt:=true
else
 tt:=false也是不行,,,也是不执行 tt:=true...
........

Answer 5

if (StrToFloat(LeftStr(bijiaogs1,4))-StrToFloat(LeftStr(bijiaogs2,4)))-StrToFloat(qj_wucha1)=0 then  
  tt:=true 
  else  
  tt:=false

Answer 6

var 
tt :boolean; 
qj_wucha1,bijiaogs1,bijiaogs2 :string; 
aa1,aa2 :double;
bijiaogs1:='2.00 3.20 3.20'; 
bijiaogs1:='1.90 3,25 3.40'; 
qj_wucha1:='0.10'; 
aa1:=StrToFloat(LeftStr(bijiaogs1,4))-StrToFloat(LeftStr(bijiaogs2,4));
aa2:=StrToFloat(qj_wucha1);
...调试时结果也是aa1=0;aa2=0...好象StrToFloat没法转换一样,..郁闷..StrToFloat用法有问题?

Answer 7

上面已经回答很多次了
bijiaogs1:='1.90 3,25 3.40';
应该是
bijiaogs2:='1.90 3,25 3.40';
然后你比较aa1和aa2没有问题