tmp := pocetak;
assignfile(pf,'c:\program files\cestitka\slideshow.out');
rewrite(pf);
while tmp <> nil do
begin
writeln(pf,tmp^.slika);
writeln(pf,tmp^.sx);
writeln(pf,tmp^.sy);
writeln(pf,tmp^.sh);
writeln(pf,tmp^.sw);
writeln(pf,tmp^.text);
writeln(pf,tmp^.tx);
writeln(pf,tmp^.ty);
writeln(pf,tmp^.th);
writeln(pf,tmp^.tw);
writeln(pf,tmp^.fcolor);
writeln(pf,tmp^.fname);
writeln(pf,tmp^.fsize);
writeln(pf,tmp^.fstil);
writeln(pf,tmp^.sleeping);
tmp:=tmp^.sledeci;
end;
closefile(pf);
tmp-pok na listu
pf-textfile
Svi elementi su mi tipa string,s tim sto su neki nastali f-jom inttostr. Kada otvorim fajl, neki stringovi su ok, a ovi nastali ovom f-jom su prazni (tj. postoji samo znak za novi red). Kako to da resim?
Drugi problem je kako da kopiram npr pera.mp3 sa jednog na drugo mesto? Ako moze primer za to.