como passo po ecra um arrayd e registo

[Sota]

boas.

Bom pessoal tou agr com o seguinte problema

ja tenho o programa todo feito e agr qd fui a por a parte de codigo para me mostrar o resultado final e dame erro diz que nao consegue ler ou escrever a variavel deste tipo alguem me podia dizer o que toua fazer mal:So codigo encontrasse nesse site.

http://www.rafb.net/paste/results/AC8dqc69.html

obrigado .

[Anjo]

Xiiii o pascal ta tão diferente...

Bem, aki vai 1 tentativa de 1 ajuda de 1 gajo k n olhava para pascal ha cerca de... sei la... 5/6 anos.

Tao é assim.. pelo k percebi keres limpar o conteúdo de um campo com ''. Mas acontece k o array é de um tipo de dados "horario" e não string. Ou seja... a solução deve passar +/- por isto:

hor[chr(ord( e )-x),c].passagem = ''

Tens que espicificar o campo k keres limpar.

Axo k é isto! Se n te serviu de grande ajuda xculpa la! n olho pa pascal ha anos e nem tao pouco tenho aki 1 compilador.

Boa sorte!

[Sota]

serviu alias axo que ja dei a volta isso agr tou com outro problema a funçao apagar n ta funcionar mto bem ou melhor n está a funcionar :S e a tabela nao parece bem estruturada falta espaços~

codigo:

http://www.rafb.net/paste/results/51HwXa64.html

[Anjo]

Se explicares o que pretendes como resultado final, ajudava... Porquê a validação ao apagar o comboio? Quais são as regras pa apagares 1 comboio qualquer?

[Sota]

secalkhar e melhor veres no site

www2.uninova.pt/~ca/IP

depois de ai estares vaia enuciado(do lado esquedo)

e é o trabalho3.

comp.

[Anjo]

Axo k o teu problema deve tar aki algures neste ciclo

while (hor[chr(ord( e )-x),c].passa ) do
   begin
           hor[e,c].para:=false;
           hor[e,c].passa:=false;
           hor[e,c].hora:='';
           x:=x+1;
   end;

Segundo akilo k percebi, tu tas a fazer de forma a que apenas possas apagar uma "estação final". Logo este ciclo, deve servir para limpar todas as posições até à paragem anterior. Se é isso que keres, deve ser alguma coisa desse genero:

while (hor[e,c].passa ) do
   begin
           hor[e,c].para:=false;
           hor[e,c].passa:=false;
           hor[e,c].hora:='';

           e:=chr(ord(e)-1);
           c:=chr(ord(c)-1);
   end;

Eu n tenho 1 compilador de pascal, logo n tenho cm testar. Mas deve ser alguma coisa deste genero. Se n resultar... sorry! Tentei ajudar!

Boa sorte com o trabalho.