typecast java_Delphi设置无效的Typecast

如何修复此无效的类型转换错误？当集合少于31个项目时，代码有效 . 以下是代码段：

type

TOptionsSurveyTypes=(

ostLoadSurvey00,

ostLoadSurvey01,

ostLoadSurvey02,

ostLoadSurvey03,

ostLoadSurvey04,

ostLoadSurvey05,

ostLoadSurvey06,

ostLoadSurvey07,

ostLoadSurvey08,

ostLoadSurvey09,

ostLoadSurvey10,

ostEventLog01,

ostEventLog02,

ostEventLog03,

ostEventLog04,

ostEventLog05,

ostSagSwell,

ostTamper,

ostWaveforms,

ostDeviceList,

ostDeleteData,

ostTOUBillingTotal,

ostTOUPrevious,

ostProfileGenericLoadSurvey01,

ostProfileGenericLoadSurvey02,

ostProfileGenericLoadSurvey03,

ostProfileGenericLoadSurvey04,

ostProfileGenericLoadSurvey05,

ostProfileGenericLoadSurvey06,

ostProfileGenericLoadSurvey07,

ostProfileGenericLoadSurvey08,

ostProfileGenericLoadSurvey09,

ostProfileGenericLoadSurvey10,

ostProfileGenericEventLog01,

ostProfileGenericEventLog02,

ostProfileGenericEventLog03,

ostProfileGenericEventLog04,

ostProfileGenericEventLog05,

ostProfileGenericBillingTotal,

ostProfileGenericPrevious,

ostProfileGeneric

);

TOptionsSurveyTypesSet=set of TOptionsSurveyTypes;

function TUserProcessRollback.SurveyRollBack:boolean;

var

vRollbackDate: TDateTime;

FOptions: LongWord;

begin

...

if ostDeleteData in TOptionsSurveyTypesSet(FOptions) then

vRollbackDate := 0.00

else

vRollbackDate := FRollbackDate;

...

end;

当我将集合减少到少于32个项目并且FOptions被声明为DWORD时，代码将编译 .

谢谢

typecast java_Delphi设置无效的Typecast相关推荐

关于Jupyter Notebook默认起始目录设置无效的解决方法
关于Jupyter Notebook默认起始目录设置无效的解决方法参考文章: (1)关于Jupyter Notebook默认起始目录设置无效的解决方法 (2)https://www.cnblogs. ...
div宽度设置无效问题解决
div宽度设置无效问题解决参考文章: (1)div宽度设置无效问题解决 (2)https://www.cnblogs.com/yulian/p/5132873.html 备忘一下.
表格Table宽度设置无效的解决方法
表格Table宽度设置无效的解决方法参考文章: (1)表格Table宽度设置无效的解决方法 (2)https://www.cnblogs.com/sherryweb/p/11659848.html ...
Keras TensorFlow 混编中 trainable=False设置无效
Keras TensorFlow 混编中 trainable=False设置无效这是最近碰到一个问题,先描述下问题: 首先我有一个训练好的模型(例如vgg16),我要对这个模型进行一些改变,例如添加 ...
QStackedWidget设置无效问题
QStackedWidget设置无效问题在对QStackedWidget中的index窗体设置了样式,发现index为0的窗体样式无效,但是其它index都正常. 解决方法: 1. addwidge ...
内存设置无效: 内存预留 (sched.mem.min) 应该等于内存大小 (65536)
vCenter中的虚拟机在内存是32G的时候,一切都是正常的.当我将内存增加到64G后,在启动虚拟机时出现错误提示:内存设置无效: 内存预留 (sched.mem.min) 应该等于内存大小 (655 ...
UE4鼠标滚轮轴缩放事件设置无效
UE4鼠标滚轮轴缩放事件设置无效解决方案事件图表: 设置完后发现滚轮依然无法缩放界面,则设置: 将[进行碰撞测试]勾选取消,编译运行后,鼠标滚轮可以缩放.
关于css中line-height(行高)设置无效的问题
关于css中line-height(行高)设置无效的问题我们先写下这一串代码: <!DOCTYPE html> <html lang="en"> < ...
宽带拨号上网时，Win10代理设置无效
宽带拨号上网时,Win10代理设置无效如下图,在win10系统中已经自动设置好了,但是无论软件还是edge.Chrome都无法连接. 但是在别人家用一样的,却什么也不用管,直接就可以上.(现在想应该 ...
android imageview.setVisibility(View.VISIBLE)设置无效，代码已执行但是图片不显示
android imageview.setVisibility(View.VISIBLE)设置无效,代码已执行但是图片不显示在网上找了很多文章,基本上都是说在设置setVisibility()之前, ...

typecast java_Delphi设置无效的Typecast

typecast java_Delphi设置无效的Typecast相关推荐

最新文章

热门文章