FastReport 2.5中如何把"數量"顯示成"打數"?(138分)

如: "13"
顯示為 "1 1/12".
最好在Fastreport中處理. 放在后台(或自定義定義函數)比較容易,但很麻煩. 想要一個簡單的方法.

是不是這個意思哦?
procedure Memo1OnAfterData(Sender: TfrxComponent);
var
DivNum:integer;
ModNum:integer;
begin
DivNum:=TFrxMemoView(Sender).Value div 12;
ModNum:=TFrxMemoView(Sender).Value mod 12;
if ModNum<>0 then
if DivNum<>0 then
TFrxMemoView(Sender).text:=inttostr(DivNum)+
' '+
inttostr(ModNum)+
'/12'
else
TFrxMemoView(Sender).text:=' '+
inttostr(ModNum)+
'/12';
end;

能否簡單些? 寫在MEMO中(begin
end)出現&quot;不能轉換類型null為String&quot;的錯誤,煩死了.
是在Fastreport 2.5中的. 大家幫幫忙.

begin
if [DataQty1] mod 12=0 then
Qty1.Memo:='[[DataQty1]/12]' else
Qty1.Memo:='[[DataQty1]/12] [[DataQty1 mod 12]]/12';
end;

多人接受答案了。