Cierto error al ingresar datos en access

[Snakerahj]

Hola a todos, mi problema debe ser muy sencillo o puede ser muy claro, pero no puedo ver que esta pasando aqui... tengo una pequeña aplicacion que esta conectada a una base de datos en access. Se supone que la aplicacion recoje una serie de datos de un alumno y los inserta en la bd, y en realidad si lo hace, ahora bien, cuando doy click sobre el boton guardar lo tengo que hacer dos veces para que inserte los datos en access, de lo contrario no lo hace. miren, aqui esta el codigo de mi boton ojala y me puedan explicar que hacer.

Gracias.

procedure TForm1.Button1Click(Sender: TObject);
begin
ADOTable1.Insert;
ADOTable1.Fields.FieldByName('matricula').Text:=Edit2.Text;
ADOTable1.Fields.FieldByName('nombre').Text:= Edit1.Text;
ADOTable1.Fields.FieldByName('periodo').Text:= Edit3.Text;
ADOTable1.Fields.FieldByName('grupo').Text:= Edit4.Text;
end;