Colocar Resposta 
 
Avaliação do Tópico:
  • 0 votos - 0 Média
  • 1
  • 2
  • 3
  • 4
  • 5
Agenda em pascal
28-01-2011, 06:33 (Esta mensagem foi modificada pela última vez a: 28-01-2011 06:35 por Elias_REC.)
Mensagem: #4
RE: Agenda em pascal
(27-01-2011 23:32)iceball Escreveu:  Não eu nao estou a conseguir acabar a parte dos files preciso de ajuda..alguem que perceba de files me pode ajudar pff

Obrigado na mesma mas n e isso e mesmo dificuldade minha em files,..

Código:
{$I-}
Reset(telefone);
{$I+}
if IOResult <>0 then { Se IOResult for diferente de Zero, ocorreu um erro: }
begin     { Aqui tens que saber qual foi o erro e informar o utilizador. Provavelmente terminar a aplicacao, pedir outro nome de ficheiro, etc. }
  rewrite(telefone); { Se fazes novamente um rewrite, precisas de saber se ocorreu algum erro ou nao, tal como fizeste com o Reset.
end ;
{ Nenhum erro }

IOResult - Erro
2 - 'File not found';
3 - 'Path not found';
4 - 'Too many open files';
5 - 'File access denied';

Tens que procurar pelos outros; Se fores ao manual do Pascal, muito provavelmente encontras essa informacao.

Fiquem Bem!
Procurar todas as mensagens deste utilizador
Citar esta mensagem numa resposta
Colocar Resposta 


Mensagem neste Tópico
Agenda em pascal - iceball - 26-01-2011, 23:42
RE: Agenda em pascal - iceball - 27-01-2011, 23:32
RE: Agenda em pascal - Elias_REC - 28-01-2011 06:33
RE: Agenda em pascal - iceball - 29-01-2011, 01:42

Saltar Fórum:


Utilizadores a ver este tópico: 1 Visitante(s)