---

Forum » » Création-Développement » » MHE Beta

---

Posté : 18-11-2013 08:30

Fichier envoyé

Bizarre cette histoire sous Morphos!!!

Il y a des commandes avec lesquels ça fonctionne et d'autres non... Est-ce que Arexx est le même sous morphos ? Est-ce qu'il y a des commandes Arexx inconnu sous Morphos?

Ma partie est ici :

RECHERCHENODE:
if xget(lp,active)~=2 then do
Test=""
Aide=xget(ListingDesCommandes,activeentry)
Test=Left(Aide,1)
If Test="@" then do
Test="at"
Aide=Test""Aide
end
AideModifier=compress(Aide,".()@")

CheminDuGuide="Hollywood:Help/"
FichierDuGuide="Hollywood.guide"
If AideGuide=1 then CheminDuGuide="Hollywood:Help/"
If AideGuide=1 then FichierDuGuide="Hollywood.guide"
if AideGuide=2 then CheminDuGuide="MUIRoyaleocs/"
if AideGuide=2 then FichierDuGuide="MUIRoyale.guide"
call domethod("app","ShowHelp","win",CheminDuGuide""FichierDuGuide,AideModifier)
end
return

J'avoue que les tests if sont lourdingue, mais j'optimise pas encore le code, je veux déjà que ça fonctionne aussi bien sous Morphos que sur AOS

Je pense que c'est peut être la commande Arexx "Compress" qui embête le monde... Vous en pensez quoi de ce bout de code?

Merci de l'aide et des retours

Pour ceux qui ont Morphos, l'archive est à la même adresse, même lien

---

Cet article provient de Le site des utilisateurs francophones actuels et futurs d'AmigaOS 4.x
https://amiga-ng.org/viewtopic.php?topic=1662&forum=14