关于MainMenu的问题，和列出逾越限度索引的问题

Question

我在主窗体里放了MainMenu，，每次运行的时候，菜单里连出来的子窗体都弹出来了，为什么会出现在和种问题啊~
不是点哪个子菜单才弹出想对应的子窗体么？？？全部都弹出来，那是怎么回事啊，哪位高手帮帮忙啊~~~~还有用ADOquery的时候，
procedure TF_teacher.ADOTabTeacherAfterScroll(DataSet: TDataSet);
begin
adoqrycourse.SQL.Clear;
adoqrycourse.SQL.Add('select name from Course where teacherno=:k');
adoqrycourse.Parameters[0].Value:=adotabteacher.FieldByName('teacherno').AsString;
adoqrycourse.open;这代码有什么错？？？？为什么总是是列超出索引呢？！

Answer 1

用ADOquery的时候，  
procedure  TF_teacher.ADOTabTeacherAfterScroll(DataSet:  TDataSet);  
begin  
adoqrycourse.SQL.Clear;  
adoqrycourse.SQL.Add('select  name  from  Course  where  teacherno=:k');  
adoqrycourse.Parameters[0].Value:=adotabteacher.FieldByName('teacherno').AsString;  
adoqrycourse.open;  错误提示总是：list index out of bounds