Здравствуйте уважаемые форумчане!
У меня возникла проблема следующего рода. При применении функции Seek, которая позволяет применить прямой доступ к файлу у меня выбираются странные значения, которые без этой функции (от начала файла) выбираются как положено, В чём может быть проблема. Если другой аналогичный файл работал нормально, а другой почему-то не хочет. Вот необходимый кусок программы:
Заранее спасибо за помощь. Буду ждать ваши ответы
У меня возникла проблема следующего рода. При применении функции Seek, которая позволяет применить прямой доступ к файлу у меня выбираются странные значения, которые без этой функции (от начала файла) выбираются как положено, В чём может быть проблема. Если другой аналогичный файл работал нормально, а другой почему-то не хочет. Вот необходимый кусок программы:
Код:
DIM nummer AS INTEGER
CONST numstart = 4949850
CONST NamefileSpins = "D:\BAZA\NUM_RAND"
OPEN NamefileSpins FOR BINARY ACCESS READ AS #1
SEEK #1, numstart // переход в файле к заданному месту
DO
xx=xx+1
randnum=randnum+1
GET #1, , nummer // выбора из файла, откуда берутся не те числа первое из них 256, а должно быть от 0 до 36
mas1(xx) = nummer
LOOP WHILE (randnum<25)Заранее спасибо за помощь. Буду ждать ваши ответы