elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Entrar al Canal Oficial Telegram de elhacker.net


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  .NET (C#, VB.NET, ASP)
| | | |-+  Programación Visual Basic (Moderadores: LeandroA, seba123neo)
| | | | |-+  [SRC][UC] ListViewEx 2.0 Reprogramado ( 05/01/2011 ) No Skiner
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: [SRC][UC] ListViewEx 2.0 Reprogramado ( 05/01/2011 ) No Skiner  (Leído 2,203 veces)
BlackZeroX
Wiki

Desconectado Desconectado

Mensajes: 3.148


I'Love...!¡.


Ver Perfil WWW
[SRC][UC] ListViewEx 2.0 Reprogramado ( 05/01/2011 ) No Skiner
« en: 5 Enero 2011, 11:09 am »

.
Version Anterior Go To ListView 1.0

  • Este Control Esta Re-Programado al 100% ademas de que el codigo esta 100% mas legible que el anterior.
  • Iconos Independientes en cada Celda, o Columnas ( Alineacion Izquierda Derecha )
  • Agregado Multiseleccion Con Shift y Control
  • Agregado FullRowSelection
  • Los Iconos se Pueden reajustar sus dimensiones sin que se reasigne la Coleccion de imagenes
  • Las celdas que no contengan Icono asignado no tienen espaciado inensesario
  • Texto En Negrita de forma independiente apra cada celda/Header
  • Texto En Cursiva de forma independiente apra cada celda/Header
  • Texto En Sub-raya dode forma independiente apra cada celda/Header
  • Font Name exclusivo para los TODOS los Header
  • Font Name exclusivo Para TODAS las Filas
  • Tag Independiente apra cada Fila
  • Tag independiente para cada Header
  • Eventos Por Regiones ( Zona Header, Zona Filas )
  • Eventos Habituales y Comunes
  • ToolTip para cada Fila de forma independiente
  • ToolTip para cada Header de forma independiente
  • Texto En Negrita de forma independiente apra cada celda/Header
  • Texto Colorido para cada celda de forma Independiente
  • Texto Alineado para cada celda de forma Independiente ( Izquierda Derecha o Centrado )
  • Texto Colorido para cada Header de forma Independiente
  • Texto Alineado para cada Header de forma Independiente( Izquierda Derecha o Centrado )
  • A Cada header sele puede asignar un color de forma independiente
  • Color Independiente a la Seleccion de Filas
  • Depende Solo de la Clase Cls_Imagelist 2.0 o superior ( Viene incluida en la descarga )
  • Dezplazamiento de una Cantidad Dada de columnas a una posicion X
  • Dezplazamiento de una Cantidad Dada de filas a una posicion X







<Download>

Dulces Lunas!¡.
.


« Última modificación: 6 Enero 2011, 01:27 am por BlackZeroX▓▓▒▒░░ » En línea

The Dark Shadow is my passion.
LeandroA
Moderador
***
Desconectado Desconectado

Mensajes: 760


www.leandroascierto.com


Ver Perfil WWW
Re: [SRC][UC] ListViewEx 2.0 Reprogramado ( 05/01/2011 ) No Skiner
« Respuesta #1 en: 7 Enero 2011, 03:52 am »

Muy bueno Black va tomando color, lo probe hay algunas sugerencias que he notado, que bueno seguramente ya las iras corrigiendo.

-la seleccion Hot deberia desaparecer cuando el muse sale del listview
-deberias poner el cursor (Size W E) cuando te posicionas sobre una columna para modificar su tamaño.
-Soporte para la rueda del Mouse. (aunque veo que aun no estas subclasificando)
-cuando se encuentra escaneando veo que se puede seleccionar donde no hay items, pero esto puede ser que no se refresca a tiempo
-cuando te moves con las flechas (Arriba , Abajo) la selección debería acompañar el ultimo o primer item según el caso.

hay algunas otras pero seguramente ya lo vas abras notado, yo creo que si seguís con este control un buen paso a seguir es implementar los scroll del sistema para no utilizar los controles de vb. son muy complicado este tipo de controles ya que hay muchas cosas a tener en cuenta, pero bueno dale para adelante y felicitaciones nuevamente.

Saludos.


En línea

BlackZeroX
Wiki

Desconectado Desconectado

Mensajes: 3.148


I'Love...!¡.


Ver Perfil WWW
Re: [SRC][UC] ListViewEx 2.0 Reprogramado ( 05/01/2011 ) No Skiner
« Respuesta #2 en: 7 Enero 2011, 07:48 am »

.
Gracias antes que nada.

Código:

-cuando se encuentra escaneando veo que se puede seleccionar donde no hay items, pero esto puede ser que no se refresca a tiempo


Lo que pasa es que se crea un Buffer ademas de que desactivo el la AututoActualziacion del Control es decir No se ven cambios. con este codigo lo veras mejor...

Aqui un ejemplo...

Código
  1.  
  2. Private Sub Command1_Click()
  3. Dim lng_ri&
  4. Dim lng_ci&
  5.    With LVE_List
  6.        Call .ClearAll '    //  Limpiamos TODO Filas y Columnas... Si es que existiesen con anterioridad!¡
  7.        .BackColor = 5120
  8.  
  9.        '   //  Desactivar la Auto-Actualziacion del Control
  10.        .RefreshAutomatic = False
  11.        '   //  .ColumnAdd() Nos retorna el Index de la columna agregada
  12.        '.ColumnCount = 3   '   //  Tambien se puede hacer Buffer de Columnas...
  13.        .ColumnAlign(.ColumnAdd("Columna 1", 190, vbWhite, vbWhite)) = NumeroAleatorio(0, 2)
  14.        .ColumnAlign(.ColumnAdd("Columna 1", 190, vbWhite, vbWhite)) = NumeroAleatorio(0, 2)
  15.        .ColumnAlign(.ColumnAdd("Columna 1", 180, vbWhite, vbWhite)) = NumeroAleatorio(0, 2)
  16.  
  17.        '   //  Creamos un Buffer o mejor dicho creamos de golpe todas esas filas (SwapPtr() ayuda mucho par alos Strings).
  18.        .RowCount = 32000          
  19.        MsgBox "Buffer Creado, Se empesaran llenar " & .RowCount & " con " & .ColumnCount & " Columnas."
  20.        For lng_ri& = 0 To .RowCount - 1
  21.            For lng_ci& = 0 To .ColumnCount& - 1
  22.                .RowSubItem(lng_ri&, lng_ci&, _
  23.                            RGB(NumeroAleatorio(0, 255), NumeroAleatorio(0, 255), NumeroAleatorio(0, 255)), _
  24.                            NumeroAleatorio(0, 2), _
  25.                            CBool(NumeroAleatorio(0, 1)), _
  26.                            CBool(NumeroAleatorio(0, 1)), _
  27.                            CBool(NumeroAleatorio(0, 1))) = lng_ri& & " - " & lng_ci&
  28.            Next lng_ci&
  29.        Next lng_ri&
  30.        '   //  activar la Auto-Actualziacion del Control
  31.        .RefreshAutomatic = True    
  32.        MsgBox "Finalizado"
  33.    End With
  34. End Sub
  35. Public Function NumeroAleatorio(MinNum As Long, MaxNum As Long) As Long
  36. Dim Tmp                                 As Long
  37.    If MaxNum < MinNum Then: Tmp = MaxNum: MaxNum = MinNum: MinNum = Tmp
  38.    Randomize: NumeroAleatorio = (MinNum - MaxNum) * Rnd + MaxNum
  39. End Function
  40.  
  41.  

Nota:    LVEX.RowCount = N  tiene un Bug y se arregla sustituyendo por este codigo:

Código
  1.  
  2. Public Property Let RowCount(ByVal vData As Long)
  3.    With PCVars.Rows
  4.        Dim i&, ii&
  5.        If vData& > 0 And PCVars.Columns.Count& > 0 Then
  6.            ReDim Preserve .Row(0 To vData& - 1)
  7.            For i& = .Count To vData - 1
  8.                ReDim Preserve .Row(i&).SubRows(0 To PCVars.Columns.Count& - 1)
  9.                For ii& = 0 To PCVars.Columns.Count - 1
  10.                    .Row(i&).SubRows(ii&).IconIndex = InvalidValueArray
  11.                Next ii&
  12.                .Count = i& + 1
  13.            Next i&
  14.            .Count = vData&
  15.            If PCVars.System.AutoRefresh Then Call Refresh
  16.        End If
  17.    End With
  18. End Property
  19.  
  20.  

Sin contar a RowText que hay me falto un SwapPtr()... pero no hay problemas con este ya que SwapPtr() solo lo uso para evitar las reasignaciones de memoria....

Dulces Lunas!¡.
« Última modificación: 7 Enero 2011, 09:02 am por BlackZeroX▓▓▒▒░░ » En línea

The Dark Shadow is my passion.
Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
Kaspersky Internet Security 2011 y Kaspersky Anti-Virus 2011 anunciados ....
Noticias
wolfbcn 1 2,096 Último mensaje 12 Junio 2010, 15:23 pm
por Songoku
[SRC][UC] ListViewEx
Programación Visual Basic
BlackZeroX 4 1,598 Último mensaje 17 Diciembre 2010, 20:27 pm
por BlackZeroX
GFI anuncia MailSecurity 2011
Noticias
wolfbcn 0 877 Último mensaje 24 Diciembre 2010, 21:13 pm
por wolfbcn
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines