请问各位：在登陆窗体中有如下一段代码，请问有何错误？

Question

首先,你有没有连接到数据库
其次你的字段名为中文,你的BDE支持吗?
改成英文试一试

Answer 1

form2既然是主窗体，在登陆前他还没有创建吧
当然出错了
你应该把query1.FieldByName('权限').AsString 的值作为参数
传递给form2，在form2显示时进行判断

Answer 2

谢谢各位的回复，出现如下的提示信息"access viocation at address 064f69c9 in module "project.exe"",我连接的是SQL数据库，这段代码放在登陆窗体中

Answer 3

你应该在Form2的OnShow事件中弹出登陆窗体

Answer 4

你FORM2都没有CREATE，怎么能够form2.MainMenu1.Items[3].Enabled :=false;
所以要在FOMR2 CREATE后才可以这样
      

Answer 5

谢谢各位的回复，如下是执行文件的代码，请各位看一下：
  form1:=tform1.create(application);
  form1.showmodal;
  if form1.modalresult=1 then
  begin
  form15:=tform15.create(application);
  form15.show;
  form15.update;
  Application.Initialize;
  Application.CreateForm(TForm2, Form2);
  Application.CreateForm(TAboutBox, AboutBox);
  Application.CreateForm(TForm5, Form5);
  Application.CreateForm(TForm3, Form3);
  Application.CreateForm(TForm8, Form8);
  Application.CreateForm(TForm11, Form11);
  Application.CreateForm(TForm14, Form14);
  Application.CreateForm(TForm12, Form12);
  Application.CreateForm(TForm13, Form13);
  Application.CreateForm(TForm9, Form9);
  Application.CreateForm(TForm10, Form10);
  Application.CreateForm(TForm4, Form4);
  Application.CreateForm(TForm7, Form7);
  Application.CreateForm(TForm17, Form17);
  Application.CreateForm(TForm18, Form18);
  Application.CreateForm(TForm6, Form6);
  form15.hide;
  form15.free;
  Application.Run;
  end;

Answer 6

谢谢各位的回复，如下是执行文件的代码，请各位看一下：
  form1:=tform1.create(application);
  form1.showmodal;
  if form1.modalresult=1 then
  begin
  form15:=tform15.create(application);
  form15.show;
  form15.update;
  Application.Initialize;
  Application.CreateForm(TForm2, Form2);
  Application.CreateForm(TAboutBox, AboutBox);
  Application.CreateForm(TForm5, Form5);
  Application.CreateForm(TForm3, Form3);
  Application.CreateForm(TForm8, Form8);
  Application.CreateForm(TForm11, Form11);
  Application.CreateForm(TForm14, Form14);
  Application.CreateForm(TForm12, Form12);
  Application.CreateForm(TForm13, Form13);
  Application.CreateForm(TForm9, Form9);
  Application.CreateForm(TForm10, Form10);
  Application.CreateForm(TForm4, Form4);
  Application.CreateForm(TForm7, Form7);
  Application.CreateForm(TForm17, Form17);
  Application.CreateForm(TForm18, Form18);
  Application.CreateForm(TForm6, Form6);
  form15.hide;
  form15.free;
  Application.Run;
  end;