Turbo Basic 1.1. Руководство пользователя


Turbo Basic 1.1. Руководство пользователя - стр. 274


  PRINT#  посылает  данные  в файл точно так, как PRINT посылает их на
  экран. Поэтому если вы не проявете специальную  заботу,  можно  бесполезно
  потерять  массу дискового пространства на пробелы, в которых нет необходи-
  мости, либо, что еще хуже, установить поля так тесно друг к другу, что  не
  сможете разобрать их по отдельности, когда позднее будет осуществляться их
  обработка заявлением INPUT#.
         PRINT#1  1,2,3
         посылает
         1 --------- 2-------- 3
  в файл #1. Вследствии существования 14-колонной принт-зоны между ли-
  терами в файл посылаются избыточные пробелы. С другой стороны,
         PRINT#1 1;2;3
  посылает  в файл 1 - 2 - 3 и вы не можете считывать отдельные число-
  вые значения из это записи, посколько для INPUT# требуются в качестве раз-
  делителей запятые. Самым верным способом разделения полей являются помеще-
  ние между ними запятых; например PRINT#1, 1","2","3 обеспечивает запись  в
  файл  1,2,3  в  виде пакета, в котором теряется наименьшее пространство, и
  который легко читается  заявлением INPUT#.
  Заявлением WRITE# поля разделяются запятыми автоматически.
         Пример  SUB делать файл
  ------- INPUT# открывает последовательный файл для вывода
    " с использованием WRITE# он записывается строками различно-
      го типа данных.
    " назначить файловую переменную #1
                OPEN "INPUT#.DTA" FOR OUTPUT AS #1
    "определить несколько переменных и возбудить их
           Строчная переменная $="Я вернусь"
                Целая % = 1000
                Плавающая точка. = 30000.1234
     " записать строку текста в последовательный файл
        WRITEN1, строчная переменная $, цела%, плавающая точка.
                 CLOSE 1    " закрыть файловую переменную
                 END SUB   " конец процедуры делать файл
                 SUB  читать файл
 Зта процедура открывает последовательный  файл  для  ввода.С



Начало  Назад  Вперед



Книжный магазин