FASTREPORT,MEMO中使用判断语句.

Question

  if   [frxDBDataset1."每箱数量"] =0   then 
    begin 
        Memo30.Memo.Add('0') 
    end  else
   begin
       memo30.memo.add([<frxDBDataset1."出货数量">-(trunc(<frxDBDataset1."出货数量"> /<frxDBDataset1."每箱数量">)*<frxDBDataset1."每箱数量">)])
   end这样写是显示的是文本,请教了............

Answer 1

fastreport的规则是<>这样的东西才能继续运算

Answer 2

if [frxDBDataset1."每箱数量"] =0 then 这个中括号換方括号< >下面的add([ ... ])去掉中括号

Answer 3

if <frxDBDataset1."每箱数量"> =0 then  
  begin  
  Memo30.Memo.Add('0')  
  end else
  begin
  memo30.memo.add(<frxDBDataset1."出货数量">-(trunc(<frxDBDataset1."出货数量"> /<frxDBDataset1."每箱数量">)*<frxDBDataset1."每箱数量">))
  end
晕死还是不行..

Answer 4

frxDBDataset1."每箱数量"这个字段经常为0,为0时就报错.头痛呀..............

Answer 5

回复于：2011-12-26 11:41:31
frxDBDataset1."每箱数量"这个字段经常为0,为0时就报错.头痛呀..............==================================这个是肯定的，你要在code里面写的代码，如果是0就改掉，我是改成1。

Answer 6

回:kevin_wzh
 所以才有了上面的问题,想在MEMO的MEMO中更改但是又不行.if <frxDBDataset1."每箱数量"> =0 then   
  begin   
  Memo30.Memo.Add('0')   
  end else
  begin
  memo30.memo.add(<frxDBDataset1."出货数量">-(trunc(<frxDBDataset1."出货数量"> /<frxDBDataset1."每箱数量">)*<frxDBDataset1."每箱数量">))
  end
不知错在那里了.

Answer 7

#8楼 得分：0回复于：2011-12-26 11:56:14
回:kevin_wzh
 所以才有了上面的问题,想在MEMO的MEMO中更改但是又不行.================================================我刚调试过，下面的代码没有问题，注意方法的调用地方。
procedure Memo54OnBeforePrint(Sender: TfrxComponent);
begin
  if <frxDBDataset1."AMOUNT">=0 then  
  begin  
  Memo54.Memo.Add('11')  
  end else
  begin
  memo54.memo.add(<frxDBDataset1."AMOUNT">-(trunc(<frxDBDataset1."AMOUNT">/<frxDBDataset1."AMOUNT"> )*<frxDBDataset1."AMOUNT">))  
  end  
end;