L'important comme a dis le sage c'est que les idées vivent et circulent. A non... Ca c'est peu être moi qui l'ai dis.
Pour le moment il marche super bien.
-
Tuxmouraille
- Messages : 1044
Après 15 années d’existence, le forum historique de Framasoft, ferme ses portes.
Pour les nostalgiques et les curieux, il reste toujours possible de consulter les discussions mais c’est maintenant le forum
Framacolibri qui prend la relève.
Si vous avez des questions, on se retrouve là-bas…
Dois je en déduire que tu préfère l'appellation L.A.I.T. ? puisque mon idée de base était d'intégrer L.A.I.T. dans S.U.C.R.E.Tuxmouraille a écrit:Je suis aussi pour. Et puis le C.A.F.E sans S.U.C.R.E c'est mieux pour le santé.
Tout d'abord, loin de moi l'idée de vouloir te sucrer S.U.C.R.E. les propriété de l'exe, la page web et le code source en témoignent. Ensuite pour ce qui est de regedit, j'ai trouvé d'où vient le problème, ce sera corrigé dans la prochaine version.Tuxmouraille a écrit:J'ai des remarques, quand j'ai commencé sucre, avant de me le faire sucrer, j'avais prévus de pouvoir appeler des applications installé sur le machine; regedit.exe, juste en tapant regedit.exe comme dans l'Exécuter de Windows.
en fait c'est déjà possible mais la fusion avec S.U.C.R.E. va changer la manière de faire (pour permettre plus de choses) donc je mettrais la doc à jour pour la prochaine version.Tuxmouraille a écrit:Il pourrait être intéressant d'avoir pour lait une commande pour lui indiquer d'ouvrir le fichier avec l'application secondaire.
Pour celle-ci, vu que tu es plus doué que moi pour faire des interfaces agréables, je vais te laisser la placer. Pour cela voici le code de ma version de travail (qui contient les corrections pour les points évoqués précédemment ) :Tuxmouraille a écrit:Se serait bien aussi d'avoir une fonction pour toujours l'avoir au premier plan, par l'intermediaire d'une checkbox.
;
; AutoHotkey Version: 1.x
; Langage: Français
; Plateforme: WinXP
; Auteurs: Tuxmouraille & Yann Perrin
;
; Utilité du Script :
; Reproduit la fonction "Executer" de Windows en privilégiant les programmes présents sur le même support
; Ouvre les fichiers selon les associations définies par C.A.F.E. si il est disponible
; Utilisable en ligne de commande
;
#notrayicon
#singleinstance force
#Include %A_ScriptDir%
fichierIntrouvable =
(
le fichier spécifié est introuvable.
)
SetWorkingDir,%A_ScriptDir%
StringReplace, inifile, A_ScriptName, .ahk, .ini
StringReplace, inifile, inifile, .exe, .ini
IniRead, CWD, %inifile%, configuration, dossiercafe, %A_ScriptDir%
SetWorkingDir, %CWD%
inifile = cafe.ini
Loop, %inifile%
inifile = %A_LoopFileLongPath% ;récupération du chemin complet de cafe.ini
Loop, %inifile%
CWD = %A_LoopFileDir% ;récupération du chemin complet du dossier de Café
if 0<1
{
;interface graphique
Gui, Add, GroupBox, x6 y0 w360 h80 , Exécuter
Gui, Add, Edit, x16 y20 w300 h20 vselectedapp, ; la barre affichant le chemin vers le paquet
Gui, Add, Button, x326 y20 w30 h20 gopen, ...
Gui, Add, Button, x281 y50 w75 h20 gGuiClose, Quitter
Gui, Add, Button, x206 y50 w75 h20 gGuiexecute, Exécuter
IfExist, %inifile% ; ajout d'une check box permettant l'utilisation des associations alternatives si cafe.ini est trouvé
Gui, Add, CheckBox, Right x16 y53 vassoBis, utiliser les associations alternatives
; Generated using SmartGUI Creator 4.0
Gui, Show, x406 y315 h87 w371, S.U.C.R.E. | Exécuter
}
else
{
; usage en ligne de commande
; sous la forme :
; sucre.exe [fichier 1] [fichier ...] [fichier n]
; si un des nom de fichier est remplacé par alternative, les suivants utiliseront les associations alternatives
section:="associations"
Loop, %0%
{
appselected := %A_Index%
if appselected = -alternative
section:="alternative"
else
Gosub execute
}
ExitApp
}
Return
open:
FileSelectFile, appselected, 3, ,, Tous les fichiers (*.*)
GuiControl,, selectedapp, %appselected%
return
#IfWinActive, S.U.C.R.E. | Exécuter
Enter::
Guiexecute:
GuiControlGet, appselected,, selectedapp
GuiControlGet, assoBis,, assoBis
section:="associations"
if assoBis
section:="alternative"
execute:
SplitPath, A_ScriptDir,,,,,lecteur
lecteur = %lecteur%\
SetWorkingDir, %lecteur%
trouve = 0
Loop, %appselected%, 1, 1
{
If (A_LoopFileName = appselected)
{
trouve = 1
filename = %A_LoopFileLongPath%
Gosub SucreAction
Break
}
}
If not trouve
{
filename = %appselected%
Gosub SucreAction
If ErrorLevel
MsgBox, %fichierIntrouvable%
}
return
SucreAction:
SetWorkingDir, %CWD%
IfNotExist, %inifile%
{
Run, "%filename%",,UseErrorLevel
return
}
;si le fichier est un raccourci, on en cherche la cible
SplitPath, filename,,, extension
IfEqual extension, lnk
FileGetShortcut, %filename%, filename
;on vérifie à quel programme il est associé
SplitPath, filename ,,, extension
IniRead, prog, %inifile%, %section%, %extension%, host
;si il s'agit d'un fichier url, on récupère l'url en question
IfEqual extension, url
IniRead, filename, %filename%, InternetShortcut, URL
dossier := InStr(FileExist(filename), "D")
progInexistant =
(
Le programme %prog%
designé pour ouvrir les fichiers %extension%
dans %inifile% est introuvable.
Pensez à mettre %inifile% à jour
)
If (prog = "host" or dossier)
{
Run, "%filename%",,UseErrorLevel
}
Else
{
IfExist, %prog%
Run, "%prog%" "%filename%",,UseErrorLevel
Else
{
MsgBox, %progInexistant%
Run, "%filename%",,UseErrorLevel
}
}
return
GuiClose:
ExitApp
;
; AutoHotkey Version: 1.x
; Langage: Français
; Plateforme: WinXP
; Auteurs: Lahire Biette (aka Tuxmouraille) & Yann Perrin (aka Le Yann)
;
; Utilité du Script :
; Reproduit la fonction "Executer" de Windows en privilégiant les programmes présents sur le même support
; Ouvre les fichiers selon les associations définies par C.A.F.E. si il est disponible
; Utilisable en ligne de commande
;
#notrayicon
#singleinstance force
#Include %A_ScriptDir%
fichierIntrouvable =
(
le fichier spécifié est introuvable.
)
SetWorkingDir,%A_ScriptDir%
StringReplace, inifile, A_ScriptName, .ahk, .ini
StringReplace, inifile, inifile, .exe, .ini
IniRead, CWD, %inifile%, configuration, dossiercafe, %A_ScriptDir%
SetWorkingDir, %CWD%
inifile = cafe.ini
Loop, %inifile%
inifile = %A_LoopFileLongPath% ;récupération du chemin complet de cafe.ini
Loop, %inifile%
CWD = %A_LoopFileDir% ;récupération du chemin complet du dossier de Café
if 0<1
{
;interface graphique
; Gui, Add, GroupBox, x6 y0 w360 h80 , Exécuter
; Gui, Add, Edit, x16 y20 w300 h20 vselectedapp, ; la barre affichant le chemin vers le paquet
; Gui, Add, Button, x326 y20 w30 h20 gopen, ...
; Gui, Add, Button, x281 y50 w75 h20 gGuiClose, Quitter
; Gui, Add, Button, x206 y50 w75 h20 gGuiexecute, Exécuter
; IfExist, %inifile% ; ajout d'une check box permettant l'utilisation des associations alternatives si cafe.ini est trouvé
; Gui, Add, CheckBox, Right x16 y53 vassoBis, utiliser les associations alternatives
Gui, Add, GroupBox, x6 y0 w360 h100 , Exécuter
Gui, Add, Edit, x16 y20 w300 h20 vselectedapp, ; la barre affichant le chemin vers le paquet
Gui, Add, Button, x326 y20 w30 h20 gopen, ...
Gui, Add, Button, x276 y50 w80 h20 gGuiClose, Quitter
Gui, Add, Button, x196 y50 w80 h20 gGuiexecute, Exécuter
IfExist, %inifile% ; ajout d'une check box permettant l'utilisation des associations alternatives si cafe.ini est trouvé
Gui, Add, CheckBox, x16 y50 w170 h20 vassoBis, association alternative
Gui, Add, CheckBox, x200 y75 w170 h20 , toujours au premier plan
; Generated using SmartGUI Creator 4.0
Gui, Show, x406 y315 h107 w372, S.U.C.R.E. | Exécuter
}
else
{
; usage en ligne de commande
; sous la forme :
; sucre.exe [fichier 1] [fichier ...] [fichier n]
; si un des nom de fichier est remplacé par alternative, les suivants utiliseront les associations alternatives
section:="associations"
Loop, %0%
{
appselected := %A_Index%
if appselected = -alternative
section:="alternative"
else
Gosub execute
}
ExitApp
}
Return
;
; AutoHotkey Version: 1.x
; Langage: Français
; Plateforme: WinXP
; Auteurs: Lahire Biette (aka Tuxmouraille) & Yann Perrin (aka Le Yann)
;
; Utilité du Script :
; Reproduit la fonction "Executer" de Windows en privilégiant les programmes présents sur le même support
; Ouvre les fichiers selon les associations définies par C.A.F.E. si il est disponible
; Utilisable en ligne de commande
;
#notrayicon
#singleinstance force
#Include %A_ScriptDir%
fichierIntrouvable =
(
le fichier spécifié est introuvable.
)
SetWorkingDir,%A_ScriptDir%
StringReplace, inifile, A_ScriptName, .ahk, .ini
StringReplace, inifile, inifile, .exe, .ini
IniRead, CWD, %inifile%, configuration, dossiercafe, %A_ScriptDir%
SetWorkingDir, %CWD%
inifile = cafe.ini
Loop, %inifile%
inifile = %A_LoopFileLongPath% ;récupération du chemin complet de cafe.ini
Loop, %inifile%
CWD = %A_LoopFileDir% ;récupération du chemin complet du dossier de Café
if 0<1
{
;interface graphique
; Gui, Add, GroupBox, x6 y0 w360 h80 , Exécuter
; Gui, Add, Edit, x16 y20 w300 h20 vselectedapp, ; la barre affichant le chemin vers le paquet
; Gui, Add, Button, x326 y20 w30 h20 gopen, ...
; Gui, Add, Button, x281 y50 w75 h20 gGuiClose, Quitter
; Gui, Add, Button, x206 y50 w75 h20 gGuiexecute, Exécuter
; IfExist, %inifile% ; ajout d'une check box permettant l'utilisation des associations alternatives si cafe.ini est trouvé
; Gui, Add, CheckBox, Right x16 y53 vassoBis, utiliser les associations alternatives
Gui, Add, GroupBox, x6 y0 w360 h100 , Exécuter
Gui, Add, Edit, x16 y20 w300 h20 vselectedapp, ; la barre affichant le chemin vers le paquet
Gui, Add, Button, x326 y20 w30 h20 gopen, ...
Gui, Add, Button, x276 y75 w80 h20 gGuiClose, Quitter
Gui, Add, Button, x276 y50 w80 h20 gGuiexecute, Exécuter
IfExist, %inifile% ; ajout d'une check box permettant l'utilisation des associations alternatives si cafe.ini est trouvé
Gui, Add, Button, x186 y50 w80 h20 , Alternatif
Gui, Add, CheckBox, x16 y77 w170 h20 , toujours au premier plan
; Generated using SmartGUI Creator 4.0
Gui, Show, x406 y315 h107 w372, S.U.C.R.E. | Exécuter
}
else
{
; usage en ligne de commande
; sous la forme :
; sucre.exe [fichier 1] [fichier ...] [fichier n]
; si un des nom de fichier est remplacé par alternative, les suivants utiliseront les associations alternatives
section:="associations"
Loop, %0%
{
appselected := %A_Index%
if appselected = -alternative
section:="alternative"
else
Gosub execute
}
ExitApp
}
Return
Utilisateur(s) parcourant actuellement ce forum : Aucun utilisateur inscrit