Aqui mostro algumas funções para se manipular aquivo texto.

• Download arquivo_texto.pas
• Enviar nova versão

Esconder código-fonte

program arquivo_texto;

var
  Arquivo: Text;

begin
  Assign(Arquivo,'/home/daniel/arquivo.txt');
  Rewrite(Arquivo);
  Writeln(Arquivo, 'Teste de escrita em arquivo');
  Close(Arquivo);
end.

Equação do segundo grau

[Script Pascal] Verificando quantos Caracteres por Segundo tem a legenda

Numeros pitagoricos

ZCodEdit - Editor de textos com sintaxe HTML e Pascal

Manipulação de arquivos