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.