mid错误？

Question

你这些代码有不少问题。关闭子窗口时出错是因为：
glre_input:=nil;
这是在glre_input的事件中，不支持这样“自杀的”，删掉。
至于查询结果变不变，取决于：
glre_rep.glreQuery.SQL.Add('select 单位,项目名称,决赛成绩,得分 from groinfor_input');
如果数据库数据没有变化，查询结果也不变。—————————————————————————————————
MaximStr := '宠辱不惊，看庭前花开花落，去留无意；
             毁誉由人，望天上云卷云舒，聚散任风。';
if Not Assigned(I) then
  I := TI.Create(Nil);
I.Maxim := MaximStr;
I.Explain := '假如上述代码中出现“OA”、“3D”等字样，改为“=”等';
I.Desire := '加不加分随你';
—————————————————————————————————