Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

  1. #1
    Membre actif

    Homme Profil pro
    Développeur informatique
    Inscrit en
    novembre 2013
    Messages
    89
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Gironde (Aquitaine)

    Informations professionnelles :
    Activité : Développeur informatique
    Secteur : Administration - Collectivité locale

    Informations forums :
    Inscription : novembre 2013
    Messages : 89
    Points : 206
    Points
    206
    Billets dans le blog
    2

    Par défaut 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 : Sélectionner tout - Visualiser dans une fenêtre à part
    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
    Images attachées Images attachées  

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo