+ Rispondi al Thread
Visualizzazione dei risultati da 1 a 3 su 3

Discussione: Non si cambia cartella a caricamento immagine

  1. #1
    tizike non è in linea Scolaretto
    Post
    405

    Non si cambia cartella a caricamento immagine

    Ho una cartella RIMEDI piena di immagini
    Ho due controlli image
    Se io carico 1, 2 ,.... immagini dalla detta cartella RIMEDI in image1 funziona bene.
    codice:
    Private Sub command1_click()
    Dim Slash As String
    If Right(App.Path, 1) <> "\" Then Slash = "\"
    CommonDialog1.InitDir = App.Path & Slash & "Rimedi"
    CommonDialog1.FileName = App.Path & Slash & "Rimedi" & "\*.*"
    CommonDialog1.Filter = "Grafici|*.bmp;*.jpg;*.jpeg"
    CommonDialog1.ShowOpen
    Image1.Picture = LoadPicture(CommonDialog1.FileName)
    End Sub
    Se io adesso voglio caricare altre immagini, ma da c:\ nell'altra image2 e premo
    codice:
    Private Sub command2_click()
    CommonDialog1.InitDir = "c:\"
    CommonDialog1.FileName = ""
    CommonDialog1.Filter = "Grafici|*.bmp;*.jpg;*.jpeg"
    CommonDialog1.ShowOpen
    Image2.Picture = LoadPicture(CommonDialog1.FileName)
    End Sub
    non vengo condotto a c:\ come si dovrebbe ma ritorno sempre alla cartella RIMEDI.


    Sbaglio qualche impostazione?
    grazie

  2. #2
    L'avatar di AntonioG
    AntonioG non è in linea Moderatore Globale Ultimo blog: Commodore 64 e Codemotion
    Luogo
    Roma
    Post
    16,313
    Blogs
    5
    Con quale sistema operativo lavori? Con uno moderno non è consentito (ed è sconsigliato) lavorare sulla root di C: per problemi di autorizzazioni.

    Utilizza un'altra sottocartella.
    Avvisi generali e importanti, a pena CHIUSURA thread e/o BAN
    Il crossposting è vietato.
    Le richieste di "pappa pronta" sono vietate.
    Utilizzate i tag CODE per il codice.
    Leggere il Regolamento per chiarimenti PRIMA di creare nuovi thread.
    Utilizzare sempre i PM per comunicare con i moderatori.
    Non mi contattate in PM per problemi di software, usate il forum

  3. #3
    tizike non è in linea Scolaretto
    Post
    405
    Lavoro con Windows 10.
    Avevo impostato su c:\ per dare la possibilità all'utente
    di navigare tra tutte le cartelle e poter scegliere dove caricare .

    Ok. Grazie Antonio.
    Impostero un'altra cartella.

    Poiche mi pare giusto il mio codice mi meravigliavo
    che non funzionasse a dovere.

    Grazie.

+ Rispondi al Thread

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi