Repertoire courant

[karclopfr]

Bonjour,

J' ai fait un petit script avec quelques images. Pour charger les images je fais :
LoadSprite(0,"im/wk64.png")
...

J' ai créé un exécutable et je l' ai distribué.
Le problème est que pour certains ( en créant un raccourcis par exemple ) le logiciel plante car il ne trouve pas le repertoire "im".

Vous avez une solution ?

Merci

Seb

[Thyphoon]

Salut pour connaitre le repertoire courant
PB<4

Code : Tout sélectionner

;Repertoire courant
curdir.s=Space(250)
GetCurrentDirectory_(250,@curdir)
If Right(curdir,1)<>"\":curdir+"\":EndIf

PB4

Code : Tout sélectionner

;Repertoire courant
curdir.s=GetCurrentDirectory()
If Right(curdir,1)<>"\":curdir+"\":EndIf

[Dr. Dri]

Sinon pour forcer le dossier du programme a être le répertoire courant tu as ca:

Code : Tout sélectionner

Path.s = GetPathPart( ProgramFilename() )
SetCurrentDirectory(Path)

Dri