No Image

Что за команда action

СОДЕРЖАНИЕ
1 просмотров
11 марта 2020

Универсальный англо-русский словарь . Академик.ру . 2011 .

Смотреть что такое "command action" в других словарях:

Command pattern — In object oriented programming, the command pattern is a design pattern in which an object is used to represent and encapsulate all the information needed to call a method at a later time. This information includes the method name, the object… … Wikipedia

Command & Conquer: Generals — Command Conquer: Generals Entwickler: Electronic Arts Verleger: Electronic Arts Publikation … Deutsch Wikipedia

Command & Conquer: Generäle — Command Conquer: Generals Entwickler: Electronic Arts Verleger: Electronic Arts Publikation … Deutsch Wikipedia

Command & Conquer: Renegade — Developer(s) Westwood Studios Publisher(s) EA Games Se … Wikipedia

Command & Conquer: Generäle — Command Conquer: Generals Entwickler Electronic Arts Publisher … Deutsch Wikipedia

Command & Conquer — Command Conquer (abgekürzt C C oder CnC, engl. für kommandieren und erobern) ist ein von den Westwood Studios entwickelte Spielereihe. Mit seiner unkomplizierten Steuerung, der spannenden Geschichte und seiner Multiplayerfunktion erwarb sich… … Deutsch Wikipedia

Command and Conquer — Command Conquer (abgekürzt C C oder CnC, engl. für kommandieren und erobern) ist ein von den Westwood Studios entwickelte Spielereihe. Mit seiner unkomplizierten Steuerung, der spannenden Geschichte und seiner Multiplayerfunktion erwarb sich… … Deutsch Wikipedia

Command & Conquer 3: Kanes Rache — Command Conquer 3: Tiberium Wars Entwickler: EA Los Angeles Verleger: Electronic Arts Publikation … Deutsch Wikipedia

Command & Conquer 3: Tiberium Wars — Command Conquer 3: Tiberium Wars Entwickler: EA Los Angeles Verleger: Electronic Arts Publikation … Deutsch Wikipedia

Command & Conquer: Generals — Command Conquer Generals cover art Developer(s) EA Pacific (Windows) Aspyr Media (Mac OS) … Wikipedia

Action at Néry — Part of the Retreat from Mons Date 1 September 1914 Location Néry, Oise, northern France Result … Wikipedia

Отыщите в палитре компонентов на вкладке Standart компонент ActionList и добавьте его в форму (рисунок 8.75).


Рисунок 8.75. Компонент ActionList

Дайте компоненту имя ActionList (рисунок 8.76).


Рисунок 8.76. Компонент ActionList на форме

Ознакомьтесь со свойствами компонента ActionList в таблице 8.17.

Свойство Описание
Images Список значков, отображаемых в компонентах, использующих команды. Свойство Images используется совместно со свойством ImageIndex компонентов Action.
State Позволяет временно запретить выполнение всех команд списка. Возможные значения: asNormal – команды работают в обычном режиме и доступность каждой команды определяется значением свойства Enabled в соответствующем компоненте Action; asSuspended – все команды недоступны, но при этом не затрагиваются свойства Enabled в компонентах Action; asSuspendedEnabled – все команды недоступны, но имеют обычный вид благодаря тому, что свойство Enabled каждого компонента Action устанавливается в значение True.
OnChange Происходит при модификации команд в списке. Однако не происходит при создании и уничтожении команд.
OnExecute Происходит при выполнении команды.
OnStateChange Происходит при изменении свойства State. Следует учитывать, что из-за ошибки в библиотеке VCL событие не происходит при переводе свойства State в значение asSuspended.
OnUpdate Происходит при выполнении команды и периодически во время простоя программы. Позволяет отслеживать и изменять состояния команд.

Таблица 8.17. Важнейшие свойства и события компонента ActionList

Шаг 72. Создание списка команд начнем с команды Open. В контекстном меню компонента ActionList выберите команду Action List Editor… (рисунок 8.77).

Читайте также:  Яндекс условия использования маршруты найти


Рисунок 8.77. Вызов списка команд из контекстного меню компонента ActionList

Перед вами откроется окно команд (рисунок 8.78).


Рисунок 8.78. Окно команд компонента ActionList

Окно команд работает в паре с окном свойств. Создание и удаление команд осуществляется в окне команд, а свойства отдельно взятой команды устанавливаются в окне свойств (рисунок 8.78).

Шаг 73. Щелчком на первой кнопке добавьте в список новую команду. Свойства команды немедленно появятся в окне свойств.

Команды

Когда вы создаете очередную команду в компоненте ActionList, среда Delphi добавляет в описание формы компонент Action. Компонент Action не существует отдельно от компонента ActionList и поэтому отсутствует в палитре компонентов. В остальном это обычный компонент, его важнейшие свойства приведены в таблице 8.18.

Свойство Описание
AutoCheck Если равно значению True, то выполнение команды (вызов метода Execute) автоматически приводит к изменению значения свойства Checked на противоположное. Если равно значению False, то изменением состояния свойства Checked управляет сам программист.
Caption Заголовок команды.
Category Категория команды.
Checked Если равно значению True, то команда считается выбранной. В этом случае связанные с командой пунткы меню содержат метку, а кнопки имеют вдавленный вид.
Enabled Определяет, доступна ли команда пользователю.
GroupIndex Команды с одинаковым положительным значением GroupIndex согласовано переключают свойство Checked – установка у одной команды свойства Checked в значение True приводит к устновке его в значение False в других командах.
ImageIndex Номер значка в списке Images компонента ActionList. Значок отображается рядом с текстом пункта меню (см. параграф 8.1.12). Отрицательное значение свойства ImageIndex говорит о том, что для пункта меню значок не задан. Свойство ImageIndex имеет приоритет над свойством Bitmap.
SecondaryShortCuts Дополнительные комбинации клавиш.
ShortCut Комбинация клавиш для выполнения команды.
Visible Определяет, видна ли пользователю команда.
OnExecute Происходит при выполнении команды.
OnHint Происходит в момент появления всплывающей подсказки.
OnUpdate Происходит при выполнении команды и периодически во время простоя программы. Позволяет отслеживать и изменять состояние команды.

Таблица 8.18. Важнейшие свойства и события компонента Action

Шаг 74. Перейдем к настройке команды, созданной на предыдущем шаге. Дайте команде имя OpenAction, в свойстве Caption впишите текст Open. и в свойстве ShortCut выберите значение Ctrl+O (рисунок 8.79).


Рисунок 8.79. Для команды Open задана комбинация клавиш Ctrl+O

Команда может иметь значок. Он определяется значением свойства ImageIndex (номер значка в списке Images компонента ActionList). Прежде чем выбрать значение для свойства ImageIndex, нужно указать список значков компоненту ActionList.

Шаг 75. Выделите на форме компонент ActionList и перейдите к окну свойств. Выберите в свойстве Images значение ImageList (рисунок 8.80).


Рисунок 8.80. Для компонента ActionList задается компонент ImageList со списком значков

Шаг 76. А теперь установим компоненту OpenAction соответствующий значок. Перейдите к окну команд и выделите команду OpenAction. Затем в окне свойств отыщите свойство ImageIndex и выберите значок с номером 0 (рисунок 8.81).


Рисунок 8.81. Для команды Open задан значок с индексом 0

Шаг 77. С командой OpenAction мы разобрались, теперь самостоятельно создайте команды SaveAsAction, CloseAction, ExitAction, ToolBarAction, StatusBarAction, HalfSizeAction, NormalSizeAction, DoubleSizeAction (рисунок 8.82) с соответствующими заголовками (свойство Caption).


Рисунок 8.82. Полный список команд для программы

Самая ответственная часть работы завершена, список команд сформирован. Теперь привяжем команды к визуальным компонентам: кнопкам и пунктам меню.

Читайте также:  Nokia rm 944 прошивка

Привязка команд

Кнопки, пункты меню и некоторые другие визуальные компоненты имеют свойство Action, с помощью которого к ним привязываются команды. В результате установки свойства Action визуальный компонент копирует к себе значения свойств команды (надпись, значок, подсказку и др.). Кроме того, команда запоминает, к каким компонентам она привязана с тем, чтобы изменение свойств команды вызывало изменение соответствующих свойств во всех связанных с ней компонентах.

Шаг 78. Привязку команд начнем с кнопки Open на панели инструментов. Выделите ее и в раскрывающемся списке свойства Action выберите значение OpenAction (рисунок 8.83).


Рисунок 8.83. К кнопке OpenToolButton привязывается команда OpenAction

Обратите внимание, что надпись на кнопке изменилась. Это результат копирования значения свойства Caption из компонента OpenAction в компонент OpenToolButton.

Шаг 79. Аналогичным образом привяжите команду OpenAction к пункту Open… главного меню (рисунок 8.84).


Рисунок 8.84. К пункту меню OpenMenuItem привязывается команда OpenAction

Проверим, что у нас получилось. Выполните компиляцию и запустите программу (рисунок 8.85).


Рисунок 8.85. При запуске программы команда Open оказалась недоступна

Странно: и кнопка Open… на панели инструментов, и пункт Open… в главном меню недоступны. Это объясняется отсутствием у компонента OpenAction обработчика события OnExecute. Им сейчас и займемся.

Реакция на команды

Когда пользователь нажимает кнопку или выбирает пункт меню, происходит событие OnExecute. Если для команды не определен обработчик события OnExecute, то все компоненты, использующие эту команду, становятся недоступными (свойство Enabled устанавливается в значение False).

Шаг 80. Определим в компоненте OpenAction обработчик события OnExecute. Обратитесь к контекстному меню компонента ActionList и вызовите окно команд. В этом окне выберите команду OpenAction, после чего в окне свойств выберите вкладку Events. Теперь сделайте двойной щелчок мыши на значении события OnExecute. Среда Delphi создаст заготовку для будущего обработчика:

procedure TPictureForm.OpenActionExecute(Sender: TObject); begin end;

Обработчик у нас уже есть в виде метода OpenMenuItemClick, поэтому мы просто перенесем код этого метода (слегка подправив его) в только что созданный метод, удалив код метода OpenMenuItemClick.

procedure TPictureForm.OpenMenuItemClick(Sender: TObject); begin end; . procedure TPictureForm.OpenActionExecute(Sender: TObject); begin if OpenDialog.Execute then begin Image.Picture.LoadFromFile(OpenDialog.FileName); EnableCommands(True); NormalSizeAction.Execute; // Вместо NormalSizeMenuItem.Click; end; UpdateStatusBar; end;

Сохраните проект; пустой метод OpenMenuItemClick будет автоматически удален из исходного текста.

Обратите внимание, что компонент Action автоматически подменяет обработчики OnClick в связанных с ним компонентах. Поэтому если вы перейдете к окну свойств и посмотрите на событие OnClick в компоненте OpenMenuItem, то обнаружите там метод OpenActionExecute (обработчик события OnExecute компонента OpenAction).

Выполните компиляцию и запустите программу. Команда Open снова доступна пользователю (рисунок 8.86).


Рисунок 8.86. Команда Open опять доступна пользователю (компонент OpenAction обрабатывает событие OnExecute)

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

Шаг 81. Обойдите все пункты меню (не забудьте про контекстное меню) и кнопки панели инструментов и установите в каждом из них свойство Action в соответствующее значение. Попутно значения некоторых других свойств тоже изменятся, например свойство Enabled получит значение True. Пусть вас это не беспокоит, так и должно быть (рисунок 8.87).


Рисунок 8.87. Все пункты меню и кнопки панели инструментов привязаны к командам

Восстановим правильную логику работы кнопок и пунктов меню.

Читайте также:  Игровой центр майл ру магазин

Шаг 82. Сделайте недоступной команду SaveAsAction, установив ее свойство Enabled в значение False. Одновременно кнопка и пункт меню Save As. станут недоступными (рисунок 8.88).


Рисунок 8.88. Команда Save As отключена до тех пор, пока пользователь не откроет какой-нибудь графический файл

Шаг 83. Создайте для компонента SaveAsAction обработчик события OnExecute и перенесите код метода SaveAsMenuItemClick в только что созданный метод SaveAsActionExecute:

procedure TPictureForm.SaveAsMenuItemClick(Sender: TObject); begin end; procedure TPictureForm.SaveAsActionExecute(Sender: TObject); begin if SaveDialog.Execute then Image.Picture.SaveToFile(SaveDialog.FileName); end;

Шаг 84. Доработку команды SaveAsAction мы закончили и теперь по аналогии доработаем команды ExitAction и CloseAction:

procedure TPictureForm.ExitMenuItemClick(Sender: TObject); begin end; procedure TPictureForm.CloseMenuItemClick(Sender: TObject); begin end; procedure TPictureForm.ExitActionExecute(Sender: TObject); begin Close; end; procedure TPictureForm.CloseActionExecute(Sender: TObject); begin with Image do begin Picture := nil; W >

Шаг 85. Теперь настало время команд ToolBarAction и StatusBarAction:

procedure TPictureForm.ToolBarMenuItemClick(Sender: TObject); begin end; procedure TPictureForm.StatusBarMenuItemClick(Sender: TObject); begin end; procedure TPictureForm.ToolBarActionExecute(Sender: TObject); begin ToolBarAction.Checked := not ToolBarAction.Checked; ToolBar.Visible := not ToolBar.Visible; end; procedure TPictureForm.StatusBarActionExecute(Sender: TObject); begin StatusBarAction.Checked := not StatusBarAction.Checked; StatusBar.Visible := not StatusBar.Visible; end;

Теперь восстановим логику работы команд, отвечающих за масштаб рисунка.

Шаг 86. Вернитесь к окну редактирования списка команд и выделите команду HalfSizeAction. После этого нажмите клавишу Ctrl и, удерживая ее, выделите команды NormalSizeAction и DoubleSizeAction. Перейдите к окну свойств и установите свойство GroupIndex в значение 1 (рисунок 8.89).


Рисунок 8.89. Группировка команд с помощью свойства GroupIndex

Шаг 87. Свойство Checked компонента NormalSizeAction установите в значение True– при запуске программы рисунок не масштабируется (рисунок 8.90).


Рисунок 8.90. Начальное значение для переключателя масштаба – Normal Size

Шаг 88. Установите свойство Enabled команд HalfSizeAction, NormalSizeAction и DoubleSizeAction в значение False – при запуске программы рисунок еще не загружен, поэтому команды переключения масштаба должны быть недоступны (рисунок 8.91).


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

Шаг 89. Теперь создадим обработчики команд HalfSizeAction, NormalSizeAction и DoubleSizeAction. Для каждой команды определите обработчик события OnExecute и перенесите код из уже имеющихся методов:

procedure TPictureForm.HalfSizeMenuItemClick(Sender: TObject); begin end; procedure TPictureForm.NormalSizeMenuItemClick(Sender: TObject); begin end; procedure TPictureForm.DoubleSizeMenuItemClick(Sender: TObject); begin end; . procedure TPictureForm.HalfSizeActionExecute(Sender: TObject); begin HalfSizeToolButton.Down := True; HalfSizeMenuItem.Checked := True; HalfSizePopupItem.Checked := True; with Image do begin AutoSize := False; W >

Шаг 90. Обработчики можно упростить за счет управления состоянием пунктов меню и кнопок через компоненты Action, т.е. первые три оператора каждого обработчика заменяются на один оператор:

procedure TPictureForm.HalfSizeActionExecute(Sender: TObject); begin HalfSizeAction.Checked := True; with Image do begin AutoSize := False; W >

А теперь воспользуемся свойством AutoCheck компонентов Action, чтобы избавиться от необходимости программно переключать метку в пунктах Toolbar и Status bar главного меню. Когда свойство AutoCheck равно True, то при выполнении команды свойство Checked автоматически меняет свое значение на противоположное. Это отражается на связанных с командой пунктах меню и кнопках-переключателях.

Шаг 91. У команд ToolBarAction и StatusBarAction установите свойства AutoCheck и Checked в значение True.

Шаг 92. Подправьте методы ToolBarActionExecute и StatusBarActionExecute:

procedure TPictureForm.ToolBarActionExecute(Sender: TObject); begin ToolBar.Visible := ToolBarAction.Checked; end; procedure TPictureForm.StatusBarActionExecute(Sender: TObject); begin StatusBar.Visible := StatusBarAction.Checked; end;

Не нашли то, что искали? Воспользуйтесь поиском:

Комментировать
1 просмотров
Комментариев нет, будьте первым кто его оставит

Это интересно
No Image Компьютеры
0 комментариев
No Image Компьютеры
0 комментариев
No Image Компьютеры
0 комментариев
No Image Компьютеры
0 комментариев
Adblock detector