Invalid file type Error 63

0

Podaje zdjęcie przykładu który totalnie zerżnąłem z książki, wiem o co chodzi miałem zmodyfikować program jednak przy kompilacji, bez zadnych zmian wyskakuje błąd widoczny na dołączonym screenie, o co chodzi ?

user image

0

Jak na razie o nic, bo nie wiem czy tylko u mnie, ale obraz się nie wyświetla; Jak możesz to popraw to, a zdjęcie wrzuć do załącznika postu, po czym wstaw w treści postu {{Image:NazwaObrazu.rozszerzenie}};

No albo poszukaj co oznacza błąd o tym kodzie sam:
http://turbo-pascal.4coders.info/kurs-lista-bledow-podczas-wykonywania-programu.html

0

problem.jpg;

Pod błędem jest jeszcze ukryta linijka kodu var plik1,plik2 : file of byte

Liczę na pomoc, domyślam się, że chodzi niewłaściwy typ pliku, ale nie rozumiem dlaczego

0

Podstawowym problemem jest to że używasz Turbo Pascala co samo w sobie jest błędem. Polecam http://www.freepascal.org/ który jest pod Windę, wspiera dużo rzeczy których TP nie wspiera (np. rekordy jako wyniki funkcji - TP 7.0 nie wspiera [sam się zdziwiłem]).

Jak nie możesz zmienić kompilatora (co gorąco polecam) to pozostaje zabawa z typem tej zmiennej, spróbuj zmienić typ pliku na boolean albo na plik nieokreślony (odpowiednio file of boolean i file).

0

Błędem nie jest Turbo Pascal, to może być najwyżej zła decyzja (niekoniecznie pytającego).
Błędem jest zły typ zmiennej plik1.

W Pascalu są trzy typy „plikowe”: text, file i file of cośtam.

BlockRead() wymaga file.

0

Przy typie nieokreślonym czyli file; kompiluje się już. Dzięki ^^, ale to znaczy, że błąd jest umieszczony w książce, co mnie trochę frustruje.Skuszę się chyba na zmianę kompilatora, dodatkowo zmusza mnie do tego czynność wykonywana przy kazdym uruchomieniu programu. Muszę zignorować błąd 'disk is not ready in drive F', może ktoś miał podobny problem ?

Musiałbym przepisywać cały kod z TP bo nie mogę kopiowac

0

Musiałbym przepisywać cały kod z TP bo nie mogę kopiowac
możesz, ale już pomijając to, przecież plik jest na dysku, i możesz go otworzyć w Notatniku.

1 użytkowników online, w tym zalogowanych: 0, gości: 1