none
MshFlexGrid vb6 RRS feed

  • Pregunta

  • Otra consulta en este fragmento de código no puedo eliminar la primera fila me sale este mensaje NO SE PUEDE QUITAR LA ULTIMA FILA NO FIJA este es el código.

    Private Sub btnEliminar_Click()
      With flex
        If .Row > 0 Then .RemoveItem (.Row)
      End With
    End Sub

    Si puedo eliminar pero cuando queda solo un registro en la grilla ese no ese puede eliminar sale el error antes mencionado.


    Pedro Avila

    sábado, 16 de junio de 2012 19:42

Respuestas

  • Tienes que remplazar la fila por una vacia

        With flex
       
            If .Rows = 2 Then
                .Rows = .Rows + 1
                Lleno = False
            End If
         
            If .Row > 0 Then .RemoveItem (.Row)
         
        End With
    Si el total de filas son 2 (1 es la cabezera) añadimos una fila nueva y eliminamos la otra
    • Editado ToniAG sábado, 16 de junio de 2012 20:29
    • Marcado como respuesta Pedro Ávila sábado, 16 de junio de 2012 20:40
    sábado, 16 de junio de 2012 20:27

Todas las respuestas

  • Tienes que remplazar la fila por una vacia

        With flex
       
            If .Rows = 2 Then
                .Rows = .Rows + 1
                Lleno = False
            End If
         
            If .Row > 0 Then .RemoveItem (.Row)
         
        End With
    Si el total de filas son 2 (1 es la cabezera) añadimos una fila nueva y eliminamos la otra
    • Editado ToniAG sábado, 16 de junio de 2012 20:29
    • Marcado como respuesta Pedro Ávila sábado, 16 de junio de 2012 20:40
    sábado, 16 de junio de 2012 20:27
  • El total es una en la primera que es el (0,0) esta el titulo pero es cabecera y un registro vacío me carga en el load cuando lanzo voy a proba el código y te comento.

    Pedro Avila

    sábado, 16 de junio de 2012 20:33
  • Si Toni funcionó a la perfección gracias socio

    Pedro Avila

    sábado, 16 de junio de 2012 20:40