Проблема с Excel в Delhi.

[KyTuH]

Доброй ночи)
В моей программе есть 2 формы, 2 StringGrid и 1 файл Excel(fio.xls).
На 1 форме я через StringGrid1 работаю с Excel файлом(Считываю и перезаписываю данные).
На 2 форме я через StringGrid2 я редактирую свой файл fio.xls.
Проблема в том, что когда я на 2 форме пытаюсь из StringGrid2 переписать данные в файл fio.xls, выходит диалоговое окно, что файл открыт только для чтения, хотя в коде файл был открыт для чтения\записи. Под любым другим именем он сохраняет(создает новый по аналогии старого).
При переходе с одной формы на другую предусмотрел закрытие файла fio.xls, и при открытии 2 формы программа вновь открывает этот файл.
Не могу понять в чем дело. Прилагаю скрины от программы, ну и конечно код.

unit Unit1;

var
  Form1: TForm1;
  Ap : Variant;

procedure TForm1.FormCreate(Sender: TObject);
begin
Ap := CreateOleObject('Excel.Application');
Ap.Workbooks.Open('c:\excel\fio.xls');
end;


procedure TForm1.N6Click(Sender: TObject);
begin
Ap.ActiveWorkbook.Close;
Ap.Workbooks.Open('c:\excel\Дежурство.xls');
Ap.ActiveWorkbook.Close;
ap.Quit;
Form1.Visible:=false;
Form2.show;
end;

И еще

unit Unit2;
var
  Form2: TForm2;
  Ap : Variant;

procedure TForm2.FormCreate(Sender: TObject);
begin
 AP := CreateOleObject('Excel.Application');
Ap.Workbooks.Open('c:\excel\fio.xls');
end;


procedure TForm2.Button1Click(Sender: TObject); //Кнопка "Сохранить"
begin
for i:=2 to 9 do
begin
Ap.Cells[i, 1]:=sg1.Cells[0, i-1];
end;
Ap.Quit;
end;

В коде написал только самое нужное.И кстати, если при переходе на Form2 закрывать Form1(form1.close), то Form2 не открывается. Помогло скрытие Form1(form1.Visible:=false). Хотя может в этом и проблема. Помогите найти проблему))

[Sciv]

Нажмите Ctrl-Alt-Del И проверьте, есть ли среди процессов EXCEL.exe. Если есть - значит у Вас этот файл где-то в коде открыт, но без visible. Потому болтается в памяти процесс, блокирует файл и не дает его открыть при записи

[KyTuH]

Сообщение от Sciv

Нажмите Ctrl-Alt-Del И проверьте, есть ли среди процессов EXCEL.exe. Если есть - значит у Вас этот файл где-то в коде открыт, но без visible. Потому болтается в памяти процесс, блокирует файл и не дает его открыть при записи

Смотреть наличие этого процесса, когда нахожусь на 2 форме?? Если да, то в процессе висит один процесс EXCEL.EXE. Хотя я в коде прописывал закрытие fio.xls.
Хотя ведь при открытии 2 формы, у меня и должен висеть процесс EXCEL.EXE, так как в TForm2.FormCreate я вновь открываю файл fio.xls.