Ciao ragà ho una listwiev con 5 campi
uno dei quali contiene un percorso come faccio ad inserirlo in picture1.picture = ......
uso vb6.0
grazie mille ragà
Ciao ragà ho una listwiev con 5 campi
uno dei quali contiene un percorso come faccio ad inserirlo in picture1.picture = ......
uso vb6.0
grazie mille ragà
W Le Cozze Allattamate
Per la seconda riga, quarta colonna:
Ciao.codice:Dim StrX As String StrX = ListView1.ListItems.Item(2).SubItems(3) Picture1.Picture = LoadPicture(StrX)
funziona senti...Originariamente inviato da Mabi
Per la seconda riga, quarta colonna:
Ciao.codice:Dim StrX As String StrX = ListView1.ListItems.Item(2).SubItems(3) Picture1.Picture = LoadPicture(StrX)
però io ho più record nel listwiev con immagini diversi mi visualizza sempre lo stesso...come faccio a far si che per ogni record ne visualizzi una diversa?
W Le Cozze Allattamate
Cambia i riferimenti alla colonna e alla riga:
codice:StrX = ListView1.ListItems.Item(Y).SubItems(X)
nn mi funziona se metto x e y xkè?
mi dice ke la variabile non è definita
W Le Cozze Allattamate
help me... ho provato a dare un valore dichiarando le variabili x e y ma niente.....
W Le Cozze Allattamate
Ti faccio un esempio.
Ti serve: 1 Picture, 1Listview, 2 Command.
codice:Private Sub Command1_Click() Dim Cont As Integer If ListView1.SelectedItem.Index > 1 Then Cont = ListView1.SelectedItem.Index - 1 Else Cont = 1 End If ListView1.ListItems.Item(Cont).Selected = True Picture1.Picture = LoadPicture(ListView1.ListItems.Item(Cont).SubItems(1)) End Sub Private Sub Command2_Click() If ListView1.SelectedItem.Index < ListView1.ListItems.Count Then Cont = ListView1.SelectedItem.Index + 1 Else Cont = ListView1.ListItems.Count End If ListView1.ListItems.Item(Cont).Selected = True Picture1.Picture = LoadPicture(ListView1.ListItems.Item(Cont).SubItems(1)) End Sub Private Sub Form_Load() Const DirName = "C:\Documenti\" Dim FileName As String Dim Cont As Integer FileName = Dir(DirName & "*.jpg") Do Cont = Cont + 1 ListView1.ListItems.Add Cont, , FileName ListView1.ListItems.Item(Cont).SubItems(1) = DirName & FileName FileName = Dir Loop Until FileName = "" End Sub
grazie mille mabi..un altra cosa come faccio a passare delle variabili tra un form e l'altro..ovvero...
una volta fatta questa operazione..quando mi compare l'immagine se ci clicco sopra si aprirà un altro form dove ci sarà l'ingrandimento della stessa dovrei passargli il percorso del file...
un altra cosa per le dimensioni..posso dimensionare l'immagine in base alla grandezza del picture box?
grazieeee
W Le Cozze Allattamate
una volta aperta la seconda form puoi andare a leggere il percorso del file da quella con la listview, prima di chiuderla (sempre che tu debba farloOriginariamente inviato da *D-Planet*
come faccio a passare delle variabili tra un form e l'altro..ovvero...
una volta fatta questa operazione..quando mi compare l'immagine se ci clicco sopra si aprirà un altro form dove ci sarà l'ingrandimento della stessa dovrei passargli il percorso del file...)
oppure impostare una proprietà per la seconda form a cui assegnare il percorso prima di aprirla
io sono festosamente cicciottello :: e. cartman
t'amo senza sapere come, nè quando nè da dove,
t'amo direttamente senza problemi nè orgoglio:
così ti amo perchè non so amare altrimenti
Come ha detto Marzia, dipende tutto da quando carichi l'immagine.Originariamente inviato da MMarzia
una volta aperta la seconda form puoi andare a leggere il percorso del file da quella con la listview, prima di chiuderla (sempre che tu debba farlo)
oppure impostare una proprietà per la seconda form a cui assegnare il percorso prima di aprirla
Se apri il secondo form lasciando aperto anche il primo, allora vai a leggere il percorso nel secondo form.
Altrimenti se stai usando un modulo, potresti dichiarare qui la variabile come pubblica.
Per il discorso dell'immagine, potresti usare un Image con la Stretch su true.