Работа с INIFILES

[Mont1k]

У меня вот такая вот проблема... Понять её ни как не могу...

В программе 2 формы... 1 форма - это главная на ней находятся кнопки(только это не кнопки а ShockwaveFlash) и RichView(коммерческие компоненты, тот же RichEdit только есть возможность считывать картинки в RTF файлах). Во второй Button и Edit, нужно чтобы вводя в первой форме имя оно сохранялось в .ini, и появлялось первая(главная) форма, в которой при нажатии на кнопку грузится RTF в RichView. После закрытия по идее должны сохраняться эти настройки... Только вот беда какая-та получаеца

Форма Входа

var
Form3: TForm3;
implementation
uses Unit1;
{$R *.dfm}
procedure TForm3.Button1Click(Sender: TObject);
begin
Form1.Show;
end;
end.

Главная Форма

procedure TForm1.ShockwaveFlash11Enter(Sender : TObject); //одна из кнопок а их несколько...
begin
LastOpened:='rtf\10.rtf';
Image1DblClick(Image1);
end;

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
var IniFile: TIniFile;
begin
IniFile.WriteString(Form3.Edit1.Tex t,'LastOpened',LastOpened);
end;

procedure TForm1.FormShow(Sender: TObject);
var IniFile: TIniFile;
begin
Path:=Application.ExeName;
Path:=ExtractFileDir(Path);
if Path[Length(Path)]<>'\' then Path:=Path+'\';
IniFile:=TIniFile.Create(path+'sett ings');
LastOpened:=IniFile.ReadString(Form 3.Edit1.Text,'LastOpened','');
if LastOpened<>'' then Image1DblClick(Image1);
end;

procedure TForm1.Image1DblClick(Sender: TObject);
begin
RichView1.Clear;
RichView1.LoadRTF(LastOpened);
RichView1.Format;
end;

При выходе из главной формы выдаёт ошибку, только не говорит где эта ошибка...

[Mont1k]

__________________--