LISTVIEW

USUARIO.EXCLUIDOS 24/12/2003 09:18:09
#2287
Olá pessoal, eu não estou conseguindo usar o listview, alguém pode me ajudar?
o que acontece é o seguinte, eu tenho um picturebox, e dentro desse eu tenho um listview, quando vou adicionar dados dentro do listview ocorre um erro que diz que a imagelist deve ser inicializada antes de ser usada.
Como posso resolver esse problema?
DANIELCPAETE 24/12/2003 21:59:58
#2356
Resposta escolhida
Coloca dois imagelist um commandbutton e um listview no form e roda este exemplo no imagelist1 voce coloca icones com o tamanho 32 x 32 e no 2 com 16 x 16

Private Sub Form_Load()
ListView1.ColumnHeaders.Add , , "Nome", ListView1.Width / 3
ListView1.ColumnHeaders.Add , , "Sobrenome", ListView1.Width / 3, lvwColumnCenter
ListView1.ColumnHeaders.Add , , "Apelido", ListView1.Width / 3 - 100
ListView1.View = lvwReport
ListView1.Icons = ImageList1 'Aqui define o imagelist para icones grandes 32 x 32
ListView1.SmallIcons = ImageList2 'Aqui define o imagelist para icones pequenos 16 x 16
End Sub

Private Sub Command1_Click()
Dim List As ListItem
Set List = ListView1.ListItems.Add
With List
.Text = "Daniel"
.SubItems(1) = "Melo"
.SubItems(2) = "Dboer"
.Icon = 1
.SmallIcon = 1
End With
End Sub
DANIELCPAETE 24/12/2003 22:02:26
#2357
So pra completar o numero que vem depois do icon e smallicom e o index do imagelist que vc quer que apareça
Tópico encerrado , respostas não são mais permitidas