Ошибка Access violation at address

[Scorpuha]

Вот код, прога должна вносить записи в таблицу. после заполнения едитов жмем кнопку и выдает ошибку. Хотя раньше все работало. а тут бац и перестало.
отладчик выдает строку с ошибкой которую я выделил.

unit Unit4;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;

type
  TForm4_sotrud = class(TForm)
    Label1: TLabel;
    Label2: TLabel;
    Label3: TLabel;
    Edit1: TEdit;
    Edit2: TEdit;
    Edit3: TEdit;
    Label4: TLabel;
    Edit4: TEdit;
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
    procedure FormClose(Sender: TObject; var Action: TCloseAction);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form4_sotrud: TForm4_sotrud;

implementation

uses Unit1, Unit2, Unit3, Unit5, Unit6, Unit7;

{$R *.dfm}

procedure TForm4_sotrud.Button1Click(Sender: TObject);
begin
      datamodule3.Sotrudnik.Open;
      datamodule3.Sotrudnik.Insert;
      datamodule3.Sotrudnik.FieldByName('Familiya').Value:=Form4_sotrud.Edit1.Text;
      datamodule3.Sotrudnik.FieldByName('Imya').Value:=Form4_sotrud.Edit2.Text;
      datamodule3.Sotrudnik.FieldByName('Otchecstvo').Value:=Form4_sotrud.Edit3.Text;
      datamodule3.Sotrudnik.FieldByName('Tab_nomer').Value:=Form4_sotrud.Edit4.Text;
      datamodule3.Sotrudnik.Post;
      datamodule3.Sotrudnik.Refresh;
      Form4_sotrud.Close;
end;

procedure TForm4_sotrud.FormClose(Sender: TObject;
  var Action: TCloseAction);
begin
      Action:=caFree;
end;

end.

[northener]

Как и где создается эта форма (TForm4_sotrud)

[Scorpuha]

ээээ в дезигн-режиме. и имеет child style. походу я уже разобрался. случайно перевел datamodule в avaibleform. перенес обратно в автокреат и все заработало.

[northener]

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

ээээ в дезигн-режиме. и имеет child style.

Зачем же её тогда убивать при закрытии?

[Scorpuha]

всмысле, а что делать?

[northener]

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

всмысле, а что делать?

Если эта форма нужна более одного раза, то как же ее тогда показывать второй раз?