Question

我有一个使用Rave Reports的应用程序。

从Delphi 2006升级到Delphi 2010后，一些脚本停止工作并提供了一个 访问违规邮件

我有一个看起来像这样的脚本：

OnGetText：

 IF  (ddvDetailTaxidEventType.AsInteger = 1)  THEN
    Value := 'TEST ' + ddvDetailTaxidEventType.AsString ; 
ELSE
     Value := 'TEST ';  
 END IF;

此脚本适用于Rave 6.5BE（D2006），但不适用于Rave 7.7BE（D2010）

注意：

命令：值：='TEST'+ ddvDetailTaxidEventType.AsString;

在没有If和EndIf语句的情况下工作。

命令：值：='TEST';

在没有If和EndIf语句的情况下工作。

命令：if（ddvDetailTaxidEventType.AsInteger = 1）那么

提供访问违规消息

命令：if（ddvDetailTaxidEventType.AsString ='1'）那么

提供访问违规消息

我只是看不出我错在哪里......

请帮忙。

Answer 1

方法AsInteger在rave 7.7中导致应用程序的AV。（AsString工作正常）

将其替换为：if (ddvDetailTaxidEventType.AsString = '1') then