Ошибка при обновлении ADOQuery

[Вася111111]

При добавлении записей в таблицы выскакивает ошибка.Как я понял нужно обновлять три ADOquery , но когда пытаюсь обновить даже 2 выскакивает ошибка

ADOQuery2.Cannot perform this operation on a closed dataset

Если сделать всего 1 рефреш для любой таблицы то все работает НО. Изначально проблема в том что есть 3 таблицы . Во 2й и3 есть поля из ADOQuery4 Которые я добавляю по коду ниже. Но в во второй таблице тобиж ADOQuery2 эти поля не отображаются. Хотя в третьей все работает. В чем я ошибся?

procedure TForm2.Button1Click(Sender: TObject);
begin
Form1.ADOQuery2.Append;
Form1.ADOQuery2.Fields[5].AsString:=Edit4.Text;
Form1.ADOQuery2.Fields[6].AsDateTime:= DateTimePicker1.DateTime;
Form1.ADOQuery2.Fields[7].AsString:=Edit6.Text;
Form1.ADOQuery2.Fields[8].AsString:=Edit7.Text;
Form1.ADOQuery2.Fields[9].AsDateTime:= DateTimePicker2.DateTime;
Form1.ADOQuery2.Fields[10].AsString:=Edit9.Text;
Form1.ADOQuery2.Fields[11].AsString:=Edit10.Text;
Form1.ADOQuery3.Append;
Form1.ADOQuery3.Fields[5].AsDateTime:= DateTimePicker3.DateTime;
Form1.ADOQuery3.Fields[6].AsString:=Edit5.Text;
Form1.ADOQuery3.Fields[7].AsString:=Edit8.Text;
Form1.ADOQuery3.Fields[8].AsString:=Edit11.Text;;
Form1.ADOQuery3.Fields[9].AsString:=Edit12.Text;
Form1.ADOQuery3.Fields[10].AsString:=Edit13.Text;
Form1.ADOQuery3.Fields[11].AsString:=Edit14.Text;
Form1.ADOQuery4.Append;
Form1.ADOQuery4.Fields[1].AsString:=Edit1.Text;
Form1.ADOQuery4.Fields[2].AsString:=Edit2.Text;
Form1.ADOQuery4.Fields[3].AsString:=Edit3.Text;
Form1.ADOQuery4.Fields[4].AsString:=Edit15.Text;
Form1.ADOQuery4.Fields[5].AsDateTime:= DateTimePicker4.DateTime;
Form1.ADOQuery4.Fields[6].AsString:=Edit16.Text;
Form1.ADOQuery4.Post;
Form1.ADOQuery2.Post;
Form1.ADOQuery3.Post;
Form1.ADOQuery4.Refresh;
Form2.Close;
Form1.TabSheet4.show;
end;

[Streletz]

В чем я ошибся?

Об этом Вам ADO пишет открытым текстом. ADOQuery2 у Вас закрыт (свойство Active=false).
Проверяйте настройки компонентов. А, если открытие и закрытие осуществляется программно, то и соответствующие участки кода.