Discussion :

[blackbird1]

salut
je suis nouveaux sur le forum mais pas sur le site
je veux savoir comment faire pour réaliser un programme qui affiche son code source.
je sais que c'est faisable en vbs :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
dim fso,file,vbscopy
Set fso = CreateObject("Scripting.FileSystemObject") 
Set file = fso.OpenTextFile(WScript.ScriptFullName, 1) 
vbscopy = file.ReadAll 
msgbox vbscopy

le programme affiche dans un messagebox le code source du programme que vous êtes en train d'éxécuter.
je veux savoir ça en delphi et en C.

svp répondez moi vite

et merci d'avance.

[skywaukers]

bonjour,

en fait tu le fais de la même manière qu'en vbs
vbs, c'est du scripting, donc tu déploie le source pour qu'il puisse s'executer, donc tu l'as.
Delphi ou C ou d'autres, ce sont des langages compilés, tu n'as pas besoin de déployer le source, mais l'objet généré pour qu'il s'execute. Alors tu peux afficher le contenu de l'objet généré, mais je doute que ça interesse beaucoup de monde
Donc pour faire ça, il faut faire comme vbs : déployer le source, même si il est inutile à l'execution.
Autre difficulté, en vbs, le script tiens souvent en un fichier sources, alors qu'en Delphi le projet peut tenir sur plusieurs fichiers sources liés lors dez la compilation.
Sinon pour afficher le contenu d'un fichier texte (ce que fait ta proc vbs en somme), regarde du côté des fonctions assignFile, reset, readln. Tu peux le faire en stream aussi, enfin il y a tout ce qu'il te faut dans l'aide de Delphi et dans la FAQ de ce site.

@++
Dany

[blackbird1]

merci skywaukers,
laisse tomber pour delphi.
si tu me disais comment faire pour C.

[LadyWasky]

merci skywaukers,
laisse tomber pour delphi.
si tu me disais comment faire pour C.

Delphi et C (ça vaut pour C++) sont des langages compilés, c'est-à- dire que tout le texte du cide que tu as tapé est transformé dans le langage du microprocesseur.

Donc une fois que le programme est construit et s'exécute, tu n'as plus que du langage machine contrairement au Basic, php, Javascript, etc...

Bref, qu'un programme puisse afficher son propre code source en Basic, d'accord, mais en Delphi ou C, c'est mission impossible.

Je suis absolument catégorique là-dessus.
Du coup il n'y a aucune chance pour que quiconque puisse t'aider.


Par contre, ce que tu peux faire, c'est d'inclure le fichier .dpr et les fichiers .pas (ça c'est pour Delphi), ou tes fichiers .h et .c (ou .cpp) dans les resources de ton éxécutable, tout comme on le fait avec un fichier wav par exemple. Et du coup, tu n'as plus qu'à charger ces fichiers (qui sont des fichiers textes) à partir des resources et de les afficher dans un TMemo (ça c'est pour Delphi).

Pour inclure un fichier en tant que resource dans un executable, va faire un petit tour dans la FAQ :

Comment insérer une ressource dans un exécutable ?

Bon dev