Avant de passer à la version Pb 5.62, j'utilisais très souvent PureFile_CreateLink pour créer un raccourci de mon programme par le biais d'un code d'installation (SETUP.EXE). C'est à dire, au niveau du code de la setup, je crée le raccourci. Tout marchait si bien. Depuis que j'utilise Pb 5.62, la création du raccourci ne marche plus. Est-ce à cause de PureFile qui est absolète? (A Noter que j'utilisais PureFile 4.30, je suppose que ça ne marche que sous Pb 4.30), j'ai cherché sur le forum une version supérieure mais je n'ai rien trouvé même l'ancienne version est absente. Sinon, y a t - il peut être un autre moyen de créer un raccourci d'un exécutable sur le bureau?
Voici un aperçu du code de PureFile qui permet de créer le raccourci
Code : Tout sélectionner
;Ajouter le raccourci dans le menu DEMARRER...
PathStart$ = GetSystemFolder (#CSIDL_STARTMENU) + "\Programmes\" + ProgName$ + ".lnk"
LinkFileName.s = PathStart$
FileLinkedTo.s =PathExe$
Arguments.s = ""
WorkingDirectory.s=PathInstal$
Description.s = ProgDesc$
ShowCommand.l = #SW_SHOWNORMAL
IconFile.s = FileLinkedTo
IconIndexInFile.l = 0
PureFILE_CreateLink(LinkFileName, FileLinkedTo, Arguments, Description, WorkingDirectory, ShowCommand, HotKey, IconFile, IconIndexInFile)
;Ajouter le raccourci sur le BUREAU...
PathStart$=GetSystemFolder (#CSIDL_DESKTOPDIRECTORY) + "\" + ProgName$ + ".lnk"
PathOnly$=GetPathPart(PathExe$)
LinkFileName.s = PathStart$
FileLinkedTo.s =PathExe$
Arguments.s = ""
WorkingDirectory.s=PathInstal$
Description.s = ProgDesc$
ShowCommand.l = #SW_SHOWNORMAL
IconFile.s = FileLinkedTo
IconIndexInFile.l = 0
PureFILE_CreateLink(LinkFileName, FileLinkedTo, Arguments, Description, WorkingDirectory, ShowCommand, HotKey, IconFile, IconIndexInFile)
Merci