Студопедия Главная Случайная страница Обратная связь

Разделы: Автомобили Астрономия Биология География Дом и сад Другие языки Другое Информатика История Культура Литература Логика Математика Медицина Металлургия Механика Образование Охрана труда Педагогика Политика Право Психология Религия Риторика Социология Спорт Строительство Технология Туризм Физика Философия Финансы Химия Черчение Экология Экономика Электроника

Procedure mhide;





{Процедура, которая «прячет» курсор}

procedure mpos(var mouse: locrec);

{Данную процедуру необходимо крутить в цикле, тогда данные, возвращаемые в структуре locrec, будут сообщать текущее состояние мыши}

 

procedure mmoveto(col, row: integer);

{Процедура, перемещающая курсор мыши в заданные координаты}

 

procedure mpressed(button: integer; var mouse: locrec);

{Процедура, которая отслеживает событие нажатия на клавишу, передаваемую в button: 0-левая клавиша мыши, 1-правая клавиша мыши. В структуре locrec возвращается buttonstatus – нажатая клавиша во время срабатывания события. Факт срабатывания события можно определить по значению в opcount: 1-событие сработало, 0-событие не сработало}

procedure mreleased(button: integer; var mouse: locrec);

{Процедура, аналогичная mpressed. Событие срабатывает в том случае, когда клавиша мыши отпущена}

procedure mcolrange(min, max: integer);

{Устанавливает минимальные и максимальные границы для перемещения курсора мыши, т.е. если вызвали процедуру mcolrange с фактическими параметрами 10 и 50: mcolrange(10, 50), то движение курсора будет ограничено следующим образом по координате x: 10<=mx<=50}

procedure mrowrange(min, max:integer);

{Процедура, подобная mcolrange, но ограничения устанавливаются по y}

{Остальные процедуры в рамках данной лабораторной работы рассматриваться не будут}

procedure mgraphcursor(hhot, vhot: integer; maskseg, maskofs: word);

procedure mtextcursor(ctype, p1, p2: word);

procedure mmotion(var moved: moverec);

procedure minsttask(mask, taskseg, taskofs: word);

procedure mlpenon;

procedure mlpenoff;

procedure mratio(horiz, vert: integer);

 

implementation

Примечание. Процедуры mpos, mpressed, mreleased обычно используют в цикле, где проверяют состояние мыши. Там же программист задает реакцию (необходимые действия) на происходящие события.







Дата добавления: 2015-09-07; просмотров: 268. Нарушение авторских прав; Мы поможем в написании вашей работы!




Функция спроса населения на данный товар Функция спроса населения на данный товар: Qd=7-Р. Функция предложения: Qs= -5+2Р,где...


Аальтернативная стоимость. Кривая производственных возможностей В экономике Буридании есть 100 ед. труда с производительностью 4 м ткани или 2 кг мяса...


Вычисление основной дактилоскопической формулы Вычислением основной дактоформулы обычно занимается следователь. Для этого все десять пальцев разбиваются на пять пар...


Расчетные и графические задания Равновесный объем - это объем, определяемый равенством спроса и предложения...

Тема: Составление цепи питания Цель: расширить знания о биотических факторах среды. Оборудование:гербарные растения...

В эволюции растений и животных. Цель: выявить ароморфозы и идиоадаптации у растений Цель: выявить ароморфозы и идиоадаптации у растений. Оборудование: гербарные растения, чучела хордовых (рыб, земноводных, птиц, пресмыкающихся, млекопитающих), коллекции насекомых, влажные препараты паразитических червей, мох, хвощ, папоротник...

Типовые примеры и методы их решения. Пример 2.5.1. На вклад начисляются сложные проценты: а) ежегодно; б) ежеквартально; в) ежемесячно Пример 2.5.1. На вклад начисляются сложные проценты: а) ежегодно; б) ежеквартально; в) ежемесячно. Какова должна быть годовая номинальная процентная ставка...

Философские школы эпохи эллинизма (неоплатонизм, эпикуреизм, стоицизм, скептицизм). Эпоха эллинизма со времени походов Александра Македонского, в результате которых была образована гигантская империя от Индии на востоке до Греции и Македонии на западе...

Демографияда "Демографиялық жарылыс" дегеніміз не? Демография (грекше демос — халық) — халықтың құрылымын...

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

Studopedia.info - Студопедия - 2014-2025 год . (0.012 сек.) русская версия | украинская версия