Plik jednorodny - co to?

0

Witam,
Nie znalazłem info co to jest, a potrzebuję zapisać, a potem odczytywać z pliku jednorodnego. Byłbym wdzięczny o jakiekolwiek info. Mile widziany przykład : ]

0

Dzięki. Prawie wszystko mam, tylko źle mi zapisuje. Znalazłem jak zapisać typ rekordowy, ale ja mam zapisać drzewo BST do pliku, a w nim mam wskaźniki. Może lepiej wrzucę kod. W zapisz_plik_el próbowałem zapisać RDrzewo, bo z node się nie kompilowało. Proszę o pomoc : <

Drzewko
type RDrzewo = ^ node;
     node = record
     lewe, prawe:RDrzewo;
     imie, nazwisko:string;
end;

procedure zapisz_plik_el(d:RDrzewo);
var
   f:file of RDrzewo;
   pomoc:RDrzewo;
begin
   assign(f, 'dane_el.dat');
   rewrite(f);
   pomoc^.imie:='im';
   pomoc^.nazwisko:='na';
   pomoc^.lewe:=nil;
   pomoc^.prawe:=nil;
   write(f,pomoc);
   close(f);
end;

procedure czytaj_plik_el();
var
   f:file of RDrzewo;
   d:RDrzewo;
begin
   assign(f, 'dane_el.dat');
   rewrite(f);
   read(f,RDrzewo);
   writeln(d^.imie);
   close(f);
end;

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