Błąd z procedurką plików typowanych

0

Siemano.
Mam taką procedurkę opartą na moim rekordzie TSerwis i pliku rekordowym TSerwisFile.

procedure File2File(file_source,file_destiny: TSerwisFile);

Kompilator generuje błąd:
[Error] main.pas(72): File type not allowed here

Jak to obejść? :/

0

procedure p(var f1,f2:file);

0

Thx Flabra już działa.
Czy mógłbyś mi napisać czemu trzeba stosować "var"? Jak jest różnica między deklaracją parametrów z/bez tej instruckci??

0

Bo tak i koniec. Bo w file zapisane są wskaźniki do bufora oraz procedur/funkcji io. Możesz sobie zdefiniować własne, jeśli tylko chcesz i obsługiawać bufor jak sobie tylko zażyczysz. Referencje nie 'rozmnaża' zmiennej i w ten sposób niezależnie od miejsca odwołania się do file zawsze wywołujesz te same funkcje i w ten sposób nie dopuszczasz do różnego sposobu operowania na buforze.

// Tak wiem podstawowe to niby read/write, ale tak na prawdę one tylko wywołują inne. Reszta zresztą tyż (reset, rewrite, blockread / blockwrite...) Tfilerec/filerec - poczytaj o tym w helpie. Najfajniejsze w plikach jest to, że mozna je wykorzystac do dość nietypowych zadań :] Np. do obsługi ems, xms lub do np. grafiki, czy de/szyfrowania w locie. :]
// O var też poczytaj w helpie, tudzież w jakims podstawowym opisie języka.

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