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
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;