吸取了惨痛教训，散分

惨痛教训数组定义要注意检查，使用时不要越界。
错误形式：两个动态产生的控件数组控件指向的内存地址一样,导致使用时，出现混乱。
找出时间：整整两天时间才找出错误（没想到这里错了，在别的地方瞎找）
教训：　数组定义要注意检查，使用时不要越界。（Dephi　初始设置不检测越界问题，要打开　project options /complier /Runtime errors/rangechecking）。