Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Поиск в файле на низком уровне / 4 сообщений из 4, страница 1 из 1
11.02.2013, 15:08
    #38146180
Макс_П
Макс_П
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Поиск в файле на низком уровне
Добрый день! Есть файл, который я открываю на низком уровне.
Поиск осуществляю так:
FSEEK(lnFileHandle, AT("ZZZ", aa)) && аа - считанный файл, ZZZ - то, что ищу
После того как нашёл, нужно найти выражение SSS.
Функция: FSEEK(lnFileHandle, AT("SSS ", aa), 1) ищет не с текущего положения указателя.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
11.02.2013, 15:18
    #38146208
Dima T
Dima T
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Поиск в файле на низком уровне
FSEEK() ничего не ищет. Он просто перемешает указатель в файле. HELP FSEEK()

AT("ZZZ", aa) - возвращает номер символа с которого расположена строка "ZZZ" в переменной aa.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
11.02.2013, 15:24
    #38146219
Dima T
Dima T
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Поиск в файле на низком уровне
Если файл прочитан в переменную aa то в ней и надо искать. Файл больше не нужен.
Примерно так:
Код: sql
1.
2.
3.
lnPosZ = AT("ZZZ", aa)
lnPosS = AT("SSS ", substr(aa, lnPosZ)) + lnPosZ
? lnPosZ, lnPosS


только проверки надо добавить на случай если нет таких подстрок.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
11.02.2013, 18:27
    #38146661
Макс_П
Макс_П
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Поиск в файле на низком уровне
Dima T, спасибо! Это то, что нужно.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Поиск в файле на низком уровне / 4 сообщений из 4, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]