急需解答,簡單問題,有經驗的進來看看。
procedure Tjtrp.QRLabel12Print(sender: TObject; var Value: String);
begin
  v1 :=qrexpr3.Caption ;
  v2 :=qrexpr4.Caption ;
  v3 :=qrexpr5.Caption ;
  value :=formatfloat('0.00',strtofloat(v1)/(strtofloat(v2)+strtofloat(v3))) ;
end;
我是用rbSummary裡面用qrexpr3,qrexpr4,qrexpr5求合計,然後再用
qrexpr3,qrexpr4,qrexpr5求合計的結果再計算,可是我取不到
qrexpr3,qrexpr4,qrexpr5求合計的結果的值啊。我開始用的方法是:
procedure Tjtrp.QRExpr3Print(sender: TObject; var Value: String);
begin
  v1 :=value ; 
end;
procedure Tjtrp.QRExpr4Print(sender: TObject; var Value: String);
begin
  v2 :=value ; 
end;
procedure Tjtrp.QRExpr5Print(sender: TObject; var Value: String);
begin
  v3 :=value ; 
end;
但是這樣的話好象有時候v1,v2,v3的值會提示為空,所以我用上面的方法,
可用上面的方法
  v1 :=qrexpr3.Caption ;
  v2 :=qrexpr4.Caption ;
  v3 :=qrexpr5.Caption ;
取的值並不是qrexpr3,qrexpr4,qrexpr5求合計的結果的值啊。我錯在哪裡?