FastReport变量在运行时赋值，要进行怎么样编码？

Question

我要打印一个数据表，如下表
userID userName usersex
 102    王明     1
 105    陈英     0要在报表运行时，当usersex=1时，将数据字典里的变量 var1='男'
当usersex=0时，将数据字典里的变量 var1='女'
这要怎么做？

Answer 1

在FR的BEFORE　PRINT事件中：
IF　TABLE1。FIELDBYNAME（usersex）。ASINTEGER＝1　THEN
frReport1.Dictionary.Variables[‘VAR1‘] :='男'

Answer 2

在FR的BEFORE　PRINT事件中：If　Qery1.FieldByName('usersex'）.AsString = 1　Then
frReport1.FindObject['memo1'].memo.text :='男'

Answer 3

不知道你是否希望为1是打印男，为0时打印女
如果是这样，你可以设置Memo的DisplayFormat，选择数据类型为Boolean,然后选择custom,最后按照如下格式"男;女"输入就可以了