TAMANHO DO LISTVIEW E ATUALIZAR LISTVIEW

USUARIO.EXCLUIDOS 02/04/2005 11:05:26
#76324
Saudações galera, eu queria saber como é que eu faço para fazer o listview ficar no tamanho de acordo com os registros ?
e eu uso o listview para exibir dados de uma tabela de pedidos e queria que de acordo como vai sendo incerido os itens no pedido o listview fosse exibindo os dados.
Fico grato
MAIGUI 02/04/2005 11:28:11
#76327
amigo, se você quer dimensionar as colunas de um listview a medida que insere os dados para que os mesmos não fiquem aparecendo pela metade é só utilizar a função abaixo
voce pode colocá-la em um módulo.

Public Sub AdjustColListView(lvwListView As ListView, frmAppel As Form)
Dim lgFor As Long
For lgFor = 0 To lvwListView.ColumnHeaders.Count - 1
    Call SendMessage(lvwListView.hwnd, LVM_SETCOLUMNWIDTH, lgFor, LVSCW_AUTOSIZE)
    If lvwListView.ColumnHeaders(lgFor + 1).Width < _
        (frmAppel.TextWidth(lvwListView.ColumnHeaders(lgFor + 1).Text) + 180) Then
            lvwListView.ColumnHeaders(lgFor + 1).Width = _
            frmAppel.TextWidth(lvwListView.ColumnHeaders(lgFor + 1).Text) + 180
    End If
Next lgFor
End Sub

'utilize ela dessa forma
AdjustColListView NomeDoListView,Formulario

Espero ter entendido e ajudo, abraços
USUARIO.EXCLUIDOS 02/04/2005 11:36:16
#76329
Valeu brother essa tambem vai me ajudar, mas o que eu quero é tamanho do listview tipo de cima para baixo.
WEBMASTER 02/04/2005 13:00:25
#76339
Você quer ajustá-lo em relação a quantidade de linhas, é isto ????
USUARIO.EXCLUIDOS 02/04/2005 13:50:32
#76344
Exatamente, eu que não estava conseguindo explicar corretamente.
WEBMASTER 02/04/2005 15:05:01
#76357
Bom, de maneira simples e sem problemas, é só fazer uma conta de número de itens que voce tem vezes 16 pixels (passe o form que tem o listview para scalemode em pixels e voce pode facilmente fazer esta conta dai).
Tópico encerrado , respostas não são mais permitidas
Voltar