请各位大侠帮忙看看我的程序出错在什么地方

板子是用PADS2007做的，板子做出来总是距离不行，5米左右效果就不好了。是用凌阳方案做的。

小弟看了各位大侠们写的程序，手也痒痒，就写了这个程序。 这是我初写程序，还有许多不足之处，望各位大哥大姐们多给指点。 程序未写完，大家先试试看，看看是否还过的去，帮忙测试测试，：） 程序编译环境:Delphi 7 程序使用SQL2000数据库和Access数据库。 请先在SQL中建立一个新数据库，名为“人事档案管理”，然后， 再把Data目录下的“人事档案管理”文件导入到刚建立的库中。 运行程序时，先运行ServerSet.exe配置服务器信息。 然后就可以运行Man.exe了。。 祝各位好运