Delphi求指点

可以提供源代码，希望大神能帮我解决这个问题
[解决办法]
这种问题自己调，就像让你猜我 银行有多少存款一样。。。
[解决办法]
难道你都不能定位到错误单元，错误函数吗，直接给源码，愿意看的也不会有几个吧 贴出这种错误来问，显得太外行了吧
[解决办法]
装个EurekaLog，自己去查看输出日志，祝好运～