chemin de fichier appelé par un combo ...

Question

Bonjour,

J'ai un problème avec mon prog ...

Quand j'appele une image à l'aide d'un combo, chez moi ça marche ... 
Mais après avoir fait l'empaquetage .... quand je l'exécute sur un autre poste ça ne marche plus ... 
Je pensais que cela se faisait automatiquement lors de l'empaquetage ... 
Mon projet.vbp se situe dans le dossier "Calcad" comme le dossier "images" ....
S'agit-il d'une histoire de chemin relatif / absolu ?
Je précise que je débute en prog (comme en informatique) et donc il faut être simple si par bonheur vous avez une explication ...

Voilà comment j'appele mes images :

Private Sub Combo1_Click()
    Select Case Combo1.Text
        Case "Montage en X"
            Picture1.Picture = LoadPicture("E:\Visual Basic\Calcad\Images\Montage-X.bmp")
        Case "Montage en O"
            Picture1.Picture = LoadPicture("E:\Visual Basic\Calcad\Images\Montage-O.bmp")
    End Select
End Sub

Merci d'avance et bonne prog !!! 

cedemo

Renfield · Answer

Ne mets pas "E:\Visual Basic\Calcad" dans ton programme. Il existe une variable (App.Path) qui renvoies automatiquement le chemin de ton executable (ou de ton fichier Vbp quand tu es sous l'IDE)

Amusez-vous !  ;) 
Renfield - thomas_reynald@msn.com
Admin CodeS-SourceS

cedemo · Answer

Tu peux m'expliquer comment ca marche ?

cedemo

valtrase · Answer

Le plus simple et de remplacer E:\Visual Basic\Calcad par app.path qui te renvoi le répertoire de ton application
_______________________________________

Jean-Paul

Le Savoir n'a de valeur que s'il est partagé

cedemo · Answer

Ca ne marche pas :

Picture1.Picture = LoadPicture("app.path\Images\Montage-X.bmp")

cedemo

valtrase · Answer

app.path est une instruction VB elle ne doit pas être entre guillemets ....

Picture1.Picture = LoadPicture([g]app.path/g & "\Images\Montage-X.bmp")
_______________________________________

Jean-Paul

Le Savoir n'a de valeur que s'il est partagé

Renfield · Answer

concaténation....

SET Picture1.Picture = LoadPicture(app.path & "\Images\Montage-X.bmp")

Amusez-vous !  ;) 
Renfield - thomas_reynald@msn.com
Admin CodeS-SourceS

cedemo · Answer

Merci beaucoup !

Chemin de fichier appelé par un combo ...

7 réponses

Discussions similaires