一个错误提示，帮忙看看！

Question

看看问题出在什么方面：Project 123.exe raised exception class EAccessViolation  with message 
'Access violation at address 0045c127 in module '123.exe',Read of 
address 00000039'. Process stopped .Use step or Run to continue.如果问题解决，分给最先答出的网友。

Answer 1

我昨天整理了机子，删除了一些文件，现在在重装Delphi6，原来没有问题，但是昨天下班的时候就不行了。

Answer 2

begin
  Application.Initialize;
  Form_splash:=TForm_splash.Create(Application);
  Form_splash.Show;
  Form_splash.Update;
  Application.CreateForm(TDataModule_LY, DataModule_LY);
  Application.CreateForm(TForm_main_ly, Form_main_ly);
  Form_login:=TForm_login.Create(Application);
  Form_login.ShowModal;
  Application.Run;//程序运行到此就出现上面所示的提示
end.

Answer 3

Rainsea(飞龙在天) 所说的跟踪：
我的理解是这样的，1、通过断点（其中包括源断点、地址断点、数据断点及模块装载断点）；2、逐行执行代码。

Answer 4

建议重新做一个窗体，把代码copy过去！
这样比你检查错在什么地方还快！

Answer 5

TO ： Taken(铁拳)
     把 Form_login.ShowModal屏蔽掉的话，确实是可以避免上述所说的内存访问冲突，但是程序的安全认证问题是用login模块解决的。各位还有好的建议吗？帮帮忙！！！

Answer 6

Application.Initialize;
  Form_splash:=TForm_splash.Create(Application);
  Form_splash.Show;
  Application.CreateForm(TDataModule_LY, DataModule_LY);
  Application.CreateForm(TForm_main_ly, Form_main_ly);
  Frm_Logon:=TFrm_Login.Create(nil);
  try
     Form_splash.CanClose:=true;
     Form_splash.Free;
     if Form_Login.ShowModal=mrOK then  //登录
     begin
          FreeAndNil(Frm_login);
          Application.Run;
     end;
  finally
    Frm_login.Free;
  end;

Answer 7

if datamodule_ly.ADODataSet_auth.RecordCount > 0 then
  while not datamodule_ly.ADODataSet_auth.Eof do
  begin
    menuname:=trim(datamodule_ly.ADODataSet_auth.FieldValues['MODELER']);
    TMenuItem(FindComponent(Menuname)).Enabled:=True;
    Datamodule_ly.ADODataSet_auth.Next;
  end;
这样一个循环会造成内存访问冲突吗？

Answer 8

project里，我就是这样用的，问题可能不是出在这儿吧
datamodule_ly.ADODataSet_auth.FieldValues['MODELER']--变量类型，改为
datamodule_ly.ADODataSet_auth.fieldbyname('MODELER').asstring试试

Answer 9

问题不是在这里，我已经试过了。但是程序就是运行到
datamodule_ly.ADODataSet_auth.Eof
时显示内存访问冲突的。