Limpiar Formulario para ingresar nuevo registro en sql

[novato_erick]

eficsa:

Si decide continuar, saldrá del procedimiento btnAgregarClick, ingresará los nuevos datos, hará click en el botón agregar y así hasta que decida no agregar otro.

Habia propuesto Limpliar mis edit y variables. es lo que me imagino que puedo yo hacer hasta decidir decirle que no deseo Agregar mas.

Ejemplo:

Código Delphi [-]
 if Application.MessageBox('¿Desea Agregar Otro?', 'Confirmación',
    MB_ICONQUESTION OR MB_YESNO) = ID_NO then
  begin
    dmConecta.qEmpleados.Close;
    frmPrincipal.CerrarPestana;
  end;
  else
    begin
     edtNombre1.Text := '';
     edtNombre2.Text := '';
     edtApellido1.Text := '';
     edtapellido2.Text := '';
     edtCedula.Text := '';
     dtpFNacimiento.DateTime := Now;
     IdGenero := 0;;
     mDireccion.Text := '';
     edtTelefono.Text := '';
     edtCelular.Text := '';
     dtpFAlta.DateTime := Now;
     edtContacto.Text := '';
     edtEmail.Text := '';
     id := 0;
     edtDependientes.Text := '';
     Estado := '';
     end;
end;

Es lo que se me ocurre.. Alguna otra idea?

Saludos