|
Реферат: Ввод и форматирование текста в Word (Программирование)
Министерство образования и науки Украины
Национальный аэрокосмический университет им. Н.Е. Жуковского ”ХАИ”
Кафедра 603
Реферат
по курсу “Методы и средства КИТ”
на тему “ввод и форматирование текста в Word”
Выполнил:
студент гр. П2-36
Зоркин К.А.
Проверил:
ст. преподаватель
Дужая В.В.
2003 г.
Оглавление
Введение 3
Ввод текста 4
Как вводить текст 4
Вставка специальных символов. 4
Выделение текста. 6
Способы выделения текста 6
Отмена и повторение выполненных действий 6
Редактирование текста 7
Редактирование выделенного текста. 7
Перемещение и копирование текста 7
Форматирование текста 9
Приемы форматирования текста 9
Задание параметров шрифта 9
Форматирование абзацев 11
Заключение. 15
Введение
Практически каждый пользователь компьютера встречается с
необходимостью подготовки тех или иных документов - писем, статей,
служебных записок, отчетов, рекламных материалов и т.д. Разумеется эти
документы можно подготовить и без персонального компьютера, например на
пишущей машинке. Однако с появлением персональных компьютеров стало
значительно проще и удобнее, а следовательно, и выгоднее подготовить
документы с помощью компьютеров.
При использовании персональных компьютеров для подготовки документов
текст редактируемого документа выводится на экран, и пользователь может в
диалоговом режиме вносить в него свои изменения. Все внесенные изменения
сразу же отображаются на экране компьютера, и потом при распечатке
выводится красиво и правильно оформленный текст, в котором учтены все
сделанные пользователем исправления. Пользователь может переносить куски
текста из одного места документа в другое, использовать несколько видов
шрифтов для выделения отдельных участков текста, печатать подготовленный
документ на принтере в нужном числе экземпляров.
Удобство и эффективность применения компьютеров для подготовки текстов
привели к созданию множества программ для обработки документов. Такие
программы называются редакторами текстов. Возможности этих программ
различны - от программ, предназначенных для подготовки небольших документов
простой структуры, до программ для набора, оформления и полной подготовки к
типографскому изданию книг и журналов (издательские системы).
Далее будут описаны такие основные элементы редакторов как ввод и
редактирование тестов на примере известного редактора текстов Microsoft
Word, который обладает очень широкими возможностями, но изучить которые не
составляет определенного труда.
Ввод текста
Как вводить текст
Для ввода текста достаточно подвести курсор к нужному месту документа
и набрать текст. В Word имеются 2 режима редактирования: режим вставки и
режим замены. В режиме вставки (используется чаще всего) все символы справа
от курсора сдвигаются, освобождая место для вводимого пользователем текста.
В режиме замены новые символы справа от курсора сдвигаются, освобождая
место для вводимого пользователем текста. В режиме замены новые символы
заменяют собой существующие. Когда этот режим включен, в строке состояния
выделяется индикатор ЗАМ (OVR). Для переключения между этими двумя режимами
следует нажать клавишу Insert или сделать двойной щелчок мышью на
индикаторе ЗАМ.
В Word новый абзац начинается после нажатия клавиши Enter и конец
абзаца отмечается символом абзаца. Символ абзаца (() является одним из
непечатаемых символов, входящих в документы Word. Непечатаемые символы
никогда не появляются в окончательном распечатанном варианте документа. На
экране они тоже обычно не видны. Однако вы можете сделать их видимыми
нажатием кнопки Непечатаемые символы (Show/Hide () на стандартной панели
инструментов.
[pic]
Также можно разрешить или запретить показ конкретных непечатаемых
символов. Для этого следует выполнить команду Параметры (Options) из меню
Сервис (Tools), выбрать вкладку Вид (View) и установить соответствующие
флажки в группе Непечатаемые символы (Nonprinting Characters).
Предупреждение. Избегайте случайного удаления символов абзацев
(символы удаляются независимо от того, видны ли они на экране или нет). Это
приводит к слиянию абзацев, разделяемых символом, при котором любое
форматирование второго абзаца пропадает.
Вставка специальных символов.
При необходимости вставить в документ разнообразные символы и буквы
иностранных алфавитов, отсутствующие на клавиатуре, воспользуйтесь
следующим способом:
1. Поместите курсор в место вставки символа.
2. Задайте команду Символ (Symbol) в меню Вставка (Insert).
3. В открывшемся диалоговом окне Символ (Symbol) выберите вкладку Символы
(Symbols) (рис. 1)
[pic]
рис.1. Вид диалога вставки символа
4. В списке Шрифт: (Font) выберите необходимый шрифт, затем с помощью мыши
выберите нужный символ и щелкните два раза левой кнопкой мыши. Символ
появится в документе там, где стоит курсор, словно вы только что набрали
его на клавиатуре.
5. После вставки нужных символов закройте окно диалога кнопкой Закрыть
(Close).
[pic]
Наконец, можно вставить в текст документа текущее время и дату - для
этого выполните команду Дата и время (Date And Time) из меню Вставка и
найдите в появившемся списке подходящий формат (рис. 2). Если установить
флажок Вставить как поле (Insert As Field), то Word автоматически будет
обновлять дату и время при каждой печати документа; в противном случае дата
и время останутся такими, какими они были в момент вставки.
рис. 2. Вставка текущей даты и времени.
Выделение текста.
Способы выделения текста
Большая часть приемов редактирования Word (включая технику
форматирования) требует, чтобы пользователь сначала выделил фрагмент
текста, а затем выполнил для него соответствующую команду. Выделение текста
расширяет действие команд Word.
Чтобы выделить фрагмент документа в обычном режиме:
1. Поместите указатель мыши в начало или конец выделяемого фрагмента. Далее
выполните одно из следующих действий.
2. Нажмите левую кнопку мыши и выделите фрагмент протаскиванием указателя в
нужном направлении или нажмите клавишу Shift и с помощью клавиш
управления курсором расширим выделение фрагмента в нужном направлении или
Нажмите клавишу Shift и щелкните мышью в конце выделяемой области.
Чтобы выделить фрагмент документа в режиме расширенного выделения:
1. Поместите указатель мыши в начало или конец выделяемого фрагмента.
2. Включите режим расширенного выделения нажатием клавиши F8 или двойным
щелчком мышью в поле ВДЛ (EXT) строки состояния. При этом буквы поля
становятся черными.
3. Теперь при последовательных нажатиях клавиши F8 происходит выделение
слова, предложения, абзаца, раздела и документа в целом. Чтобы уменьшить
область выделения (в обратном порядке: документ, раздел, абзац и т. д.),
нажмите при нажатой клавише Shift клавишу F8 нужное число раз.
В режиме “расширенного выделения” выделение фрагмента (отмена
выделения) выполняется аналогично выделению в обычном режиме, т.е. с
помощью мыши или клавиш управления курсором, но при этом нажимать клавишу
Shift не требуется.
Отключение режима расширенного выделения выполняется нажатием клавиши ESC
или двойным щелчком мыши в поле ВДЛ (EXT) строки состояния.
Отмена и повторение выполненных действий
[pic]
[pic]
Word представляет удобное средство отмены ошибочно выполненных
действий по редактированию. Чтобы отменить последнее выполненное действие,
достаточно выполнить команду Отменить ввод (Undo) меню Правка (Edit). Для
повторения последнего отмененного действия можно выполнить команду
Повторить ввод (Rredo). Указанные действия по отмене и повторению ввода
удобно выполнять щелчком мыши соответственно на левой и правой кнопках с
дуговыми стрелками на панели инструментов Стандартная (Standard).
Word запоминает в стеке до сотни последних выполненных действий по
редактированию, которые можно отменить или повторить заново. Щелчком
кнопкой мыши по одной из кнопок с треугольником можно просмотреть весь
список действий по редактированию или отмене редактирования. Выбрав элемент
в одном из списков и щелкнув по нему мышью, можно отменить или повторить
целую цепочку действий по редактированию, связанных с выбранным элементом.
Редактирование текста
Редактирование выделенного текста.
После выделения фрагмента текста можно пользоваться командами
редактирования или форматирования.
Прежде всего, если установлен флажок Заменять выделенный фрагмент при
вводе (Typing Replaces Selection) (команда Параметры в меню Сервис, вкладка
Правка), то выделенный фрагмент можно заменить обычным набором нового
текста. При вводе первой буквы весь выделенный фрагмент автоматически
удаляется, а новый текст вставляется на его место (если флажок Заменять
выделенный фрагмент при вводе сброшен, то выделенный текст остается на
месте, выделение пропадает, а новый текст вставляется перед тем, что было
выделено).
Чтобы удалить выделенный фрагмент, нажмите клавишу BACKSPACE или
DELETE или выполните команду Удалить в меню Правка.
Чтобы изменить регистр букв в выделенном фрагменте, можно выполнить
команду Регистр (Change Case) из меню Формат (Format) и установить
подходящую опцию в окне диалога Регистр (рис. 3). Кроме того, вы можете
нажать Shift+F3 (при необходимости несколько раз) и выбрать подходящий
вариант изменения регистра.
[pic]
рис.3. Окно диалога Регистр
Перемещение и копирование текста
Мышью можно быстро перемещать и копировать текст, это делается так:
1. Выделите текст.
2. Поместите указатель мыши на выделенный фрагмент (вид указателя изменится
с I на стрелку) и нажмите левую кнопку мыши.
3. Чтобы переместить текст, просто перетащите его в новое место. Чтобы
скопировать текст, во время перетаскивания держите нажатой клавишу Ctrl.
Текст можно перетащить в тот же самый или в другой документ Word (чтобы
переместить или скопировать текст в другой документ, на экране должны
быть видны окна обоих документов).
Данный способ работает только при установленном флажке Использовать
перетаскивание текста при правке (Drag-And-Drop Ntxn Editing). Флажок
находится на вкладке Правка (Edit) окна диалога, открываемого командой
Параметры из меню Сервис.
Текст также можно перемещать или копировать с помощью буфера обмена
(clipboard) - особого средства Windows для временного хранения текста или
графики. Это делается так:
1. Выделите текст.
2. Для перемещения выполните команду Вырезать (Cut) из меню Правка или
нажмите Ctrl+X. Текст будет вырезан (скопирован в буфер обмена и удален)
- то есть пропадет из документа и окажется перенесенным в буфер обмена.
3. Для копирования выполните команду Копировать (Copy) в меню Правка или
нажмите Ctrl+C. При этом текст останется в документе, а его копия будет
помещена в буфер обмена.
4. Установите курсор в той позиции, где хотите вставить вырезанный или
скопированный в буфер обмена текст. Это место может находиться в том же
самом или в другом документе.
5. Выполните команду Вставить (Paste) в меню Правка или нажмите Ctrl+V.
Текст из буфера обмена вставляется в документ.
В Word имеются еще две дополнительные возможности вырезать, копировать
и вставлять текст. Во-первых, можно нажать соответствующую кнопку на
стандартной панели инструментов:
[pic]
Вырезать
Копировать
Вставить
Во-вторых, чтобы вырезать или скопировать выделенный фрагмент текста,
можно щелкнуть на нем правой кнопкой мыши и выполнить команду Вырезать или
Копировать в контекстном меню.
Аналогично, чтобы скопировать текст из буфера, вы можете щелкнуть на
месте вставки правой кнопкой мыши и выполнить в контекстном меню команду
Вставить. Меню можно убрать без выполнения команды - для этого нажмите
клавишу ESC или щелкните мышью в документе.
После вставки текст не исчезает из буфера обмена. таким образом,
повторяя эту операцию, можно вставить в документ несколько копий текста.
Однако содержимое буфера обмена стирается, если в Word или в другой
программе происходит операция вырезания или копирования. Чтобы сохранить
текст в буфере обмена необходимо пользоваться для копирования или
перемещения приемами, в которых буфер не участвует (например, описанным
выше перетаскиванием мыши).
Форматирование текста
Приемы форматирования текста
В Word различают форматирование символов и форматирование абзацев.
Понятие “символ” включает в себя не только отдельный символ, но и слово,
фразу, а также фрагмент текста, не являющийся абзацем. При форматировании
символов как правило задаются параметры шрифта: гарнитура и размер,
начертание и тип подчеркивания, межбуквенное расстояние, скрытый текст и
др. При форматировании абзацев кроме параметров шрифта задаются параметры
расположения абзаца: выравнивание и отступы относительно полей страницы,
интервалы между абзацами и между строками внутри абзаца, а также положение
самого абзаца на странице.
Объект форматирования должен быть предварительно выделен. Параметры
форматирования сохраняются в символе конца абзаца. Если удалить символ
конца текущего абзаца, то абзац принимает параметры форматирования абзаца,
следующего за ним в документе. Новый абзац, образующийся при нажатии
клавиши ENTER, приобретает параметры форматирования предыдущего абзаца.
В Word реализованы два принципиально отличных способа форматирования
текста - прямое (или непосредственное) форматирование и форматирование с
использованием стилей. При прямом форматировании выделенному фрагменту
поочередно назначаются необходимые параметры оформления. Преимущество
стилевого форматирования заключается в том, сто выбранному объекту (обычно
это абзац) назначается целый набор параметров форматирования (стиль
форматирования), который формируется заранее и имеет уникальное имя. Стиль
форматирования может содержать параметры шрифта, абзаца, табуляции,
обрамления и заливки, кадра, нумерации и указание на используемый язык для
расстановки переносов и проверки орфографии. Стили форматирования могут
быть назначены выделенным абзацам или абзацу, внутри которого находится
курсор.
Далее будут описаны методы прямого форматирования текста, как-то:
задание параметров шрифта и форматирование абзацев.
Задание параметров шрифта
Задание параметров шрифта выполняется с помощью диалогового окна Шрифт
(Font) (рис. 4), вызываемого по команде Шрифт (Font) в меню Формат.
При открытии диалога Шрифт в нем показаны текущие атрибуты формата
выделенного текста. Если значение какого-либо атрибута изменяется в
выделенном тексте (например, некоторые символы - полужирные, а другие-
нет), то поле, соответствующее этому атрибуту, остается незаполненным (или,
если атрибут включается установкой флажка, маркер будет серого цвета).
[pic]
рис.4. Диалоговое окно Шрифт вкладка Шрифт
В списке Шрифт приведены названия всех шрифтов, установленных в вашей
системе. Обратите внимание на то, как Word отмечает различные типы шрифтов.
Шрифты принтера - это те, которые встроены в ваш текущий принтер Windows,
принятый по умолчанию; если изменить его, то состав шрифтов принтера станет
скорее всего другим. Каждый такой шрифт существует для ограниченного
количества размеров. Шрифты TrueType устанавливаются на уровне системы
Windows. Они являются масштабируемыми (то есть их размеры могу выбираться
произвольно) и позволяют получить высокое качество практически на любом
экране и принтере. Шрифты TrueType хорошо подходят в тех случаях, когда вы
хотите использовать символы в большом диапазоне размеров или когда документ
необходимо выводить на разных принтерах.
Установка флажков Верхний индекс и Нижний индекс поднимает или
опускает текст на стандартное расстояние и уменьшает размеры символов.
Чтобы просто поднять или опустить текст, не меняя его размера, выберите
вкладку Интервал, выберите из списка Смещение значение Вверх (Raised) или
Вниз (Lowered), а затем укажите в счетчике На (By) точное расстояние в
пунктах, на которое текст должен подняться или опуститься (1 пункт=1/72
дюйма).
Флажок Скрытый (Hidden) позволяет сделать текст невидимым на экране
или при печати документа. Для контроля отображения скрытого текста
применяется команда Параметры а меню Сервис. Скрытый текст будет виден на
экране только при установке флажка Скрытый текст (Hidden Text) на вкладке
Вид, а при печати - только при установке флажка Скрытый текст на вкладке
Печать.
Следует заметить, что флажки Малые прописные и Все прописные влияют
только на то, как текст выводится на экран или печать; они не меняют
регистра символов. Таким образом, если сбросить эти флажки, восстановится
исходное состояние прописных и строчных букв текста.
Если установить флажок Кернинг на вкладке Интервал (рис.5), Word будет
сокращать интервалы между некоторыми парами символов, чтобы придать тексту
более компактный (и профессиональный) вид. Word автоматически регулирует
кернинг символов, размер которых равен или превышает значение, указанное в
поле Пунктов и более (Points And Above). Кроме того, выбранный шрифт должен
относиться к семейству шрифтов TrueType (или PostScript, если вы
используете Adobe Type Manager).
[pic]
рис. 5. Вкладка Интервал окна диалога Шрифт
Наконец, вы можете нажать кнопку По умолчанию (Default), чтобы
изменить атрибуты формата символов, задаваемые по умолчанию, и привести их
в соответствие со значениями на вкладках Шрифт и Интервал окна диалога
Шрифт. Нажатие кнопки По умолчанию (и ответ Да на требование подтвердить
свое решение) назначает выбранные атрибуты стилю Обычный как документа, так
и шаблона, на базе которого создавался документ. В результате при каждом
создании нового документа на базе этого шаблона его текст будет обладать
новыми атрибутами формата (однако кнопка По умолчанию не влияет на другие
документы, которые были созданы ранее на основании этого шаблона).
Кроме того, основные параметры шрифта (гарнитуру, размер, начертание и
подчеркивание) можно задать с помощью кнопок панели инструментов
Форматирование (Formatting). (Если перед заданием параметров шрифта
выделить некоторый текстовый фрагмент, то выбранные параметры будут
применены к этому фрагменту. В противном случае новые параметры будут
распространяться на вновь вводимый текст. )
Форматирование абзацев
С помощью диалога Абзац можно установить любой из перечисленных в
таблице 1 атрибутов. Оно открывается командой Абзац в меню Формат или же
щелчком правой кнопки мыши в тексте и выполнением команды Абзац из
контекстного меню. На рис.6 изображена вкладка Отступы и интервалы (Indents
and Spacing) окна диалога Абзац, а на рис.7 - вкладка Положение на странице
(Text Flow). Как и при работе с окном Шрифт, выбор атрибутов формата в окне
диалога Абзац облегчается тем, что Word показывает образец текста,
отформатированного с применением выбранных атрибутов.
табл.1 Атрибуты формата абзаца
|Атрибут формата |Описание |
|абзаца | |
|Отступы и интервалы |
|Отступ |Горизонтальное расположение текста абзаца |
|(Indentation) |относительно полей документа |
|Интервал перед |Дополнительный вертикальный интервал, вставляемый |
|(Spacing Before) |перед абзацем |
|Интервал после |Дополнительный вертикальный интервал, вставляемый |
|(Spacing After) |после абзаца |
|Межстрочный |Вертикальное расстояние между строками текста в |
|интервал (Line |абзаце - например, одиночный или двойной интервал |
|Spacing) |или его точное значение |
|Выравнивание |Выравнивание текста абзаца: по левому, по правому |
|(Alignment) |краю, по центру, по ширине |
|Положение на странице |
|Запрет висячих |Предотвращает вывод одиночной последней строки |
|строк |абзаца в начале новой страницы или вывод первой |
|(Widow/Orphan |строки абзаца в конце страницы |
|Control)) | |
|Не разрывать |Все строки абзаца должны быть выведены на одной |
|абзац (Keep Lines|странице - другими словами, Word не производит |
|Together) |разрыва страниц в абзаце |
|Не отрывать от |Не позволяет Word вставлять разрыв страницы между |
|следующего (Keep |данным и следующим абзацем |
|With Next) | |
|С новой строки |Абзац выводится с новой страницы |
|(Page Break | |
|Before) | |
|Запретить |Если строки документа нумеруются, абзац исключается|
|нумерацию строк |из нумерации |
|(Suppress Line | |
|Numbers) | |
|Запретить |К абзацу не применяется автоматическая расстановка |
|автоматический |переносов |
|перенос слов | |
|(Don`t Hyphenate)| |
Левым отступом абзаца называется расстояние, на которое левая граница
текста абзаца отстоит от левого поля страницы (положительный отступ) или на
которое она заходит в левое поле (отрицательный отступ). Аналогично, правым
отступом абзаца называется расстояние, на которое правая граница текста
абзаца отстоит от правого поля страницы (положительный отступ) или на
которое она заходит в правое
[pic]
рис.6 Вкладка Отступы и интервалы в окне диалога Абзац.
поле (отрицательный отступ). Полями называют расстояние между областью, в
которой может располагаться текст, и краями бумаги; размер полей
устанавливается при настройке параметров страницы. Самый простой способ
освоить различные параметры отступа - менять их значения и следить за
изменениями в образце текста.
[pic]
рис.7 Вкладка Положение на странице в окне диалога Абзац
Межстрочным интервалом называется суммарная высота каждой строки
текста в абзаце.
Форматировать абзацы можно также с помощью панели инструментов
форматирования и линейки (если последней нет в окне, выполните команду
Линейка (Ruler) в меню Вид).
Для форматирования абзацев используются следующие кнопки панели
инструментов форматирования:
Выравнивание по правому краю
Выравнивание по левому краю Увеличение левого отступа
[pic] [pic]
Выравнивание по центру Уменьшение левого отступа
Выравнивание по ширине
Для установки отступов абзаца можно пользоваться линейкой
Перетащите для установки
левого отступа первой строки
[pic]
Перетащите для установки
левого отступа всех строк
Перетащите для установки левого отступа
всех строк, кроме первой строки
Заключение.
Microsoft Word - это универсальный редактор текстов и средство
подготовки оригинал-макетов. Вот только некоторые из функций,
поддерживаемых Word :
использование множества различных шрифтов (размеров и начертаний) символов
и различных способов их выделения (полужирные, курсивные, подчеркнутые
символы и т.д.)
указание параметров абзацев текста и страниц документа
печать верхних и нижних колонтитулов произвольного вида
автоматическое формирование оглавления и различных видов указателей
оформление таблиц и абзацев “ бок о бок “
включение рисунков (графических файлов)
размещение абзацев (например, рисунков) в любом месте страницы (остальной
текст при этом может огибать рисунок)
Опытные пользователи очень ценят такую возможность Word, как стиль.
Word позволяет записать так называемую таблицу стилей все параметры
наиболее часто используемых видов оформления текста: абзацев, символов и
разделов документа. Если сделать это, то затем любому участку текста можно
будет присвоить один из “стандартных” видов оформления с помощью 1-2
нажатий клавиш. Это не только значительно ускоряет набор документа, но и
повышает гибкость его оформления.
Средства проверки орфографии, грамматики, а также применение словаря-
тезауруса улучшает стиль изложения. В Word включена поддержка более чем 30
файловых форматов различных текстовых редакторов. Это означает, что вы
можете создать взять документ, подготовленный в другом тестовом редакторе
(например, в WordPerfect), и продолжить работу с ним в Word. Многие
пользователь также применяют Word для создания и ведения списков почтовой
рассылки и для составления писем электронной почты. Ко всем описанным
возможностям Word можно добавить возможность настройки среды Word - меню,
панели инструментов, сочетания клавиш и режим просмотра документа.
Реферат на тему: Ведение реляционной БД на яз. CLIPPER 5.02
МОСКОВСКАЯ ГОСУДАРСТВЕННАЯ ТЕКСТИЛЬНАЯ АКАДЕМИЯ
им. КОСЫГИНА
Кафедра ИТ и ВТ.
К У Р С О В А Я Р А Б О Т А
Тема : “Разработка програмного обеспечения, ведение базы данных и
получение ведомости с частичными суммами.“
по курсу: “Алгоритмические языки и технология програмирования “
Выполнил:
Пономарев А.Н.
гр.42-96
Руководитель:
доц. Стрельников Б.А.
асс. Степанова О.П.
МОСКВА
1998
2. ЗАДАНИЕ:
ТЕМА КУРСОВОЙ РАБОТЫ: Реализация алгоритма обработки данных
и ведения реляционной базы данных.
ИСХОДНЫЕ ДАННЫЕ:
Индивидуальное задание с описанием базы данных и получаемой в
результате ее обработки ведомости с частичными и полными суммами.
ПЕРЕЧЕНЬ ПОДЛЕЖАЩИХ РАЗРАБОТКЕ ВОПРОСОВ ( СОДЕРЖАНИЕ РАСЧЕТНО-
ПОЯСНИТЕЛЬНОЙ ЗАПИСКИ )
1. Разработать структуры файлов и создать макет базы данных.
2. Разработать алгоритм обработки данных для получения ведомости.
3. Составить и отладить программу получения ведомости.
4. Разраб. формы экранных кадров и меню для ведения базыданных.
5. Составить и отладить программу реализации экранного кадра для
просмотра основных(ой) таблиц(ы).
6. Дополнить программу п.5 возможностью удаления и добавления
строк в таблицу.
7. Дополнить программу п.5 возможностью изменения инф-ии в
таблице.
8. Составить и отладить процедуры оперативного ведения справочников
базы данных.
9. Разраб.единую систему меню для ведения базы данных и ее
обработки с целью получения
ведомости.
10. Разработать систему интерфейса пользователя (подсказки о
клавишах, на которые предусмотрена реакция системы и помощь
пользователю).
ПЕРЕЧЕНЬ ГРАФИЧЕСКОГО МАТЕРИАЛА
1. Структуры файлов базы данных и их заполнение для тестового примера.
2. Макеты экранных кадров и состав подсказок для пунктов ожидания
ввода от пользователя.
3. Ведомость, получаемая в результате выполнения тестового примера.
МАТЕМАТИЧЕСКИЕ МОДЕЛИ
Обеспечить модульную структуру программы.
( программа состоит из нескольких PRG-файлов, включая PRG-файл
типовых утилит. Каждый PRG-файл состоит из функций или процедур,
снабженных комментариями. )
ТЕХНИЧЕСКИЕ СРЕДСТВА:
ПЭВМ IBM
Система программирования Clipper 5.2
3. ИНДИВИДУАЛЬНОЕ ЗАДАНИЕ.
Имеются файлы: АА - нормативы профилактики оборудования,
ВВ - профилактики и СС - состав оборудования
АА: 1. Идентификатор типа станка ВВ: 1. Инвентарный номер станка
2. Наименование типа станка 2. Вид профилактики
3. Норма кол-ва дней между 3. Дата профилактики
профилактиками 4.
Идентификатор записи
СС: 1. Инвентарный номер
2. Идентификатор типа станка
Выявить все случаи превышения нормативных интервалов между
профилактиками и вывести их в выводной файл DD:
1. Инв.№
2. Фактическое кол-во
дней
между профилактиками
3. Нормативное кол-во дней
4. Иден-тор
записи пред. проф-ки
5. Иден-тор записи след. проф-ки
На принтер вывести ведомость, упорядоченную по убыванию кол-ва просроченных
дней:
Нарушения норм техобслуживания
Инв.№ /Тип Дата/Вид пред.проф-ки Дата /Вид след.проф-ки Просрочено, дней
Инв.№ /Тип Дата /Вид пред.проф-ки Дата /Вид след.проф-ки Просрочено, дней
Инв.№ /Тип Дата /Вид пред.проф-ки Дата /Вид след.проф-ки Просрочено, дней
. . . . . . . . . .
Общее кол-во дней просрочки СУММА
4.Анализ обработки БД для её получения :
а) По какому файлу проводится главный цикл обработки ?
Главный цикл обработки в подпрограмме vedom - (п.п., которая осущест-
вляет выявление всех случаев превышения нормативных интервалов между
профилактиками, вывод их в выводной файл “DD”, а также осуществляет выдачу
ведомости на принтер) проводится по файлу bb.dbf .
б) Как он должен быть упорядочен ?
Он должен быть упорядочен в хронологическом порядке.
Пример:
index on bb->invnom + dtoc(bb->dateprof) to bb0001
Справка:
Синтаксис:
INDEX ON TO
INDEX - команда обработки базы данных, которая создает файлы,
содержащие индексы базы данных на основе значения аргумента . При использовании индексного файла записи базы данных
обрабатываются в последовательности, заданной ключевым выражением, однако
физический порядок следования записей базы данных остается неизменным.
INDEX обеспечивает последовательность записей,
упорядоченную по значениям ключевого выражения. Для ключей типа
CHARACTER - в соответствии со значением ASCII кода каждого символа
внутри строки, для ключей типа NUMERIC - в соответствии с числовым
порядком, для ключей типа дата - в хронологическом порядке и для
логических - считается, что истина (.Т.) - более высокого порядка.
Memo-поля не могут быть индексированы.
в) Применяются ли фильтры ?
Хотя команда SET FILTER делает так, что файл в рабочей области
выглядит состоящим из подмножества записей, на самом деле
последовательно обрабатываются все его записи.
Фильтры не применяются, т.к время работы с фильтрованной и
нефильтрованной рабочей областью оказывается одним и тем же.
г) Имеются ли связи ”хозяин-слуга” и по каким полям ?
В подпрограмме vedom имеются связи.
Пример:
а) set relat to bb->invnom into cc
Связь по полю “invnom”.
б) set relat to cc->idst into aa additive
Связь по полю “idst”.
в) set relat to dd->invnom into cc additive
Связь по полю “invnom”.
............................................................................
...................................................
5.Структура dbf-файлов (имя, тип, формат, каждого поля ):
a) Структура файла aa.dbf :
IDST NAMEST NORMA
1 Строгальный 25
2 Сверлильный 15
3 Токарный 20
...........................................................................
...........................
Имя Тип Длина
IDST Символ 3
NAMEST Символ 12
NORMA Число 3
б) Структура файла bb.dbf :
INVNOM VIDPROF DATEPROF IDZAP
24 Смазка 09-01-98
1
4 Смазка 09-01-98
2
231 Смазка 09-01-98
3
2 Смазка 09-01-98
4
626 Смазка 09-01-98
5
323 Смазка 09-01-98
6
626 Регулировка 01-02-98 7
323 Регулировка 28-01-98 8
2 Регулировка 29-01-98 9
231 Регулировка 28-01-98 10
4 Регулировка 19-01-98
11
24 Регулировка 18-01-98 12
626 Чистка 31-03-98
13
323 Чистка 15-04-98
14
2 Чистка 01-04-98
15
231 Чистка 20-03-98
16
4 Чистка 10-03-98
17
24 Чистка 02-04-98
18
...........................................................................
...........................
Имя Тип Длина
INVNOM Символ 3
VIDPROF Символ 12
DATEPROF Дата 8
IDZAP Символ 3
в) Структура файла сс.dbf :
INVNOM IDST
323 1
626 1
4 2
231 3
24 2
2 3
...........................................................................
...........................
Имя Тип Длина
INVNOM Символ 3
IDST Символ 3
г) Структура файла dd.dbf :
INVNOM FKDN NORMA IDZAPPP IDZAPSP
2 62 20 9
15
231 51 20 10
16
24 74 15 12
18
323 77 25 8
14
4 50 15 11
17
626 58 25 7
13
............................................................................
.........................
Имя Тип Длина
INVNOM Символ 3
FKDN Число 3
NORMA Число 3
IDZAPPP Символ 3
IDZAPSP Символ 3
............................................................................
.....................................................
6. Принципы подготовки данных для тестового примера и заполнения
исходных данных.
Эти данные были выбраны произвольно - “из головы”:
1) Идентификатор типа станка
2) Инвентарный номер станка
3) Вид профилактики
4) Наименование типа станка
Идентификатор записи в файле bb.dbf заполнялся по убыванию (от 1 до 18),
где 1- первая запись, а 18- последняя.
Норма кол-ва дней между профилактиками была выбрана произвольна.
Дата профилактики выбиралась так, чтобы норма кол-ва дней между
профилактиками была превышена для всех видов профилактик.
............................................................................
...................................................
7. Система меню.
а) Какие экранные кадры ?
Экранный кадр № 1:
Московская государственная текстильная академия ( МГТА )
БАЗА ДАННЫХ Нарушение норм техобслуживания:
Курсовая работа по курсу :
"Алгоритмические языки обработки данных и технология программирования"
студента гр 42/96
Пономарёва А.Н.
*************************
Руководитель:
доц. Стрельников Б.А.
асс. Степанова О.П.
Сразу приступить к работе с Базой Данных
Заново построить все индексы Базы Данных
Провести компрессию Базы Данных
Выход из Базы Данных
Экранный кадр № 2:
Московская государственная текстильная академия ( МГТА )
БАЗА ДАННЫХ Нарушение норм техобслуживания:
Курсовая работа по курсу :
"Алгоритмические языки обработки данных и технология программирования"
студента гр 42/96
Пономарёва А.Н.
*************************
Руководитель:
доц. Стрельников Б.А.
асс. Степанова О.П.
Выберите одну из следующих задач
Ведение файла "Нормативы профилактики
оборудования"
Ведение файла "Профилактика"
Получение ведомости нарушение норм
техобслуживания
Выход из Базы Данных
Экранный кадр № 3:
Нормативы профилактики оборудования:
Идент. типа станка Наименование типа станка Норма,дней
--------------------------------------------------------------------------
----------------
1 ¦ Строгальный
¦ 25
2 ¦ Сверлильный
¦ 15
3 ¦ Токарный
¦ 20
¦
¦
¦
¦
¦
¦
¦
¦
¦
¦
¦
¦
¦
¦
¦
¦
¦
¦
--------------------------------------------------------------------------
-----------------
Тип станка: Строгальный
(/ ( / ( / ( / ^( PgUp / PgDn / ^(/ Home / End - Перемещение курсора
¦ Esc - Возврат на шаг назад ¦F8
- Удалить строку
Enter - Редактирование ¦
¦F3 - Вставить строку
Экранный кадр № 4:
Профилактики:
Инв.№ станка Вид профилактики Дата профилактики
--------------------------------------------------------------------------
--------------
2 ¦ Смазка ¦
01/09/98
2 ¦ Регулировка ¦
01/29/98
2 ¦ Чистка ¦
04/01/98
231 ¦ Смазка ¦
01/09/98
231 ¦ Регулировка ¦ 01/28/98
231 ¦ Чистка ¦
03/20/98
24 ¦ Смазка ¦
01/09/98
24 ¦ Регулировка ¦ 01/18/98
24 ¦ Чистка ¦
04/02/98
323 ¦ Смазка ¦
01/09/98
323 ¦ Регулировка ¦ 01/28/98
323 ¦ Чистка ¦
04/15/98
--------------------------------------------------------------------------
--------------
Инв.№ станка: 2
Вид профилактики: Смазка
Дата профилактики: 01/09/98
(/ ( / ( / ( / ^( PgUp / PgDn / ^(/ Home / End - Перемещение курсора
¦ Esc - Возврат на шаг назад ¦F8
- Удалить строку
Enter - Редактирование ¦
¦F3 - Вставить строку
Экранный кадр № 5:
Таблица нарушение норм техобслуживания:
----------------------------------------------------------------------------
--------------------------------
¦ Инв. ¦ Наименование ¦ Дата ¦ Вид предвор. ¦ Дата ¦ вид след.
¦Просроч.¦
¦номер ¦ типа станка ¦ ¦ профилактики ¦ ¦
профилактики ¦ дней ¦
¦---------------------------------------------------------------------------
---------------------------------¦
¦ 24 ¦ Сверлильный ¦01/18/98¦ Регулировка ¦04/02/98¦ Чистка
¦ 59 ¦
¦ 323 ¦ Строгальный ¦01/28/98¦ Регулировка ¦04/15/98¦ Чистка
¦ 52 ¦
¦ 2 ¦ Токарный ¦01/29/98¦ Регулировка ¦04/01/98¦ Чистка
¦ 42 ¦
¦ 4 ¦ Сверлильный ¦01/19/98¦ Регулировка ¦03/10/98¦ Чистка
¦ 35 ¦
¦ 626 ¦ Строгальный ¦02/01/98¦ Регулировка ¦03/31/98¦ Чистка
¦ 33 ¦
¦ 231 ¦ Токарный ¦01/28/98¦ Регулировка ¦03/20/98¦ Чистка
¦ 31 ¦
----------------------------------------------------------------------------
---------------------------------
Всего просроченно дней - 252
Экранный кадр № 6:
Московская государственная текстильная академия ( МГТА )
БАЗА ДАННЫХ Нарушение норм техобслуживания:
Курсовая работа по курсу :
"Алгоритмические языки обработки данных и технология программирования"
------------------------------------------------------------------
----------------а А.Н.
¦ Сохранить все внесенные изменения и продолжить
¦*****
¦ работу с Базой данных - т.е. сделать промежуточный SAVE ¦
¦ или
¦
¦ Завершить работу с базой данных с сохранением всех
¦.А.
¦ изменений
¦.
¦ Сохранить и продолжить Завершить работу
¦
------------------------------------------------------------------
----------------
Выберите одну из следующих задач
Ведение файла "Нормативы профилактики оборудования"
Ведение файла "Профилактика"
Получение ведомости нарушение норм техобслуживания
Выход из Базы Данных
б) Пункты меню, что в них делается ?
Меню № 1:
1) Сразу приступить к работе с Базой
Данных
2) Заново построить все индексы Базы Данных
3) Провести компрессию Базы Данных
4) Выход из Базы Данных
При выборе п.1, если индексы уже имеются мы попадаем в меню № 2.
При выборе п.2 заново происходит построение всех индексов Б.Д .
При выборе п.3 производится компрессия (уплотнение) Б.Д .
При выборе п.4 появляется горизонтальное подменю:
а) Сохранить и продолжить б) Завершить
работу
П.а) Сохранить все внесенные изменения и продолжить
П.б) Завершить работу с базой данных с сохранением всех изменений
Меню № 2:
1) Ведение файла "Нормативы профилактики
оборудования"
2) Ведение файла "Профилактика"
3) Получение ведомости нарушение
норм техобслуживания
4) Выход из Базы Данных
При выборе п.1 мы попадаем в редактор файла aa.dbf - (“Нормативы
профилактики оборудования”), где мы можем его просматривать и
редактировать.
При выборе п.2 мы попадаем в редактор файла bb.dbf - (“Профилактика”),
где мы можем его просматривать и редактировать.
При выборе п.3 происходит выявление всех случаев превышения нормативных
интервалов между профилактиками, вывод их в выводной файл “DD”, а также
выдача ведомости на принтер.
При выборе п.4 выполняются действия аналогичные п.4 в меню № 1.
............................................................................
.....................................................
8. Ведение БД .
Какими табл. представлено ведение БД, по какой табл. указывается
текущая рабочая область, её слуги, колонки таблицы, набор клавиш на которые
предусмотрена реакция системы.
Клавиши на которые реагирует система:
(/ ( / ( / ( /; PgUp / PgDn; Home / End - Перемещение курсора
Enter - Выбор задачи в меню и редактирование полей в редакторе
Esc - Возврат на шаг назад. Отмена редактирования (без сохранения
изменненого значения)
F8 - Удалить строку
F3 - Вставить строку
F10 - Выход из задачи с сохранением всей информации или выход без
сохранения информации
Таблицы ведения Б.Д.:
Табл. №1
Нормативы профилактики оборудования:
Идент. типа станка Наименование типа станка Норма, дней
--------------------------------------------------------------------------
---------------------
¦
¦
¦
¦
¦
¦
¦
¦
¦
¦
---------------------------------------------------------------------------
---------------------
Тип станка:
Табл. №2
Профилактики:
Инв.№ станка Вид профилактики Дата профилактики
--------------------------------------------------------------------------
--------------------
¦
¦
¦ ¦
¦ ¦
¦ ¦
¦ ¦
¦ ¦
¦ ¦
¦ ¦
¦ ¦
¦ ¦
----------------------------------------------------------------------------
--------------------
Инв.№ станка:
Вид профилактики:
Дата профилактики:
............................................................................
.....................................................
9. Структура программы :
а) Содержимое rmk-файла “kursv.rmk”:
objs = main2,aa,util,bb
.prg.obj:
CLIPPER $< /a/m/n
.obj.exe:
RTLINK OUTPUT $* FI $(objs) /PLL:base52
main2.obj : main2.prg
aa.obj : aa.prg
util.obj : util.prg
bb.obj : bb.prg
kurs_ok.exe : main2.obj aa.obj util.obj bb.obj
б) Имена и содержание prg-файлов. По каждой функции: имя, назначение,
параметры, тип данных и смысл, возвращенное значение, рабочие перемен-ные и
их назначение.
Программные файлы:
1) aa.prg
В этой программе реализовано:
1. Создание TBrowse-объекта для просмотра-редактирования файла aa.dbf в
окне.
2) bb.prg
В этой программе реализовано:
1. Создание TBrowse-объекта для просмотра-редактирования файла bb.dbf в
окне.
3) main2.prg
В этой программе реализовано:
1.Организация меню.
2. Индексирование файлов.
3. Уплотнение файла .
4. Выявление всех случаев превышения нормативных интервалов между
профилактиками, вывод их в выводной файл
“DD”, а также выдача ведомости на принтер.
5. Вывод на экран информации о “горячих” клавишах.
4) util.prg
Эта программа содержит набор стандартных утилит:
1. Сохранение экрана, восстановление экрана.
2. Перевод в верхний регистр как латиницы, так и кириллицы.
3. Координаты, сообщение, цвет.
4. Выход из задачи с сохранением всей информации - реакция на
клавишу F10.
5. Подача звукового сигнала для сигнализации успешного выполнения
поставленной задачи:
Описание основных подпрограмм:
1) п.п. постоения индексов:
func db_index(prm)
s_scr(24,0,25,79)
CLOSE ALL
SETCOLOR ("w/n")
@ 24,0 CLEAR TO 25,79
@ 24,6 SAY "Ждите идет индексирование! " COLOR "w+*/n"
use bb
index on bb->invnom + dtoc(bb->dateprof) to bb0001
use aa
index on aa->idst to aa0002
use cc
index on cc->invnom to cc0003
use dd
index on dd->(norma-fkdn) to dd0004
close all
r_scr()
return nil
2) п.п. открытия индексов:
func db_open
close all
use aa index aa0002
use bb index bb0001 new
use cc index cc0003 new
use dd index dd0004 new
return nil
3) п.п. уплотнения Б.Д. :
FUNCTION db_compress()
s_scr(24,0,25,79)
CLOSE ALL
SETCOLOR("w/n")
@ 24,0 CLEAR TO 25,79
@ 24,6 SAY "Ждите идет уплотнение !" COLOR ("w+*/n")
USE aa // уплотнение файла aa.dbf
COPY TO work
IF ERRORLEVEL() = 0
USE
DELETE FILE aa.dbf
RENAME work.dbf TO aa.dbf
ENDIF
USE bb // уплотнение файла bb.dbf
COPY TO work
IF ERRORLEVEL() = 0
USE
DELETE FILE bb.dbf
RENAME work.dbf TO bb.dbf
ENDIF
USE cc // уплотнение файла cc.dbf
COPY TO work
IF ERRORLEVEL() = 0
USE
DELETE FILE cc.dbf
RENAME work.dbf TO cc.dbf
ENDIF
USE dd // уплотнение файла dd.dbf
COPY TO work
IF ERRORLEVEL() = 0
USE
DELETE FILE dd.dbf
RENAME work.dbf TO dd.dbf
ENDIF
CLOSE ALL
r_scr()
RETURN NIL
4) п.п. выдачи информации о клавишах, на которые реагирует система
”Help”:
PROCEDURE hlp(callpnt,prm)
LOCAL retcol,crow,ccol
IF prm = NIL
prm := .F.
ENDIF
crow = ROW()
ccol = COL()
retcol = SETCOLOR("w/n")
@ 22,0 CLEAR TO 24,79
IF callpnt = "GET"
// исправленный HLP для GET 26.09.96
@ 22,0 SAY "Enter/" + CHR(24) + '/' + CHR(25) + '/PgUp/PgDn' ;
+ " -Завершить редактирование с сохранением измененного
значения"
@ 22,0 SAY "Enter/"+ CHR(24) + '/' + CHR(25) + '/PgUp/PgDn' COLOR
"r+/n"
@ 23,1 SAY CHR(26) + ' / ' + CHR(27) + ' / ^' + CHR(26) ;
+ ' / ^' + CHR(27) + ' / Home / End - Перемещение курсора'
@ 23,1 SAY CHR(26) + ' / ' + CHR(27) + ' / ^' + CHR(26) ;
+ ' / ^' + CHR(27) + ' / Home / End' COLOR "r+/n"
@ 24,1 SAY 'Esc - Отменить редактирование ' ;
+ '( без сохранения измененного
значения )'
@ 24,1 SAY "Esc" COLOR "r+/n"
ENDIF
IF callpnt="AAED" .OR. callpnt="BBED"
SET COLOR TO ("w/n")
@ 22,1 SAY chr(24) + " / " + chr(25) + " / " + CHR(26) + ' / ' ;
+ CHR(27) + ' / ^' + CHR(26) + " PgUp / PgDn " ;
+ ' / ^' + CHR(27) + '/ Home / End - Перемещение курсора'
@ 24,0 SAY 'Enter - Редактирование '
@ 23,23 TO 24,23 DOUBLE
@ 23,25 SAY 'Esc - Возврат на шаг назад ' COLOR "w/n"
@ 23,25 SAY 'Esc' COLOR "r+/n"
@ 23,54 TO 24,54 DOUBLE
@ 23,55 SAY 'F8 - Удалить строку '
@ 24,55 SAY 'F3 - Вставить строку '
SET COLOR TO ("r+/n")
@ 22,1 SAY chr(24) + " / " + chr(25) + " / " + CHR(26) + ' / ' ;
+ CHR(27) + ' / ^' + CHR(26) + " PgUp / PgDn " ;
+ ' / ^' + CHR(27) + '/ Home / End '
@ 24,0 SAY 'Enter'
@ 23,55 SAY 'F8'
@ 24,55 SAY 'F3'
ENDIF
IF callpnt="CCED" .OR. callpnt="DDED"
SET COLOR TO ("w/n")
@ 22,1 SAY chr(24) + " / " + chr(25) + " / " + CHR(26) + ' / ' ;
+ CHR(27) + ' / ^' + CHR(26) + " PgUp / PgDn " ;
+ ' / ^' + CHR(27) + '/ Home / End - Перемещение курсора'
@ 24,0 SAY 'Enter - Редактирование '
@ 23,23 TO 24,23 DOUBLE
@ 23,25 SAY 'Esc - Возврат на шаг назад ' COLOR "w/n"
@ 23,25 SAY 'Esc' COLOR "r+/n"
@ 24,25 SAY '^Enter - Выбор значения ' COLOR "w/n"
@ 24,25 SAY '^Enter' COLOR "r+/n"
@ 23,54 TO 24,54 DOUBLE
@ 23,55 SAY 'F8 - Удалить строку '
@ 24,55 SAY 'F3 - Вставить строку '
SET COLOR TO ("r+/n")
@ 22,1 SAY chr(24) + " / " + chr(25) + " / " + CHR(26) + ' / ' ;
+ CHR(27) + ' / ^' + CHR(26) + " PgUp / PgDn " ;
+ ' / ^' + CHR(27) + '/ Home / End '
@ 24,0 SAY 'Enter'
@ 23,55 SAY 'F8'
@ 24,55 SAY 'F3'
ENDIF
SET COLOR TO (retcol)
SETPOS(crow,ccol)
RETURN
5) п.п. выявления всех случаев превышения нормативных интервалов между
профилактиками, вывода их в выводной файл
“DD”, а также выдачи ведомости на принтер:
func vedom
local tinvnom,sitog,tdata,tidzap,tidst,idpop
set printer on
select dd
zap
lin:=space(17)+"Таблица нарушение норм техобслуживания:"
? lin
select bb
set relat to bb->invnom into cc
set relat to cc->idst into aa additive
go top
sitog:=0
do while .not. eof()
tinvnom:=bb->invnom
tdata:=bb->dateprof
tidzap:=bb->idzap
tidst:=cc->idst
skip
if(bb->invnom=tinvnom).and.(bb->dateprof-tdata>aa->norma)
select dd
append blank
replace dd->invnom with tinvnom
replace dd->fkdn with bb->dateprof-tdata
replace dd->norma with aa->norma
replace dd->idzappp with tidzap
replace dd->idzapsp with bb->idzap
sitog:=sitog+(dd->fkdn-dd->norma)
select bb
endif
enddo
lin:="+---------------------------------------------------------------------
--------+"
? lin
lin:="¦ Инв.¦ Наименование ¦ Дата ¦ Вид предвор. ¦ Дата ¦ вид след.
¦Просроч.¦"
? lin
lin:="¦номер¦ типа станка ¦ ¦ профилактики ¦ ¦ профилактики
¦ дней ¦"
? lin
lin:="¦-----+--------------+--------+--------------+--------+--------------
+--------¦"
? lin
select dd
set relat to dd->invnom into cc additive
go top
do while .not. eof()
tinvnom:=dd->invnom
idpop:=dd->idzappp
lin:="¦ "+dd->invnom+" ¦ "
select bb
go top
do while .not. eof()
if(tinvnom=bb->invnom).and.(idpop=bb->idzap)
lin:=lin+aa->namest+" ¦"+dtoc(bb->dateprof)+"¦ "+bb->vidprof
endif
skip
enddo
select dd
idpop:=dd->idzapsp
select bb
go top
do while .not. eof()
if(tinvnom=bb->invnom).and.(idpop=bb->idzap)
lin:=lin+" ¦"+dtoc(bb->dateprof)+"¦ "+bb->vidprof+"¦ "
endif
skip
enddo
select dd
lin:=lin+str(dd->fkdn-dd->norma,4)+" ¦"
? lin
skip
enddo
lin:="+---------------------------------------------------------------------
--------+"
? lin
set color to w+/b
lin:=" Всего просроченно дней -"+str(sitog,5)
? lin
set printer off
sound()
inkey(0)
return nil
6) п.п. подачи звукового сигнала для сигнализации успешного выполнения
поставленной задачи:
func sound
tone(300,1)
tone(100,1)
tone(300,1)
tone(100,1)
return nil
7) п.п. сохранения зкрана:
FUNC s_scr(t,l,b,r)
IF t = NIL
t := 0
ENDIF
IF l = NIL
l := 0
ENDIF
IF b = NIL
b := MAXROW()
ENDIF
IF r = NIL
r := MAXCOL()
ENDIF
AADD( wind[1], t )
AADD( wind[2], l )
AADD( wind[3], b )
AADD( wind[4], r )
AADD( wind[5], SAVESCREEN(t,l,b,r) )
AADD( pos[1], ROW() )
AADD( pos[2], COL() )
AADD( colr, SETCOLOR() )
AADD( curs, SETCURSOR() )
RETURN .T.
8) п.п. восстановления зкрана:
FUNC r_scr()
LOCAL ln
ln := LEN(wind[1])
IF ln == 0
@ 24,0 SAY ' Ошибка - стек для восстановления параметров пуст '
INKEY(0)
@ 24,0
ENDIF
RESTSCREEN(wind[1,ln], wind[2,ln], wind[3,ln], wind[4,ln], wind[5,ln] )
ASIZE(wind[1],ln-1)
ASIZE(wind[2],ln-1)
ASIZE(wind[3],ln-1)
ASIZE(wind[4],ln-1)
ASIZE(wind[5],ln-1)
SETPOS( pos[1,ln], pos[2,ln] )
ASIZE(pos[1],ln-1)
ASIZE(pos[2],ln-1)
SETCOLOR(colr[ln])
ASIZE(colr,ln-1)
SETCURSOR(curs[ln])
ASIZE(curs,ln-1)
RETURN .T.
9) п.п. определения - нажата ли клавиша типового метода, если да - то
возвращает блок кода с соответствующим методом, если нет - то возвращает
NIL. Параметр функции - INKEY-код нажатой клавиши.
FUNC basemet(cod)
LOCAL ret , ei , i
LOCAL crsm:={ ;
{K_DOWN , {|o| o:down() } } ;
, {K_UP , {|o| o:up() } } ;
, {K_PGDN , {|o| o:pagedown() } } ;
, {K_PGUP , {|o| o:pageup() } } ;
, {K_CTRL_PGDN , {|o| o:gobottom() } } ;
, {K_CTRL_PGUP , {|o| o:gotop() } } ;
, {K_RIGHT , {|o| o:right() } } ;
, {K_LEFT , {|o| o:left() } } ;
, {K_CTRL_RIGHT , {|o| o:panright() } } ;
, {K_CTRL_LEFT , {|o| o:panleft() } } ;
, {K_END , {|o| o:end() } } ;
, {K_HOME , {|o| o:home() } } ;
, {K_CTRL_END , {|o| o:panend() } } ;
, {K_CTRL_HOME , {|o| o:panhome() } } }
i := ASCAN( crsm, {|ei| cod = ei[1] } )
IF i 0
ret := crsm[i,2]
ELSE
ret := NIL
ENDIF
RETURN ret
10) п.п. переключения режима вставка/замена и вида курсора:
PROCEDURE Repl_Ins()
IF READINSERT()
READINSERT(.F.)
SETCURSOR(SC_INSERT)
ELSE
READINSERT(.T.)
SETCURSOR(SC_NORMAL)
ENDIF
RETURN
11) п.п. перевода в верхний регистр латиницы и кириллицы:
FUNC UpperC(prm)
LOCAL n , i , smb , cs
n := LEN( prm )
FOR i = 1 TO n
smb := SUBSTR( prm , i , 1 )
cs := ASC( smb )
DO CASE
| |
