nafig tev Read(F); ?
pamēģini bez

Nmy rakstīja:

nafig tev Read(F); ?
pamēģini bez

Nekas nemainas, vaitad tas  Read(F) kauto šinī gadijumā maina?

P.S kļūda itkā ir otrajā rindiņā   Seek(F, 5)

AssignFile(F , 'D:/fails.txt');
Seek(F, 5) ;
Read(F, mainigais);
mainigais:='Teksts';
Seek(F, 5) ;
Write(F , mainigais);
CloseFile(F);

kkā tā, lai gan es delphi ne mū ne mē

{read moves to the next record, we have to
go back to the original record, then write}

Kā aprakstīts mainīgais F? Izskatās, ka Tu mēģini darboties ar teksta failu kā ar bināru.

http://www.delphibasics.co.uk/Article.asp?Name=Files

P.S. Failu neesi arī atvēris (palasi par Reset(), Rewrite(), Append()).

Vienalga viņam nepatīk tas  Seek(F , 5) :/

Nū F: TextFile;    Tā man ir.
P.S   Errors tam Seek(F, 5) saka: Incompatible Types.

Tādā gadījumā skaties pārējo daļu manam komentāram. Teksta failu apstrādei ir citas funkcijas (izlasi informāciju manis dotajā linkā).
Tavs links ir par bināriem failiem, kas tur pat ir īpaši uzsvērts...

Izlasiju līdz tai vietai, kur sākas : Reading and writing to typed binary files. Izlasiju arī ko šādu:

Notes:
Use SeekEoln or SeekEof to move the file pointer on a text file.

īsti nezinu, ko tagad iesākt, jo cik sapratu tā Seek(TexFile, rinda) komanda nemaz man nav vaidzīga.

ko jus cakareejat clilvēkam galvu...
lai lai pārlēktu n rindas uz priekšu no pašreizejās pozīcijas, dara tā:

[code]
for i:=1 to n do readln(f,s);
[/code]

i,n- integer, s -string, f -textfile;