modulodedatos.AgregarPagos.Active:=false;
modulodedatos.AgregarPagos.SQL.Clear;
modulodedatos.AgregarPagos.SQL.Text:='insert into Pagos(Clave_Pago,Descripcion_Pago,Cargo_Pago,Observaciones_Pago) values( ' +#39+Edit1.Text+#39+','+#39+Edit2.Text+#39+','+#39+Edit3.Text+#39+','+#39+Edit4.Text+#39+')';
modulodedatos.AgregarPagos.ExecSQL;