Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.09.05;
Скачать: CL | DM;

Вниз

Считывание из 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;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.024 c
14-1092566825
Хыыы
2004-08-15 14:47
2004.09.05
Оценка программы


3-1092045143
eLVik
2004-08-09 13:52
2004.09.05
Подстановка в конструкторе Access


14-1092976591
Vlad Oshin
2004-08-20 08:36
2004.09.05
http://www.liveinternet.ru/images/attach/32750/1054196.jpg


3-1091863342
Алексей
2004-08-07 11:22
2004.09.05
объединение массивов данных???


1-1092762975
ctapik-net
2004-08-17 21:16
2004.09.05
Почему не работает TInternetExplorer не пойму