Pascal/Turbo Pascal - como mostrar el codigo fuente

   
Vista:

como mostrar el codigo fuente

Publicado por jenny (1 intervención) el 11/11/2007 00:59:31
hola...como puedo hacer para mostrar el codigo del programa mientra corre...¿¿??
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:como mostrar el codigo fuente

Publicado por Leandro (3 intervenciones) el 11/11/2007 02:49:58
hola, podes guardar el programa y ir leyendolo caracter por caracter y que te lo imprima en pantalla.. eso es con archivos... le das a un ciclo while not eof(*nombre del archivo*) previamente asignado no... y a ahi ir leyendo ... pero que pasa esto te va a mostrar como quedo la ultima vez que guardaste programa... y el programa que tarias haciendo no tendria mucho sentido :S no se si vos queres hacer que mientras se ejecute el programa que cumpla con alguna funcion ir escribiendo el codigo me parece que se te haria muuy extenso :S
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:como mostrar el codigo fuente

Publicado por Mechanic (181 intervenciones) el 13/11/2007 02:26:57
Hola Jenny!
A mí se me ocurre algo.
Supongamos que tu archivo fuente se llama prueba.pas
Como dijo Leandro, con ciclo while..:

uses crt;
var Arch: text;
Cadena : string;
begin
Assign(Arch,'C:\prueba.pas'); {Asigna la variable Arch al alrchivo prueba.pas}
Reset(Arch); {Prepara el archivo para lectura}
while not seekeof(Arch) do {mientras no llegue al final del archivo haga..}
begin
Read(Arch, Cadena); {Lee una línea del archivo y almacena en la variable}
writeln(Cadena); {Escribe en pantalla el contenido de la variable}
end;
ReadKey {Lee una tecla. Esto es para salir hasta que pulses una tecla}
end.

Hice este programita como un ejemplo. Puedes correrlo pero no olvides guardar antes el programa en C:\prueba.pas

Saludos!
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:como mostrar el codigo fuente

Publicado por Diego Romero (997 intervenciones) el 13/11/2007 05:15:01
Debe ser ReadLn(Arch, Cadena); y no Read();
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:como mostrar el codigo fuente

Publicado por Mechanic (181 intervenciones) el 15/11/2007 00:53:07
Tienes toda la razón.
Debe ser ReadLn(Arch, Cadena); y no Read();
Pero ahora soy yo el que tiene una duda.

Probé el programa y también funciona con read aunque no debería ser así.
Alguien sabe porqué?

Saludos!
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar