pliki tekstowe

0

w jaki sposob przejsc do x linii w pliku tekstowym i ja wyswietlic w edit??

0

Sposób najprostszy: TStringList

<font color="blue">[</span><font color="red">ADD</span><font color="blue">]</span>
dokładniej:
F1

0

a moze cos nie co dokladniej o tym TStringList bo jestem dopiero poczatkujacy.

0

Wszystko masz w helpie i encyklopedii na tej stronie... nie pytaj o takie podstawy tu...

0

można w sumie tak:

var
  f: textfile;
  s: string;
  i: integer;
begin
  AssignFile(f, 'plik.txt');
  Reset(f);
  while (not Eof(f)) do
    readln(f, s);
    if i = 12 {dwunasta linia z pliku} then break;
    inc(i);
  end;
  CloseFile(f);
  Edit1.Text := s;
end;

choć znacznie prostszym sposobem będzie rzeczywiście wykorzystanie TStringList:

var
  S: TStringList;
begin
  S := TStringList.Create;
  S.LoadFfomFile('plik.txt');
  Edit1.Text := S.Strings[12]; //dwunasta linia z pliku
  S.Free;
end;
0

ostatnie malutkie pytanko

a w jaki sposob usunac ta jedna linie z tego pliku textowego??

0
StringList.Delete(12);
StringList.SaveToFile('');

!!WSZYSTKO TO JEST W HELPIE DELPHI!!

<font color="green">[</span><font color="red">ADD</span><font color="green">]</span>

LIGA BRONI, LIGA RADZI, LIGA NIGDY CIĘ NIE ZDRADZI!!
(czy jakoś tak)
cóż za pełna zgodność :)

0

TStringList.Delete + F1

0

po odczytaniu:

s.delete(numer_linii);
s.SavetoFile(sciezka_do_pliku);
s.free;

i moja rada: programowanie polega na kombinowaniu.

heh... nie ma to jak trzy osoby piszące naraz... :P

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