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

Вниз

Считывание из text файла по одному символу   Найти похожие ветки 

← →
ExpertTech ©   (2004-08-19 14:22) [0]

Уважаемые Мастера!
Мне нужна помощь.
Имеется текстовый файл, примерно на 100-1000 строк, по 50-100 символов с строке.
Каким образом можно считывать из него данные по одному символу?
Если считывать всю строку, а потом посимвольно обрабатывать полученные данные, то получиться очень долго, а это не есть хорошо.

---

← →
TUser ©   (2004-08-19 14:25) [1]

file of char, tfilestream, f1, архив форума.

---

← →
Cosinus ©   (2004-08-19 14:25) [2]

1) Я не уверен, что получиться долго. Ты пробовал? Или там какие то хитрое сверхмедленное хэширование? ;)
2) Можно попробовать представить файл, как File of byte, и читать побайтно.

---

← →
PVOzerski ©   (2004-08-19 14:25) [3]

Ну, если считывать по символу из файла, выйдет еще медленнее и притом намного. Тогда уж залить содержимое файла целиком в массив и обрабатывать этот массив. А залить можно, например, работая с файлом как с нетипизированным.

---

← →
TUser ©   (2004-08-19 14:26) [4]

TFileStream будет работать быстро.

---

← →
Cosinus ©   (2004-08-19 14:27) [5]

>>TUser ©
Ну да, точно, что то я глупость сморозил... Если еще и TStream... то вообще летать будет ;)

---

← →
Семен Сорокин ©   (2004-08-19 14:29) [6]

var
 _i   : integer;
 _text: string;

with TStringList.Cteate do
try
 LoadFromFile("C:\temp\TextFile.txt");
 Delimiter := " ";
 _text := DelimitedText
finally
 Free
end;
for _i := 1 to Length(_text) do
// ...

---

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

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

Наверх

Память: 0.46 MB
Время: 0.036 c