Composant PascalScript : divers problèmes

Bjr à vous,

J'utilise les composants PascalScript dans un de mes projets.

Ajout de fonctions personnalisées: OK
Compilation et Lancement d'un script: OK

Je bute sur plusieurs problèmes:
- Dans le composant PSScriptDebugger: PSScriptDebugger1.Exec.Stop n'arrête pas le script (exemple: une boucle infinie dans le script). Je dois flinguer l'application;
- Je suis obligé de lancer le script pour accéder à la liste des fonctions disponibles
- Dans l'événement OnSelectionChange de la TListBox lsbPSFunctions qui contient la liste des fonctions personnalisées, événement censé afficher l'aide en ligne d'une fonction, je tombe sur une erreur 'This function can be only called within the OnUses event'

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21

procedure TCdrCalculette.DisplayHelpForProc(const MyProc: TPSRegProc); var p: LongInt; begin memoHelp.Clear; memoHelp.Lines.Add(MyProc.Name); p := MyProc.Decl.ParamCount; // ... end; procedure TCdrCalculette.lsbPSFunctionsSelectionChange(Sender: TObject; User: boolean); var MyProc: TPSRegProc; begin ShowMessage('DisplayHelpForProc()'); //try MyProc := PSScriptDebugger1.Comp.GetRegProc(lsbPSFunctions.ItemIndex); DisplayHelpForProc(MyProc); //except //end; end;

---

La documentation est très lacunaire à ce sujet.

PS: L'insertion d'images dans le présent éditeur de commentaires DVP nécessite Flash et fonctionne de manière erratique

Aucune réponse à ce post depuis 15 mois...

Citation:

---

Envoyé par JP CASSOU

Aucune réponse à ce post depuis 15 mois...

---

Bonjour ! Je suppose que personne ici ne connaît la solution à votre problème, faute d'utiliser les composants en question. J'avoue que pour ma part je ne les connais pas et que, soit dit en passant, je n'ai jamais trop bien compris à quoi servent les scripts en Pascal (je veux dire, quel genre d'utilisation on peut en faire).

Je crois qu'il ne vous reste plus qu'à nous faire un tutoriel. :)

Quant à votre question, peut-être pourrait-on aller la poser directement à l'auteur du projet, sur sa page GitHub ?

Bon courage !

hello,

Citation:

---

Envoyé par JP CASSOU

Aucune réponse à ce post depuis 15 mois...

---

:aie: sans code source complet ou projet de test il est difficile de répondre surtout si l'on utilise pas les composants. On ne peut pas facilement reconstituer tout un projet pour reproduire tes problèmes avec des composants que l'on ne connaît pas et d'après les petits morceaux de code que tu nous mets :mouarf:

Ami calmant, J.P

salut

as tu essayé avec un pause plutot qu'un stop

a priori dans le source de pascalscript le stop n'est pas la pour interrompre le traitement

Code:

---

1 2 3 4 5

procedure TPSDebugExec.Stop; begin FDebugMode := dmRun; inherited Stop; end;

---

et dans son parent

Code:

---

1 2 3 4 5 6 7 8 9 10 11

procedure TPSExec.Stop; begin if FStatus = isRunning then FStatus := isLoaded else if FStatus = isPaused then begin FStatus := isLoaded; FStack.Clear; FTempVars.Clear; end; end;

---

si tu regarde le pause

Code:

---

1 2 3 4 5

procedure TPSExec.Pause; begin if FStatus = isRunning then FStatus := isPaused; end;

---

et son enfant

Code:

---

1 2 3 4

procedure TPSDebugExec.Pause; begin FDebugMode := dmPaused; end;

---

Fait une pause et un stop ... je pense que ton processus seras remis a zero

hello,

Citation:

---

Envoyé par JP CASSOU

- Dans l'événement OnSelectionChange de la TListBox lsbPSFunctions qui contient la liste des fonctions personnalisées, événement censé afficher l'aide en ligne d'une fonction, je tombe sur une erreur 'This function can be only called within the OnUses event'

---

pour ce problème voir ici

Citation:

---

To extend the compiler, you must assign a function to the OnUses event handler of the compiler object. I assigned the function ExtendCompiler, shown below, on line 10 of the CompileScript function shown above. The OnUses event handler is called by the compiler during compilation and will cause compilation to fails if it returns false. I’m not sure why it is designed this way but trying to extend the compiler from outside the OnUses event handler will result in an exception.

---

Ami calmant, J.P