Czy możliwe jest wczytanie określonej lini z pliku ( np. plik.txt) do memo/label???
chodzi mi o to, czy można zrobić to bez wczytywania całego pliku do jakiegoś memo i pamieci, tak aby plik 4MB nie obciążał systemów z 32 Mb RAMu??
Czy możliwe jest wczytanie określonej lini z pliku ( np. plik.txt) do memo/label???
chodzi mi o to, czy można zrobić to bez wczytywania całego pliku do jakiegoś memo i pamieci, tak aby plik 4MB nie obciążał systemów z 32 Mb RAMu??
var
Plik: TextFile;
i: Integer;
Linia: string;
begin
AssignFile(Plik, NazwaPliku);
Reset(Plik);
for i := 1 to NumerLiniKtórąChceszOdczytać-1 do
ReadLn(Plik);
ReadLn(Plik, Linia);
CloseFile(Plik);
end;
Hej Dryobates - wyjaśnij mi po co jest " ReadLn(Plik); " - ja zawsze od razu wale Readln(plik,s), gdzie s to string
???
Hej Dryobates - wyjaśnij mi po co jest " ReadLn(Plik); " - ja zawsze od razu wale Readln(plik,s), gdzie s to string
???
ReadLn przesuwa wskaźnik odczytu do następnej lini. W ten sposób masz odczytasz już tylko tą linię, która chcesz.
Dzięki Dryobates :D [browar]