fastreport中如何写下面的脚本：(50分)

fastreport中如何写下面的脚本：
begin
a:=[q2."sfxmmc"];
if (a='水费')then
memo14.memo:=[Q2."bycj"]and[DU] //说明DU是个变量如“度”
else
memo14.memo:=[Q2."bycj"]and[DU]
就是说如果是水费他显示[Q2."bycj"]度
如果是电费他显示[Q2."bycj"]吨

以下代碼寫在 beforeprint中
if a = '水費'then
Memo14.Text:= <Q2."bycj">
else
if a = '電費' then
Memo14.Text:= <Q2."bycj">

在Memo14的代號中寫即可
begin
a := [q2."sfxmmc"];
if a = '水费' then

Memo14.Lines[0] := [Q2."bycj"] + '度'
else
Memo14.Lines[0] := [Q2."bycj"] + '吨';
end