problema al insertar registro en el dbgrid

Yoli · #1 09-04-2005

Hola a todos, El problema que tengo es que cuando inserto un registro en el grid y presiono la flecha hacia abajo, el lo guarda pero no me muestra una segunda fila para insertar otro registro. lo que hace es limpiar la primera fila para ingresar el nuevo registro. Esto lo estoy haciendo en un formulario maestro detalle con 2 tablas(Tcotizacion(maestro) y TcotizacionD(detalle)). el codigo que estoy utilizando es el siguiente:

Código Delphi [-]procedure TFrmCotizacion.cmdNuevoClick(Sender: TObject);
   begin
           DSCotizacion.DataSet.Insert;        
           ActivarTextos;
           cmdNuevo.Enabled:= False;
           cmdGuardar.Enabled:= True;
           cmdCancelar.Enabled:= True;
           cmdModificar.Enabled:= False;
           cmdEliminar.Enabled:= False;
           cmdFacturar.Enabled:= False;
           DBCedulaRIF.Enabled:=True;
           DBCedulaRIF.SetFocus;
   end;
  
  procedure TFrmCotizacion.ItemsGridEnter(Sender: TObject);
  begin
          if (DSCotizacion.DataSet.State = dsEdit) or (DSCotizacion.DataSet.State = dsInsert) then
                  begin
                  DSCotizacion.DataSet.Post;
                  DSCotizacion.DataSet.Refresh;               
                  end;
  end;
  
  procedure TFrmTablas.TCotizacionDNewRecord(DataSet: TDataSet);
  begin
          FrmCotizacion.QKoki.Close;
          FrmCotizacion.QKoki.Active:=True;
  
           if FrmCotizacion.QKoki.RecordCount > 0 then
                 TCotizacionD.FieldByName('ID_COTIZACION').AsInteger:=FrmCotizacion.QKoki.Fields[0].AsInteger;
  
  end;

todos los datos se guardan bien, pero necesito que se agregen filas en el grid cada vez que yo ingrese un nuevo registro. Bueno espero haberme explicado. Saludos.

Chaja · #2 09-04-2005

Hola:
En la Tabla Detalle tenes un id y otro id de la cabecera?, por que no lo veo.
Fijate. fijate de poner un break en el momento del post del detalle , para ver donde va despues. Talvez estes haciendo otro insert de cabecera lo que hace que borre el detalle.