executer une chaine de caractere

executer une chaine de caractere - Delphi/Pascal - Programmation

Marsh Posté le 04-03-2004 à 17:21:20    

Bonjour,
 
Je cherche comment faire pour executer une chaine de caractère.
ex : x:='close'
j'execute x et le formulaire se ferme.
 
J'ai besoin de ceci car je réalise un programme en dynamique et j'ai un objet contact d'outlook (Contact := ovObjet.createitem(olcontactitem);) et je voudrais passer ses propriétées en dynamique que je récupére dans un fichier excel ainsi que sa valeur correspondante.  
Cela me donne donc :
 
for i:=2 to NbLigneExcel do//boucle pr tous les contacts
begin
 for j:=1 to NbProprieteExcel do //boucle pr ttes les proprieté
 begin  
  ?????('Contact.'+ProprieteRecupExcel+':= '''   +ValeurRecupExcel+''';')
 end;
 ?????.save; ou contact.save;
end;
 
 
pourquoi je n'écris pa directement contact.firstname :='récupération de la valeur
la raison est que je ne sais pas d'avance les propriètées que j'aurais et donc le rôle de créer une application en dynamique et non en dure
 
Merci de votre aide mais je pense que cela doit être assez compliqué à réaliser

Reply

Marsh Posté le 04-03-2004 à 17:21:20   

Reply

Marsh Posté le 04-03-2004 à 17:53:38    

Les noms des fonctions ne sont pas conservés à la compilations.
Tout ce qu'on peut appeler à partir d'une chaîne de caractère ce sont les propriétés "published" des objets descendant de TComponent.


---------------
mes programmes ·· les voitures dans les films ·· apprenez à écrire
Reply

Marsh Posté le 05-03-2004 à 13:07:22    

Je te remercie mais j'ai trouvé une solution .
En faite, toutes mes lignes de comande qui étaient des chaines de caractéres, je les écris dans un script que j'execute après.

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed