Алгоритмизация и программирование процессов на Fox

Информация - Компьютеры, программирование

Другие материалы по предмету Компьютеры, программирование

озможность облегчить процесс создания файла данных, т.е. предусмотреть создание файла данных со структурой заданной в программе, а не выбираемой самим пользователем, что полностью исключит возможные ошибки пользователя в задании имен полей файла данных, что в сою очередь может сказаться на корректной работе всей программы.

 

 

  1. Алгоритмы
  2. Создание двухуровневого светового меню

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

  1. Создание файла данных

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

  1. Чтение файла данных

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

  1. Добавление данных в файл данных

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

  1. Печать сведений о суммарной стоимости продукции заданного вида по каждому предприятию и о среднем выпуске этой продукции одним предприятием.

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

  1. Печать сведений о суммарной стоимости и суммарном выпуске каждой продукции.

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

  1. Печать упорядоченного по суммарной стоимости списка продукции пяти видов

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

  1. Программы
  2. Создание двухуровневого светового меню

* Командный файл иерархического меню MainMenu

set Talk off

set Color to n/W* && Выбор цвета экрана

Clear

 

* Описание массивов данных меню

Declare GenMenu(3,2), menuFile(3), menuZad(3), menuExit(2)

 

* Задание значений элементов массивов

GenMenu(1,1)=" Файл данных "

GenMenu(1,2)="Работа с файлом данных"

GenMenu(2,1)=" Задание "

GenMenu(2,2)="Задания на курсовой проект"

GenMenu(3,1)=" Выход "

GenMenu(3,2)="Выход из программы"

 

menuFile(1)="Создание"

menuFile(2)="Чтение"

menuFile(3)="Добавление"

 

menuZad(1)="Задание №1"

menuZad(2)="Задание №2"

menuZad(3)="Задание №3"

 

menuExit(1)="Выход в Fox"

menuExit(2)="Выход из Fox"

 

* Формировние главного меню

Do While .T.

set Color to gr+/g, gr+/b&& Установка цвета меню

Menu Bar GenMenu, 3

Read Menu Bar to L1, L2 && Вывод главного меню на экран

Do While L1 > 0&& открыть подменю, если выбран

&& любой пункт главного меню

* Формирование подменю

set Color to gr+/g, gr+/b&& Установка цвета подменю

Menu 1, menuFile, 3,3

Menu 2, menuZad, 3,3

Menu 3, menuExit, 2,2

Read Menu Bar to L1, L2&& Вывод меню на экран

set Color to n/W*&& Возврат к цвету экрана

 

* Обработка выбранного пункта меню

Do Case

Case L1=0

Exit&& Выход в панель главного меню

Case L1=1

Do Case

Case L2=1 && Выбрано действие Создание нового ФД

Do CreateFd

Case L2=2 && Выбрано действие Чтение данных

Do ReadFd

Case L2=3 && Выбра?/p>