Fejl ved DBQuery

Hvad er der galt her ?.
når jeg forsøger at gemme i databasen får jeg en fejl der hedder :

Query1 cannot modyfy a read only dataset

min kode ser sådan her ud :

DataModule1.Query1.Insert; //Åbner Table  DataModule1.Query1.FieldByName(\'FormTegningsNr\').AsString := Edit1.Text;
  DataModule1.Query1.FieldByName(\'FormNr\').AsString := Edit2.Text;
  DataModule1.Query1.FieldByName(\'RaaEmneTegningsNr\').AsString := Edit3.Text;
  If Checkbox1.Checked = True Then
    DataModule1.Query1.FieldByName(\'saenket\').AsString := \'Formen er sænket 1 MM\'
    else
    DataModule1.Query1.FieldByName(\'saenket\').AsString := \'\';
  DataModule1.Query1.FieldByName(\'Dato\').AsString := Label4.Caption;
  DataModule1.Query1.Post;//Lukker Tabel