Форум: "Начинающим";
Текущий архив: 2006.10.08;
Скачать: [xml.tar.bz2];

Вниз

Чтение файла в строку   Найти похожие ветки 

← →
BFG9k ©   (2006-09-19 15:43) [0]

Нужно прочитать содержимое файла в строку. Я не очень хорошо ориентируюсь в потоках, поэтому спрашиваю, как это можно сделать с помощью потоков (TStream) ?

---

← →
DVM ©   (2006-09-19 15:48) [1]

LoadFromFile() вроде бы, и лучше взять TFileStream

---

← →
Dmitrij_K   (2006-09-19 15:48) [2]

так?
function daj_text_from_file(const fileName:AnsiString):AnsiString;
var
 fs    : TFileStream;
 sizef : Integer;
begin
 fs     := nil;
 result := "";
 try
   fs    := TFileStream.Create(fileName,fmOpenRead);
   sizef := fs.size;
   SetString(result, nil, sizef);
   fs.Read(Pointer(result)^, sizef);
 finally
   fs.Free
 end;
end;

---

← →
guav ©   (2006-09-19 15:59) [3]

TStringStream.LoadFromFile

---

← →
Dmitrij_K   (2006-09-19 16:15) [4]

> TStringStream.LoadFromFile

В D7 нету

---

Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2006.10.08;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.45 MB
Время: 0.034 c