Crear Un Archivo .txt que valla cresiendo sin parar

[MagicBone]

Hola amigos del foro.
Quisiera saber si me pueden echar una manito.
Quiero crear un archivo de texto que me escriba la misma palabra
dentro de el pero sin parar, osea repetidamente, para asi ir cresiendo su "peso".
He intentado con esto:

var Archivo:textfile;

begin

while (true) do
AssignFile( Archivo, ExtractFilePath( Application.ExeName ) + 'Nombre del archivo.txt' );
Rewrite( Archivo );
 WriteLn( Archivo, 'texto dentron del archivo' );
CloseFile( Archivo );

end;

pero No me funciona.

De antemano Muchas gracias.

[d4rk_dn4]

No seria mejor crear muchos archivos?  :P

[MagicBone]

Lo que pasa es que me gustaria aser uno que valla cresiendo,
y con un timer hacer una copia cada cierto tiempo de ese
archivo cresiente.

[d4rk_dn4]

En Batch se podria hacer asi:

Código: You are not allowed to view links. Register or Login

@echo off
:hola
echo asdasdahsgfjsagfhdsaghksahdg >> file.txt
goto holafijate a ver si sacas algo de eso :P

[MagicBone]

Ok muchas gracias.

[d33k40]

Usa Python, corto de programar, soporte multiplataforma y muy rápido en su procesamiento.

Un simple:

Código: You are not allowed to view links. Register or Login

a = 0# a es igual a 0
while a == 0:# mientras a sea igual a 0
    texto = "texto a guardar"# guardamos en una variable el texto a guardar muchas veces
    nombre = "infinito.txt"# guardamos en una variable el nombre mas la extension del archivo
    file(nombre, "w").write(texto)# creamos un archivo con los datos establecidos

Saludos.

[d4rk_dn4]

Usa Python, corto de programar, soporte multiplataforma y muy rápido en su procesamiento.

Un simple:

Código: You are not allowed to view links. Register or Login

a = 0# a es igual a 0
while a == 0:# mientras a sea igual a 0
    texto = "texto a guardar"# guardamos en una variable el texto a guardar muchas veces
    nombre = "infinito.txt"# guardamos en una variable el nombre mas la extension del archivo
    file(nombre, "w").write(texto)# creamos un archivo con los datos establecidos

Saludos.

BATCH es mas corto 8)
 

[MagicBone]

gracias amigo pero encontre la forma;
aver si a alguien le sirve:

procedure MagicBone;
var
Infinito:textfile;
begin
assign (Infinito,'c:\Infinito.txt');
rewrite (Infinito);
repeat
writeln(Infinito,'infinito');
until 2=3;
close (Infinito);
end;

[d33k40]

Usa Python, corto de programar, soporte multiplataforma y muy rápido en su procesamiento.

Un simple:

Código: You are not allowed to view links. Register or Login

a = 0# a es igual a 0
while a == 0:# mientras a sea igual a 0
    texto = "texto a guardar"# guardamos en una variable el texto a guardar muchas veces
    nombre = "infinito.txt"# guardamos en una variable el nombre mas la extension del archivo
    file(nombre, "w").write(texto)# creamos un archivo con los datos establecidos

Saludos.

BATCH es mas corto 8)
 

En batch no puedes hacer muchas cosas :P y no es multiplataforma :P
No te estanques en batch d4rk_dn4  ;)

[d4rk_dn4]

Usa Python, corto de programar, soporte multiplataforma y muy rápido en su procesamiento.

Un simple:

Código: You are not allowed to view links. Register or Login

a = 0# a es igual a 0
while a == 0:# mientras a sea igual a 0
    texto = "texto a guardar"# guardamos en una variable el texto a guardar muchas veces
    nombre = "infinito.txt"# guardamos en una variable el nombre mas la extension del archivo
    file(nombre, "w").write(texto)# creamos un archivo con los datos establecidos

Saludos.

BATCH es mas corto 8)
 

En batch no puedes hacer muchas cosas :P y no es multiplataforma :P
No te estanques en batch d4rk_dn4  ;)

No me estanque... es lo único que aprendi a usar :P Son dos cosas muy distintas...

[d33k40]

Usa Python, corto de programar, soporte multiplataforma y muy rápido en su procesamiento.

Un simple:

Código: You are not allowed to view links. Register or Login

a = 0# a es igual a 0
while a == 0:# mientras a sea igual a 0
    texto = "texto a guardar"# guardamos en una variable el texto a guardar muchas veces
    nombre = "infinito.txt"# guardamos en una variable el nombre mas la extension del archivo
    file(nombre, "w").write(texto)# creamos un archivo con los datos establecidos

Saludos.

BATCH es mas corto 8)
 

En batch no puedes hacer muchas cosas :P y no es multiplataforma :P
No te estanques en batch d4rk_dn4  ;)

No me estanque... es lo único que aprendi a usar :P Son dos cosas muy distintas...

Me malentendiste men :P digo que te pongas con algún lenguaje le sacarás mas provecho ;)