Delphi - база знаний


Текстовые файлы


Текстовые файлы



Текстовый файл отличается тем что он разбит на разные по длине строки, отделенные символами #13#10. Есть 2 основных метода работы с текстовыми файлами - старый паскалевский способ и через файловые потоки. У обоих есть преимущества и недостатки. Через потоки способ проще поэтому начнем с него.

Итак у всех потомков класса TStrings (TStringList, memo.Lines и т.п. ) есть методы записи и чтения в файл - SaveToFile, LoadFromFile. Преимущество - простота использования и довольно высокая скорость, недостаток - читать и писать файл можно только целиком.

Примеры.
1) Загрузка текста из файла в Memo:

 Memo1.lines.loadfromfile('c:\MyFile.txt');      

2) Сохранение в файл:

 Memo1.lines.savetoFile('c:\MyFile.txt');      


3) А вот так можно прочитать весь файл в строку:

Function ReadFromFile(FileName:string):string
begin 
With TStringList.create do   
try   
LoadFromFile(FileName);   
result:=text;   
finally   
Free;   
end;   
end;      






Начало  Назад  Вперед



Книжный магазин