Формирование меню и строки статуса - раздел Программирование, Разработка системы управления работой коммерческой компании Формирование Меню И Строки Статуса. Теперь Нужно Создать Основные Элементы Пр...
Формирование меню и строки статуса. Теперь нужно создать основные элементы программы - строку меню и строку состояния. Для этого я модифицировал стандартное поведение объекта SKLVKS. Я перекрыл переопределил унаследованные от TApplication методы InitStatusLine и InitMenuBar. Метод InitStatusLine я перекрыл так, чтобы программа в строке состояния вывела подсказки выхода из программы, справка и меню. При нажатии мышкой или при нажатии горячей клавишу на соответствующую надпись ваполнится связанная с ней процедура.
Например при нажатии на F1 на экране появится сообщение о создании СУРКК или при нажатии на F10 активизируется строка меню. Метод InitMenuBar перекрал так, чтобы организовать меню для работы с данными. см. рис 2 USES APP,OBJECTS,MENUS,DRIVERS,VIEWS Const cmPrnSklad 200 cmSklad 201 cmZak 203 cmPriceLst 204 cmHelp About 205 cmPrint 206 cmPrihod 207 cmSbros 208 cmNext 209 cmMore 213 cmSKL 214 cmDostup 215 cmDobavka 216 cmRekviz 217 cmKurs 218 cmTemp 219 cmPriceList 220 cmSdelka 221 cmPrih 222 cmVozvrat 223 cmKorPrihod 224 cmDolgi 225 cmUdal 226 cmMoney 227 cmArchive 228 Type TSklVks object TApplication Procedure InitStatusLine Virtual Procedure InitMenuBar Virtual End Procedure TSklVks. InitStatusLine создает строку статуса var R Trect Begin GetExtent R R.A.Y pred R.B.Y координаты строки статуса StatusLine New PStatusLine,Init R,NewStatusDef 0, ffff, NewStatusKey ALT-X -Конец работы, kbAltX,cmQuit, NewStatusKey F1 -Справка, kbf1,cmHelp About, NewStatusKey F10 -Меню, kbf10,cmMenu, nil, nil END Procedure TSklVks. InitMenuBar Создает строку меню var R Trect Begin GetExtent R R.B.Y succ R.A.Y координаты строки меню MenuBar New PMenuBar,Init R,NewMenu NewSubMenu Д анные, hcNoContext, NewMenu NewItem С клад , ,kbNokey, cmSklad, hcNoContext, NewItem С д елки , ,kbNoKey, cmSdelka, hcNoContext, NewItem П риходы , ,kbNoKey, cmPrih, hcNoContext, NewItem Дол г и , ,kbNoKey, cmDolgi, hcNoContext, NewItem Выруч к а , ,kbNoKey, cmMoney, hcNoContext, NewLine NewItem В ыход , ALT-X ,kbAltX,cmQuit, hcNoContext, nil , NewSubMenu К лиент, hcNoContext, NewMenu NewItem П родажа , ,kbNoKey, cmZak, hcNoConText, NewItem В озврат , ,kbNoKey, cmVozvrat, hcNoConText, nil , NewSubMenu П оставщик, hcNoContext,NewMenu NewItem Новый при х од , ,kbNoKey, cmPrihod, hcNoContext, NewItem К орректировка прихода , ,KbNoKey, cmKorPrihod, hcNoContext, nil , NewSubMenu Пе ч ать, hcNoContext,NewMenu NewItem О тчет о наличии товара , ,kbNoKey, cmPrnSklad, hcNoContext, NewItem Прайс л ист , ,KbNoKey, cmPriceList, hcNoContext, nil , NewSubMenu А рхив, hcNoContext,NewMenu NewItem Р абота с архивом , ,kbNokey, cmArchive, hcNoContext, nil , NewSubMenu У становки, hcNoContext,NewMenu NewItem П ароль , ,kbNoKey, cmDostup, hcNoContext, NewItem Рекви з иты , ,kbNoKey, cmRekviz, hcNoContext, NewItem Кур с доллара , ,kbNoKey, cmKurs, hcNocontext, nil , NewSubMenu И нформация, hcNoContext,NewMenu NewItem О Скла д е , ,kbNokey, cmHelp About, hcNoContext, nil, nil end Var SKLVKS TSKLVKS BEGIN Основная программа SklVks. Init SklVks. Run SklVks. Done END. Конец основной программы рис 2 2.6.4.3
Большую роль играют, также, изменения в организационных формах и характере деятельности фирм, повышение значения транснациональных корпораций в… Изменения условий производственной деятельности, необходимость адекватного… Все это требует от фирм адаптации к новым условиям, преодоления возникающих противоречий в экономическом и…
Если Вам нужно дополнительный материал на эту тему, или Вы не нашли то, что искали, рекомендуем воспользоваться поиском по нашей базе работ:
Формирование меню и строки статуса
Что будем делать с полученным материалом:
Если этот материал оказался полезным ля Вас, Вы можете сохранить его на свою страничку в социальных сетях:
Постановка задачи
Постановка задачи.
Целью данного дипломного проекта является разработка системы управления работой коммерческой компании.
Исходя из современных требований, предъявляемых к качеству ра
Значение внутрифирменной системы информации
Значение внутрифирменной системы информации.
Для современных условий характерно применение высокоэффективной внутрифирменной системы информации, основанной на использовании новейших техничес
Система ведения записей
Система ведения записей. На основе специальных программ, направленных на облегчение доступа и использования требуемой информации разрабатываются системы введения записей.
К важнейшим видам з
Формы как носители информации
Формы как носители информации.
Обычно необходимая информация заносится на определенные формы- носители информации.
Формы могут содержать информацию по предприятию в целом и по каждому
Локальные вычислительные сети как массовые компьютерные системы
Локальные вычислительные сети как массовые компьютерные системы.
Локальные вычислительные сети представляют собой системы распределенной обработки данных и, в отличие от глобальных и региона
Классификация ЛВС
Классификация ЛВС. Сейчас в мире насчитываются десятки тысяч различных ЛВС и для их рассмотрения полезно иметь систему классификации.
Установившейся классификации ЛВС пока не существует, одн
Общие принципы функционирования ЛВС типа Ethernet
Общие принципы функционирования ЛВС типа Ethernet. Сети этого типа являются наиболее распространенными.
Кроме того, сеть Ethernet фирмы Xerox можно считать родоначальницей всех ЛВС, так как
Выбор операционной системы для оффисной ЛВС
Выбор операционной системы для оффисной ЛВС. Существует много способов связывать персональные компьютеры ПК в единый вычислительный комплекс.
Самый простой - соединить их через последователь
Работа с данными
Работа с данными. МЕНЮ УСТАНОВКИ Включает следующие подменю пароль - служит для защиты системы от лиц, не имеющих разрешения для работы с программой. реквизиты - изменения реквизитов коммерческой к
Средства разработки
Средства разработки. КОМПИЛЯТОР BORLAND PASCAL 7.0 Компилятор Borland Pascal 7.0 позволяет создавать программы, которые могут выполнятся в реальном и защищенном режимах DOS и в среде WINDOWS. Таким
Элементы Turbo Vision
Элементы Turbo Vision. Turbo Vision - это объединение видимых элементов, событий и невидимых объектов.
Видимый элемент - это любой элемент программы, который виден на экране, и все эти элеме
Начало создания
Начало создания. Работа большинства прикладных программ проходит в три этапа подготовка к работе, собственно работа и, наконец, ее завершение.
В случае с СУРКК к подготовительному этапу можн
Обработка команд
Обработка команд. Теперь нужно сделать так, чтобы при выборе какого-либо пункта меню выполнялась соответсвующая процедура.
При выборе пунктов меню генерирует событие, которое обрабатывается
Программирование диалоговых запросов
Программирование диалоговых запросов. В обработчике событий TSklVks. HandleEvent я предусмотрел вызов нескольких процедур, с помощью которых реализуются конкретные действия.
Начну с процедур
Архивирование данных
Архивирование данных. Для того, чтобы в списке сделок не появлялись уже не нужные данные я написал подпрограмму для архивирования данных.
При выборе команды меню АРХИВ-РАБОТА С АРХИВОМ на эк
Ввод установок
Ввод установок. Для того, чтобы предотвратить использование данной программы лицами не имеющим разрешения ее использование был создана подпрограммы для ввода пароля.
Пароль и все установки х
Структура баз данных БД
Структура баз данных БД. Теперь рассмотрю структуру баз данных.
Структура не является сложной, однако она может содержать все данные, необходимые для данной системой и связь между разными БД
Безопасность информации в ЛВС
Безопасность информации в ЛВС. Общая характеристика угроз, служб и механизмов безопасности Комплексное рассмотрение вопросов обеспечения безопасности ЛВС нашло свое отражение в так называемой архит
Программные вирусы и вопросы их нейтрализации
Программные вирусы и вопросы их нейтрализации. Под программмным вирусом ПВ понимается автономно функционирующая программа, обладающая способностью к самовключению в тела других программ и последующ
Гражданская оборона
Гражданская оборона. Анализ противопожарной устойчивости сборочного цеха завода по производству радиоэлектронной аппаратуры При планировании функционирования промышленного предприятия, и, в частнос
Охрана труда
Охрана труда. и экология.
Системы учета защитных средств В процессе работы здоровью и даже, возможно, жизни людей могут угрожать факторы, вызванные преимущественно неправильной организацией
Экономическая часть
Экономическая часть. Для наиболее эффективного управления работой предприятия необходимо иметь достаточную информацию о положении дел на предприятии и возможность оперативного реагирования на измен
Рецензия
Рецензия. Дипломный проект студента Григорьева И.B. на тему Разработка системы управления работой коммерческой компании посвящен созданию системы программно-аппаратного комплекса по автоматизации д
Хотите получать на электронную почту самые свежие новости?
Подпишитесь на Нашу рассылку
Наша политика приватности обеспечивает 100% безопасность и анонимность Ваших E-Mail
Новости и инфо для студентов