关于fastReport的小问题，解决就结帐。

Question

在Memo1（TfrMemoView）中写代码：
begin
  if [ADODataSet."IsUse"] then
  begin
     v:= [ADODataSet."D_Re"];
     Memo1.Font.Style := [];//error
  end
  else 
  begin
    v:= '用户已取消申请';
    Memo1.Font.Style := [frBold];
  end;
end
Q：在出错地方如何写?

Answer 1

針對欄位的值改變列印的字型樣式，我們可以使用下列的用法：
if [PartQty] > 10 then 
memo1.font.style := fsbold 
else 
memo1.font.style := 0; 
FastReport已經預先定義的常數名稱如下：
fsBold = 2
fsItalic = 1
fsUnderline = 4
fsStrikeOut = 8
http://www.d208.com/mx.asp?id=71