Executer du code texteRésolu

Question

Est-il possible d'ex&#233;cuter du texte (sous forme de string) qui, &#233;videmment, repr&#233;senterait un code Delphi correct? Exemple:
var
   Str: string;
   i: integer;
begin
   Str:= 'i:= 15';
   ExecuteTexte(Str);
   {L&#224;, la fameuse m&#233;thode}
   {Et hop, i=15}
end;

Je r&#234;ve peut-&#234;tre, mais une telle m&#233;thode existerait-elle?

WhiteHippo · Accepted Answer

Niki2001, Si tu veux executer du texte dans un applicatif, apr&#232;s compilation, ce n'est pas possible directement. 

Cependant tu peux toujours te tourner vers des solutions alternatives comme les scripts. G&#233;n&#233;ralement fournit sous forme de librairie DLL, ils permettent d'executer du code (fichier texte, string) apr&#232;s compilation de l'applicatif.

Pour le traitement des scripts en pascal object il existe paxscript ( 
http://www.paxscript.com/ )
Mais tu peux egalement te tourner vers VBScript, JScript, Perl, Python, TCL/Tk, .... 
Bref y'a le choix.

Cordialement.

retaks666 · Answer

oui tu peux utiliser methodaddress:






procedure TForm1.Button4Click(Sender: TObject);



Var Proc:Function(x,y:Integer):Integer Of Object;



begin



  @Proc:=MethodAddress(Edit1.Text);



  If @Proc<>Nil Then



    ShowMessage(IntToStr(Proc(2,4)));



  Else



    ShowMessage('M&#233;thode non trouv&#233;e !');



end;



trouv&#233; ici :

http://www.developpez.net/forums/viewtopic.php?t=242785&highlight=pointer+fonction

retaks666 · Answer

a et pour ton truc, il suffit que tu d&#233;clares un fonction avec deux
param&#232;tre, la variable, et la valeur a lui assigner, et tu dois pouvoir
te d&#233;brouiller.

Niki2001 · Answer

Oui, mais ce n'est pas du tout ce que je veux. En fait, je ne pense pas que &#231;a existe mais 'i:= 15' n'est qu'un basique exemple. J'aurais pu mettre 'Exit', 'ShellExecute('C:\Programme.exe')', ou n'importe quoi d'autre. L'id&#233;e, ce serait que Delphi ex&#233;cute le texte en question, comme si le programmeur l'avait lui-m&#234;me &#233;crit.

Niki2001 · Answer

Merci, WhiteHippo. Je me doutais que &#231;a ne devait pas &#234;tre possible. Je voulais en &#234;tre s&#251;r.

jepab · Answer

Si c'est possible. Voir http://www.dream-com.com/scripter.html

Executer du code texte

6 réponses

Votre réponse

Discussions similaires