第一次运行可以，第二次出错！‘Access violation at address 004B09BD in module’ Read of address，

Question

代码如下，在调用Image窗口时有问题！
unit Log_In;interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, DB, ADODB, StdCtrls, Buttons;type
  TLogIn = class(TForm)
    Label1: TLabel;
    Label2: TLabel;
    Edit1: TEdit;
    Edit2: TEdit;
    BitBtn1: TBitBtn;
    BitBtn2: TBitBtn;
    ADOConnection1: TADOConnection;
    ADOQuery1: TADOQuery;
    procedure BitBtn1Click(Sender: TObject);
    procedure BitBtn2Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  LogIn: TLogIn;implementationuses StartImage;{$R *.dfm}procedure TLogIn.BitBtn1Click(Sender: TObject);
begin
 ADOQuery1.close;
  ADOQuery1.sql.clear;
  ADOQuery1.sql.add('select * from Login where username='''+edit1.text+''' and password='''+edit2.text+'''');
  ADOQuery1.open;
  if ADOQuery1.RecordCount=0 then
    begin
    showmessage('输入的用户名或密码不正确！');
    end
    else
      begin
        Application.CreateForm(TImage, Image);
        Image.show;
        LogIn.Hide;
      end;
 end;procedure TLogIn.BitBtn2Click(Sender: TObject);
begin
  LogIn.close;
end;
end.

Answer 1

else
      begin
        with TImage.create(LogIn) do
        begin
          show;
        end;     
        //Application.CreateForm(TImage, Image);
        //Image.show;
        LogIn.Hide;
      end;