Читать реферат по информатике, вычислительной технике, телекоммуникациям: "Страница Additional дополнительные палитры VCL" Страница 1

(Назад) (Cкачать работу)

ЛАБОРАТОРНАЯ РАБОТА №2.

Тема: Страница Additional (дополнительные) палитры VCL.

Построим вторую страницу нашего приложения "StandardTab".

Добавьте новую форму в проект, который был начат на предыдущем занятии: File|New Form. Установите свойство Name этой формы как "AdditionalTab". Установите свойство Caption "The Additional Tab".Выполните File| Save и сохраните новую форму под именем ADDITIONAL.PAS. Сделайте так, чтобы форма появлялась в середине экрана. Для этого установите свойство Position. По умолчанию это свойство установлено в "poDesigned". Это означает, что она появляется в том положении, в котором конструировалось. Щелкните на poDesigned - откроется окно списка. Выберите poScreenCenter. Эта установка действует в момент активизации формы.Добавьте имя Addition в выражение USES начальной формы (Standard).Вернитесь к форме Standard Tab и добавьте код, позволяющий получить доступ к новой странице, чтобы увидеть ее при тестировании. Из меню выберите View | Forms для вызова меню форм и выберите StandardTab. Дважды щелкните на Button4 (Next Page) и введите для ее события Click следующий код: procedure TStandardTab.Button4Click ( Sender: Tobject);

begin

StandardTab.Hide;

AdditionalTab.Show;

end;

Вернитесь к форме Additional Tab. Поместите три компонента BitBtn (страница Additional) в нижний левый угол формы. Для BitBtn1 и BitBtn2 установите в свойстве Kind значение bkCustom. Установите для свойства Caption BitBtn1 текст "Back", а для BitBtn2 - текст "Next". Компонента BitBtn допускает размещение на кнопке графического элемента, называемого иногда гравировкой (glyph). Гравировки представляют собой просто маленькие битовые матрицы, в которых может содержаться несколько различных значков, отображаемых в зависимости от состояния BitBtn или SpeedButton. Можно использовать готовые гравировки, поставляемые в комплекте Delphi, либо создавать собственные с помощью редактора изображений (Image Editor в меню Tools). В данном примере мы используем битовые матрицы, поставляемые с Delphi. Для компонента BitBtn1 дважды щелкните на Tbitmap в свойстве Gluph. При этом запускается редактор картинок. Но реально редактировать картинку на этом экране не удается, редактор позволяет просто выбрать имя файла, содержащего интересующую вас битовую матрицу, загрузить и просмотреть файл, прежде, чем присвоить кнопке. Щелкните на кнопке Load - откроется диалоговое окно выбора файла. Перейдите в каталог .....\Borland\delphi\images\buttons (т. е. в каталог, в котором записана Delphi) и выберите ARROW1L.BMP. Вы должны увидеть красную и белую стрелки, указывающие налево. Красная стрелка отображается в активном состоянии кнопки, белая - в выключенном. Вы можете переключать свойство Enabled (включено) этой кнопки между состояниями True и False и наблюдать различия в изображении. Убедитесь, что после этого свойство Enabled осталось в состоянии true.

Повторите теже шаги, что для BitBtn, и установите для BitBtn2 гравировку ARROW1R.BMP.Установка для BitBtn3 оказывается проще, благодаря стандартному типу, который будет использован в свойстве Kind. Для BitBtn3 щелкните на Kind и выберите bkClose. Тем самым кнопке припишется изображение открытой двери, а свойство Caption будет установлено в "Close". Для дальнейшего заметьте, что у свойства Kind имеется 10 приведенных ниже

Похожие работы