problemas para crear archivo texto
 

tengo este simple ejemplo para crear a patir de una tabla de intebase un archivo de texto, pero no he conseguido hacerlo, el siguiente procedimiento a mi parecer crea el archivo tecto.txt y el escribe la linea hola, pero me marca el error I/O 103, estaré en lo correcto?.

procedure TForm1.Button1Click(Sender: TObject);
Var
t : TextFile;

Begin
assignFile(t, 'c:\texto.txt');
Reset(t);
write(t,'hola');
closeFile(t);
end;


end.

Hola,

ahora no recuerdo exactamente, pero creo que el problema está en que el reset te abre un fichero que ya existe, pero si no existe ta error. Prueba a cambiar el Reset por Rewrite, que crea y abre el fichero.

Saludos.

Hola

En lugar de :

reset(t);

Pon

rewrite(t);

Gracias amigos lo era rewrite en vez de reset