FastReports pascalscript如果

Question

我在FastReport中的IF语句有问题。我想检查是否为ProgramName = ""，然后更改为Memo1.Text = "ONLY FOR CALCULATION"，如果不是，则为“ OTHER”

procedure rara(Sender: TfrxComponent);
var
ProgramName : sring;
begin
ProgramName := <Nest."PrgName">;

if ProgramName = "" then
begin                                
       memo1.Text = "ONLY FOR CALCULATION";                
       end
else
       begin
       Memo1.Tex = "OTHER";                                                             
       end
end;

end;

我看到的错误是：

期待”]

你有什么想法吗？

我对FastReport中的IF语句有疑问。我想检查ProgramName =“”，然后更改Memo1.Text =“ ONLY FOR CALCULATION”，如果没有，则执行“ OTHER”过程rara（Sender：TfrxComponent）; ...

Answer 1

如果使用快速报告，则此脚本可能是OnBeforePrint组件之一的TfrxMemoView事件处理程序。事件处理程序应如下所示（如@MartinPrikryl所述）。