[VB6] Programma per sfogliare immagini

[andrea toniolo]

vorrei fare un programma x guardare delle foto...
ho guardato come si fa qui .... l'unico problema e' che io le immagini nn le voglio mettere nella stessa directory del programma....ma vorrei che se do' il programma a qualcuno in formato rar, nel file rar ci dovrebbe essere dentro una cartella con tutte le immagini ma il programma non dentro questa cartella....
Picture1.Picture = LoadPicture(App.Path \ immagini & "\candice.jpg")
ho provato a fare cosi'...ma mi viene un errore....potete dirmi come fare?
PS: candice ee' il nome della foto.
ciao e grazie

[alka]

Usa titoli più significativi per le tue discussioni, in quanto "problemino" non fornisce alcuna indicazione utile, se non quella relativa al fatto che hai un problema, ma tutti quelli che postano un quesito qui ce l'hanno in fondo.

Correggo io il titolo; magari, prendi spunto per le prossime discussioni.

Ciao!

[andrea toniolo]

ok...scusami tanto...la prossima volta sara' fatto!...
cmq sapete rispondermi??
poi avrei anke un'altro problema ma apriro' un'altra discussione con il nome adeguato!....

[Brainjar]

Intanto per l'errore su :

Picture1.Picture = LoadPicture(App.Path \ immagini & "\candice.jpg")

dovrebbe essere, sempre che il path fisico giusto :

Picture1.Picture = LoadPicture(App.Path & "\immagini\candice.jpg")

Per il primo problema dipende molto da cosa metti nel .rar, infatti,
se utilizzi un programma per la creazione del pacchetto di setup,
non dovrebbero esserci problemi. Devi includere la dir delle
immagini e sicuramente ci sarà un'opzione per fare questo.
Se invece zippi tutto nel rar, allora dovrebbe bastare avere, come
già fai, una dir immagini sotto il path dell'eseguibile (App.Path).

Il problema sarà nel registrare gli eventuali componenti esterni,
OCX e DLL, che probabilmente il tuo programma 'usa' ma che
probabilmente non sono ne presenti e ne registrati sul PC del
tizio a cui dai il programma.


Ciao,

[andrea toniolo]

grazie....ho risolto quel problema....ma volevo anke sapere come faccio a mettere un file list box cn la stessa funzione di prima....
Private Sub File1_Click()
Load (App.Path & "\immagini")
End Sub
ho provato cosi' ma nn va.....
....se devo kiedere un'altra cosa sempre su VB6 ma ke nn centra niente con questo la chiedo qua o apro una nuova discussione?...
grazie...

[Brainjar]

Private Sub File1_Click() 
    Load (App.Path & "\immagini\" & File1.FileName) 
End Sub

Ciao,


PS: Apri pure un'altra discussione se non c'entra niente con questa.

[andrea toniolo]

ke codice metto nel picture box x vedere l'immagine che seleziono?

[andrea toniolo]

il codice che mi hai dato non funziona....quando esporto il programma in exe mi dice ke & e' sbagliato e mi evidenzia la & .....come se dovessi toglierla....xk?....non e' giusto il codice che mi hai dato?

[Brainjar]

Private Sub File1_Click() 
    Picture1.Picture = LoadPicture(App.Path & "\immagini\" & File1.FileName) 
End Sub

Ciao,

[Brainjar]

Andiamo con ordine :
1) Imposti il path di File1
2) Al click fai la loadpicture

Private Sub Form_Load()
    ' 1)Imposti il path di File1
    ' Questa istruzione la puoi inserire ovunque.
    File1.Path = "c:\Immagini\"
End Sub

Private Sub File1_Click()
    '2) Al click fai la loadpicture 
    Picture1.Picture = LoadPicture(File1.Path & "\" & File1.FileName)
End Sub

Ciao,