[ MoHicAn @ 04.03.2002. 21:48 ] @
Elem evo dela kod-a Code: assign(x,imefajla); reset(x); for i:=1 to linija do begin readln(x); end; while not eoln(x) do begin seek(x,pozicija); read(x,ch); write(ch); end; close(x); E sad problem je u sledecem kad definisem x kao x:text onda readln(x) radi (prebacuje pokazivac na novi red u fajlu x) ali zato seek ne radi i prijavljuje incompatible file types. Ali kad definisem x kao x: file of char onda mi radi seek al ne radi readln(x) i isto kaze incompatible file types ali ovaj put za readln(x). E sad jel zna neko zasto je ovo tako i ako neko zna elegantniji nacin za menjanje linije u fajlu (meni je ono sa for prvo palo na pamet al to sad i nije tolko vazno) BTW. kolko ja znam tip "text" jeste standardno ime koje je definisano sa Code: type text=file of char; PS: ovo je probano u delphiju 5 i u turbo pascalu i isto prijavljuje i u jednom i u drugom |