Jestem początkującym programistą więc nie wiem jak wczytać z *.txt linię po lini. Proszę pomóżcie.
Wyślij mi e-mail'a z odpowiedzią. PLIS
Mój e-mail: pol5@tenbit.pl
Nara
Jestem początkującym programistą więc nie wiem jak wczytać z *.txt linię po lini. Proszę pomóżcie.
Wyślij mi e-mail'a z odpowiedzią. PLIS
Mój e-mail: pol5@tenbit.pl
Nara
var
TF : TextFile;
S : String;
begin
AssignFile(TF, 'C:\Moje dokumenty\plik.txt');
Reset(TF); * otwarcie pliku
try
while not Eof(TF) do
begin
Readln(TF, S); * odczytanie pliku
Memo1.Lines.Add(S); * dodanie zmiennej do komponentu
end;
finally
CloseFile(TF); * zamkniecie pliku
end;
end;
Trzeba bylo czytac artykul o plikach w Delphi...--Pozdrawiam!
Adam Boduch
www.4programmers.net
Jeśli chcesz wczytac cały plik to:
Memo1.LoadFromFile('C:\Plik.txt)
{browar} --Pozdrawiam!
Delphi 5
xrocky@o2.pl
GG: 3615957