Главная страница
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.066 c
6-1088789111
Delphistik
2004-07-02 21:25
2004.09.05
работа с IP адресом


8-1087747242
Илья
2004-06-20 20:00
2004.09.05
MIDI - работа на низком уровне


1-1093010645
Gear
2004-08-20 18:04
2004.09.05
опять поток!


1-1093110577
Ragazor
2004-08-21 21:49
2004.09.05
Delphi & 1C


4-1090500778
юзверь
2004-07-22 16:52
2004.09.05
Как запустить процедуру, зная ее адрес??