Es-ce que quelqu'un peut compiler ce petit code pour moi ?

Je n'ai pas le compilateur Panoramic, et je suis pleinement occupé par d'autres projets de programmation. Mais, pour pouvoir finaliser l'interface double environnement de KGF.dll (pour programmes Panoramic interprétés ET compilés), j'aurais besoin d'une version compilé du code suivant:

Code:: ' test_GetStringFromPanoramic.bas

dim s$, res%
s$ = "chaîne dans variable s$"
width 0,900
memo 1 : full_space 1 : width 1,width(1)/3 : bar_both 1
item_add 1,"mémo 1 ligne 1"
item_add 1,"mémo 1 ligne 2"
memo 2 : full_space 2 : width 2,width(1) : left 2,width(1) : bar_both 2
item_add 2,"mémo 2 ligne 1"
item_add 2,"mémo 2 ligne 2"
list 3 : full_space 3 : width 3,width(1) : left 3,left(2)+width(1)
item_add 3,"list 3 ligne 1"
item_add 3,"list 3 ligne 2"

dll_on "KGF.dll"
res% = dll_call1("test_GetStringFromPanoramic",adr(s$))
res% = dll_call1("test_GetStringFromPanoramic",handle(1))
res% = dll_call1("test_GetStringFromPanoramic",object_internal(2))
res% = dll_call1("test_GetStringFromPanoramic",handle(3))
' object_internal() avec LIST <== impossible !
end

Est-ce que uelqu'un a le compilateur et pourrait fabriquer ce la pour moi ? Merci à toutes les bonnes volontés !

Bonjour Klaus

J'ai une version du compilateur qui date d'aout 2017. geek

Elle est dispo sur l'un de mes webdav si tu la veux.

Par contre je ne sais pas si elle est toujours compatible avec les dernières versions de Jack ?!

J'ai téléchargé la dernière version de la DLL et en version interprétée cela fonctionne. Par contre avec la version compilée, il y a un bug ! pale

Bonne soirée Klaus Wink

Je pourrais toujours essayer... En tout cas, ta version du compilateur est antérieure aux modifications que Jack a apportées à l'attention de Pedro. Ce qui compte pour moi, c'est de pouvoir tester le passage d'une chaîne de caractères par ADR(s$). Et ça devrait être faisable avec ta version.

Alors, si tu veux bien - ça pourrait m'aider.

Sers toi Klaus ! C'est dans le dossier Éditeurs Panoramic.

Le compilateur est disponible à la fois sur Cloudme et Mydrive.

Comme d'habitude, les identifiants et mdp sont indiqués en bas de chacun de mes messages.

Au fait Klaus, l'adresse de ton second site mentionnée en bas de tes messages n'est plus fonctionnelle. drunken

Je l'ai téléchargé. Merci.

Mais comment ça marche ? J'ai chargé mon source dedans, je fais "Exécuter" ou la flèche, je récupère un message que la compilation est correcte, et puis c'est tout. Il a créé un fichier Panoramic.exe, mais lorsque je double-clique dessus, rien ne se passe.

J'ai introduit une commande MESSAGE juste avant DLL_ON pour rester pour le mmoent en 100 %panoramic, mais là encore - compilation correcte, puis plus rien.

Comment fait-on ?

Citation :: Mais comment ça marche ? J'ai chargé mon source dedans, je fais "Exécuter" ou la flèche, je récupère un message que la compilation est correcte, et puis c'est tout. Il a créé un fichier Panoramic.exe, mais lorsque je double-clique dessus, rien ne se passe.

Et bien c'est tout à fait ça. comme pour un EXEcutable.
Par contre comme je t'ai dis lors de mon test. Ton code passé au compilateur bugue !

Essais un code simple et tu verra que cela fonctionne correctement. Wink

Ca compile bien, génère Panoramic.exe, et c'est tout. Même en le lançant à la main, pas de réaction. Voici le code teste:

Code:: alpha 1 : caption 1,"TEST"
message "on y est"
end

Frustrant...

Heu... Cà serait pas le programme qu'il faudrait 'débloqué' !

Avec un clic de droite sur le fichier du compilateur et ensuite sur propriétés.
ET cliquer sur débloquer ou quelque chose comme ça... Wink

Je ne vois strictement rien d'anormal, sur ce fichier (Panoramic.exe). Aucun blockage, contrôle total pout tous les utilisateurs (et je suis administrateur). Je suis perplexe...

EDIT

Pire - le fichier Panoramic.exe généré porte la marque des programmes Panoramic interprétés, pas celle des programmes compilés ! La version est peut-être trop ancienne... Et je ne vois aucun lien pour télécharger une version plus récente...

Salut Klaus
Je viens de tester ton dernier code « TEST ».
Compilation OK.
Exécution OK.

Voici comment faire :
• Enregistrer le code dans le répertoire du compilateur, par exemple sous test.bas
• Compiler le code par l’éclair.
• Si tout va bien tu seras informé que la compilation est OK
• Ton exécutable test.exe se trouve dans le même dossier que celui du test.bas

Spoiler:

EDIT

Klaus a écrit:: Ca compile bien, génère Panoramic.exe, et c'est tout.

ACHTUNG !

Panoramic.exe n'est pas le fichier à exécuter, mais test.exe (c'est le nom sous lequel tu as enrégistré ton code)

Chez moi, j'ai bien le message comme quoi la compilation est correcte. Mais je n'ai pas test.exe - seulement un panoramic.exe. Et je n'ai pas l'affichage de mon message ni de la form 0 avec mon objet Alpha.

Puisque j' n'y arrive pas - pourrais-tu me compiler le programme suivant:

Code:: ' test_GetStringFromPanoramic.bas

dim s$, res%
s$ = "chaîne dans variable s$"
width 0,900
memo 1 : full_space 1 : width 1,width(1)/3 : bar_both 1
item_add 1,"mémo 1 ligne 1"
item_add 1,"mémo 1 ligne 2"
memo 2 : full_space 2 : width 2,width(1) : left 2,width(1) : bar_both 2
item_add 2,"mémo 2 ligne 1"
item_add 2,"mémo 2 ligne 2"
list 3 : full_space 3 : width 3,width(1) : left 3,left(2)+width(1)
item_add 3,"list 3 ligne 1"
item_add 3,"list 3 ligne 2"

dll_on "KGF.dll"
res% = dll_call1("test_GetStringFromPanoramic",adr(s$))
res% = dll_call1("test_GetStringFromPanoramic",handle(1))
res% = dll_call1("test_GetStringFromPanoramic",object_internal(2))
res% = dll_call1("test_GetStringFromPanoramic",handle(3))
' object_internal() avec LIST <== impossible !
end

Cela me permettrait de tester ma DLL avec un programme complié...

En principe tu trouvera ton test.exe dans le même dossier où tu as enregistré test.bas

Oui- mais non. Il n'y est pas.

J’ai compilé ton code.
C’est OK

Spoiler:

Mais, à l’exécution

Spoiler:

En fermant le programme

Spoiler:

Pourrais-tu me passer le fichier Test_DLL_Klaus.exe stp ? Pour ce ue j'ai à faire, je n'ai pas besoin de le recompiler, juste à debugger la DLL pour que ça marche avec cet EXE !

J’ai compilé le code suivant dont l’unique action est de charger KGF.DLL

Code:: dll_on "kgf.dll"

Compilation Ok
Exécution

Spoiler:

Tu trouveras sur mon webdav test_DLL_Klaus.zip qui contient test_DLL_Klaus.exe

Je te remercie de ton aide, Papydall. Mais ce qui m'intéresse, c'est la compilation du code suivant:

Code:: ' test_GetStringFromPanoramic.bas

dim s$, res%
s$ = "chaîne dans variable s$"
width 0,900
memo 1 : full_space 1 : width 1,width(1)/3 : bar_both 1
item_add 1,"mémo 1 ligne 1"
item_add 1,"mémo 1 ligne 2"
memo 2 : full_space 2 : width 2,width(1) : left 2,width(1) : bar_both 2
item_add 2,"mémo 2 ligne 1"
item_add 2,"mémo 2 ligne 2"
list 3 : full_space 3 : width 3,width(1) : left 3,left(2)+width(1)
item_add 3,"list 3 ligne 1"
item_add 3,"list 3 ligne 2"

dll_on "KGF.dll"
res% = dll_call1("test_GetStringFromPanoramic",adr(s$))
res% = dll_call1("test_GetStringFromPanoramic",handle(1))
res% = dll_call1("test_GetStringFromPanoramic",object_internal(2))
res% = dll_call1("test_GetStringFromPanoramic",handle(3))
' object_internal() avec LIST <== impossible !
end

Avec ça, je pourrai tester 2 points qui posent problème:
1. ce qui se passe avec DLL_ON (puisque cela lance une routine interne à la DLL qui ne s'exécute qu'à ce moment-là)
2. le passage de paramètres de type string vers la DLL.

Le fichier test_DLL_Klaus.zip c’est bien ce que tu demandes.
C’est le code test_GetStringFromPanoramic.bas

Tu trouveras également PANORAMIC_COMPILER_EDITOR.zip
Essaie-le, peut-être que ça te servira.

Merci, Papydall. En effet, c'est exactement ce qu'il me fallait. Maintenant, je peux travailler...

Le code passe bien sous l’interpréteur, mais sous le compilateur, la DLL ne se charge pas !!!!
(136)Impossible to load DLL

Bon débogage.

Un grand MERCI, Papydall ! Ton aide m'a permis de trouver et corriger les deux problèmes qui bloquaient. La nouvelle version est publiée (sans changement de la doc) et disponible sur mon site internet (via le lien dans ma signature).

Bien sûr, il faut rester prudent. J'ai fait ce que je pouvais pour que ces modifications s'appliquent à l'ensemble des fonctions de KGF.dll (près de 1200 fonctions, tout de même !). Mais un problème peut toujours subsister, et je le corrigerai aussitôt qu'il sera signalé.

Où se trouve la dernière version de la DLL ? Embarassed

La DLL actuellement disponible date du 18/06/2019 à 12 :48 Sad

et ça ne marche pas Crying or Very sad

Elle est accessible sur mon site, donc, soit par le lien KGF.dll dans la signature, soit en allant sur mon site, page Panoramic.

Je viens de le télécharger par le lien dans ma signature. Le fichier ZIP est bien daté du 22 Juin 2019, et la DLL qui s'y trouve, également, avec l'heure de 2h45.

Et je l'ai testée - ça marche. C'est dans mon WebDav que ce n'est pas à jour - et ce sera mis à jour seulement lorsque tout le monde aura validé cette version bi-environnement. Je garde la dernière version opérationnelle avant cette transformation, dans le WebDav, par sécurité.

Bonjour Klaus !

Je viens de télécharger la dernière versions de KGF et le code test_GetStringFromPanoramic.bas.

Tout fonctionne correctement à la fois avec l'éditeur et la version du compilateur d’août 2017 ! cheers

En attentant que Jack nous communique les dernières versions...

Bonne journée et bon week-end.

» Encore un petit programme de tracé a compiler
» Quel est le problème de ce petit code ? (Résolu)
» RESOLU : petit code à tester, trouver l'erreur^^
» Peut-être un bug de l'éditeur pour Jack
» peut-etre une amélioration pour les boutons ?