1
Visual Basic 6 / Re:MSFlexGrid en Modo jerarquico
« en: Marzo 08, 2012, 05:12:03 am »
NO si cargar un TreeView ya se, pero para crearle a cada nodo a parte del nombre del mismo una segunda columna con comentarios para dichos nodos?
Mostrar Mensajes
Esta sección te permite ver todos los posts escritos por este usuario. Ten en cuenta que sólo puedes ver los posts escritos en zonas a las que tienes acceso en este momento.
Páginas: [1]
2
Visual Basic 6 / Re:MSFlexGrid en Modo jerarquico
« en: Marzo 07, 2012, 12:46:11 pm »
Lo primero, gracias por la respuesta.
Pero ¿Cómo puedo poner en un treeview para cada uno de los nodos, ya sea padre o hijo una segunda columna con el contenido?
Y que además esa columna sea modificable
Un saludo
Pero ¿Cómo puedo poner en un treeview para cada uno de los nodos, ya sea padre o hijo una segunda columna con el contenido?
Y que además esa columna sea modificable
Un saludo
3
Visual Basic 6 / Re:MSFlexGrid en Modo jerarquico
« en: Marzo 07, 2012, 07:21:20 am »
Lo primero, mil gracias por la respuesta.
Ahora mismo tengo mi árbol creado como aparece en la imagen.
En el orden describo los hijos, el 01 es padre de 01.01 y este a su vez seria padre de 01.01.01 y de 01.01.02. No se si queda muy claro.
La tabla que se ve es un MSFlexGrid donde la ultima columna(Contenido) es modificable, cada vez que escribo algo automáticamente se me pone en check la primera columna.
Pero como se puede apreciar en la imagen, no queda muy claro a primera vista cuales son los hijos y cuales los padres. Por eso necesitaría un jerarquizado.
Un saludo.
Ahora mismo tengo mi árbol creado como aparece en la imagen.
En el orden describo los hijos, el 01 es padre de 01.01 y este a su vez seria padre de 01.01.01 y de 01.01.02. No se si queda muy claro.
La tabla que se ve es un MSFlexGrid donde la ultima columna(Contenido) es modificable, cada vez que escribo algo automáticamente se me pone en check la primera columna.
Pero como se puede apreciar en la imagen, no queda muy claro a primera vista cuales son los hijos y cuales los padres. Por eso necesitaría un jerarquizado.
Un saludo.
4
Visual Basic 6 / MSFlexGrid en Modo jerarquico
« en: Marzo 07, 2012, 06:11:48 am »
Buenas a todos,
Despues de volverme un poco loca buscando y buscando por internet, me presento con una pregunta que puede que sea absurda.
Necesito hacer un MSFlexGrid o un FlexGrid de manera jerarquica, es decir, del estilo al treeview. Se que se puede con un las relaciones de las bases de datos pero la jerarquía la tengo en una tabla donde indico cual es el padre y demás.
Entonces me gustaría saber como podría cargar esa jerarquía manualmente en vez de que se cree automáticamente con las relaciones de la base de datos.
Un saludo y mil gracias por todo.
Despues de volverme un poco loca buscando y buscando por internet, me presento con una pregunta que puede que sea absurda.
Necesito hacer un MSFlexGrid o un FlexGrid de manera jerarquica, es decir, del estilo al treeview. Se que se puede con un las relaciones de las bases de datos pero la jerarquía la tengo en una tabla donde indico cual es el padre y demás.
Entonces me gustaría saber como podría cargar esa jerarquía manualmente en vez de que se cree automáticamente con las relaciones de la base de datos.
Un saludo y mil gracias por todo.
5
Visual Basic 6 / Problema extraño entre 2 formularios y un MSFlexgrid
« en: Marzo 02, 2012, 08:46:03 am »
Buenas, vengo con un problema rariiisomo al cual no encuentro explicación y no he sido capaz de solucionar, a ver si alguien sabe porque pasa esto. Expongo el problema.
Tengo 2 formulario. Adjuntados como Formulario1 y Formulario2. En el formulario1 elijo un programa en el combobox superior. Cada programa tiene sus actividades por lo que pulse el botón gris Añadir para Añadir una nueva actividad que llama al Formulario2. Código del botón:
Codigo a la carga del Formulario2:
La función Rellenar actividades rellena el combobox C_Actividad con las actividades correspondientes con el programa seleccionado en el Formulario1.
FSolicitud es un datapiker y C_Estado en un combobox.
Bien, una vez que tengo mis datos de la actividad seleccionados pulso el botón Aceptar que lo que hace es pasar la información del Formulario2 al MSFlexGrid que hay en la parte inferior del Formulario1 (Al cual se se cargo una primera fila con las cabeceras al cargar el Formulario1).
Código del botón Aceptar:
Bien, pues aquí está el problema y es que si ejecuto este código normalmente, no solo no me pasa nada al MSFlexGrid M_Actividad del Formulario1 sino que también me borra el programa que habia seleccionado en el combobox. Pero si pongo un punto de parada en la condición If y voy linea por linea pero sin hacer ningún cambio ni nada ni ningún tipo de inspección, los datos pasan al Formulario1 perfectamente.
La verdad es que no se porque pasa esto, para mi es un autentico misterio. ¿Alguien sabe a que puede deberse esto?
Mil gracias por la ayuda
Un saludo
FORMULARIO1
FORMULARIO2
Tengo 2 formulario. Adjuntados como Formulario1 y Formulario2. En el formulario1 elijo un programa en el combobox superior. Cada programa tiene sus actividades por lo que pulse el botón gris Añadir para Añadir una nueva actividad que llama al Formulario2. Código del botón:
Código: [Seleccionar]
modoAsAc = "Añadir"
AsigActividad.Show 1
DoEvents
Codigo a la carga del Formulario2:
Código: [Seleccionar]
RellenarActividades
FSolicitud.Value = Now
If modoAsAc = "Editar" Then
Dim contador As Integer
For contador = 0 To C_Actividad.ListCount - 1
If C_Actividad.ItemData(contador) = Val(Asig_Centros.M_Actividad.TextMatrix(Asig_Centros.M_Actividad.Row, 0)) Then
Exit For
End If
Next contador
C_Actividad.ListIndex = contador
FSolicitud.Value = CDate(Asig_Centros.M_Actividad.TextMatrix(oMiGrid.Row, 2))
C_Estado.Text = Asig_Centros.M_Actividad.TextMatrix(oMiGrid.Row, 3)
C_Actividad.Locked = True
La función Rellenar actividades rellena el combobox C_Actividad con las actividades correspondientes con el programa seleccionado en el Formulario1.
FSolicitud es un datapiker y C_Estado en un combobox.
Bien, una vez que tengo mis datos de la actividad seleccionados pulso el botón Aceptar que lo que hace es pasar la información del Formulario2 al MSFlexGrid que hay en la parte inferior del Formulario1 (Al cual se se cargo una primera fila con las cabeceras al cargar el Formulario1).
Código del botón Aceptar:
Código: [Seleccionar]
If modoAsAc = "Añadir" Then
If validaractividad = 0 Then
Dim fila As Integer
fila = Asig_Centros.M_Actividad.Rows
Asig_Centros.M_Actividad.Rows = Asig_Centros.M_Actividad.Rows + 1
Asig_Centros.M_Actividad.TextMatrix(fila, 0) = Me.C_Actividad.ItemData(C_Actividad.ListIndex)
Asig_Centros.M_Actividad.TextMatrix(fila, 1) = Trim(C_Actividad.Text)
Asig_Centros.M_Actividad.TextMatrix(fila, 2) = Format(Me.FSolicitud.Value, "dd/mm/yyyy")
Asig_Centros.M_Actividad.TextMatrix(fila, 3) = Trim(Me.C_Estado.Text)
Asig_Centros.M_Actividad.Refresh
End If
Else
If modoAsAc = "Editar" Then
Asig_Centros.M_Actividad.TextMatrix(Asig_Centros.M_Actividad.Row, 0) = Me.C_Actividad.ItemData(C_Actividad.ListIndex)
Asig_Centros.M_Actividad.TextMatrix(Asig_Centros.M_Actividad.Row, 1) = Trim(C_Actividad.Text)
Asig_Centros.M_Actividad.TextMatrix(Asig_Centros.M_Actividad.Row, 2) = Format(Me.FSolicitud.Value, "dd/mm/yyyy")
Asig_Centros.M_Actividad.TextMatrix(Asig_Centros.M_Actividad.Row, 3) = Trim(Me.C_Estado.Text)
End If
Unload Me
End If
Solo la primera condición, el else no vale ahora.Bien, pues aquí está el problema y es que si ejecuto este código normalmente, no solo no me pasa nada al MSFlexGrid M_Actividad del Formulario1 sino que también me borra el programa que habia seleccionado en el combobox. Pero si pongo un punto de parada en la condición If y voy linea por linea pero sin hacer ningún cambio ni nada ni ningún tipo de inspección, los datos pasan al Formulario1 perfectamente.
La verdad es que no se porque pasa esto, para mi es un autentico misterio. ¿Alguien sabe a que puede deberse esto?
Mil gracias por la ayuda
Un saludo
FORMULARIO1
FORMULARIO2
Páginas: [1]