100700

Моя первая программа. Работа с компонентами TLable, Tbutton, TColorBox

Лабораторная работа

Информатика, кибернетика и программирование

Label - метка. Разместите на форме командную кнопку которая позволяла бы уменьшать шрифт объекта Label на 4 пикселя и увеличивать на 2 пикселя. Попробуем таким способом включить в окно программы компонент Label. Новый компонент имеет стандартное имя Label и надпись на нем повторяет это имя.

Русский

2018-02-05

208.5 KB

0 чел.

ЛАБОРАТОРНАЯ РАБОТА №1

Моя первая программа.

Работа с компонентами TLable, Tbutton, TColorBox.

Цель работы:

Изучение основных свойств компонентов и работа с ними.

1 Краткая теоретическая часть

Любой размещаемый на форме компонент характеризуется некоторым набором параметров: положением, размером, цветом и т. д. Часть этих параметров, например, положение и размеры компонента, можно изменять, манипулируя с компонентом в окне формы. Для изменения других параметров предназначено окно Инспектора объектов. Это окно содержит две страницы - Properties (Свойства) и Events (События). Страница Properties служит для установки нужных свойств компонента, страница Events позволяет определить реакцию компонента на то или иное событие. Совокупность свойств отображает видимую сторону компонента: положение относительно левого верхнего угла рабочей области формы, его размеры и цвет, шрифт и текст надписи на нем и т. п.; совокупность событий - его поведенческую сторону: будет ли компонент реагировать на щелчок мыши или на нажатие клавиш, как он будет вести себя в момент появления на экране или в момент изменения размеров окна и т. п.

Палитра компонентов - это главное богатство Delphi. Она занимает правую часть главного окна и имеет закладки, обеспечивающие быстрый поиск нужного компонента. Под компонентом понимается некий функциональный элемент, содержащий определенные свойства и размещаемый программистом в окне формы. С помощью компонентов создается каркас программы.

Label - метка. Этот компонент используется для размещения в окне не очень длинных однострочных надписей. Он имеет такие основные свойства как:

Caption (название) - изменяет название компонента;

Color (цвет) – изменяет цвет компонента;

Font – позволяет изменить шрифт текста, начертание, размер, видоизменение, цвет;

Visible (видимость )- позволяет сделать объект невидимым на форме при запуске программы

Button - командная кнопка. Обработчик события OnClick этого компонента обычно используется для реализации некоторой команды. Обладает такими же основными свойствами, что и метка: Caption, Color, Font, Visible, кроме того координаты расположения и размер командной кнопки задаются с помощью свойств height, left, top и width.

ColorBox - специальный вариант ComboBox - комбинированного списка выбора, представляющего собой комбинацию списка выбора и текстового редактора. ColorBox предназначен для выбора одного из системных цветов. Класс TColorCombo представляет из себя законченную компоненту которую Вы можете непосредственно поместить палитру компонент Delphi. Этот компонент находится на закладке Additonal, где помещены 18 дополнительных компонентов, с помощью которых можно разнообразить вид диалоговых окон.

Timer - таймер. Этот компонент служит для отсчета интервалов реального времени. Он находится на страницу System. На этой странице представлены компоненты, которые имеют различное функциональное назначение, в том числе компоненты, поддерживающие стандартные для Windows технологии межпрограммного обмена данными OLE (Object Linking and Embedding -связывание и внедрение объектов) и DDE (Dynamic Data Exchange -динамический обмен данными). Технология DDE в современных программах полностью вытеснена гораздо более мощной технологией СОМ, и поэтому соответствующие им компоненты в книге не рассматриваются.

Окно кода предназначено для создания и редактирования текста программы. Этот текст составляется по специальным правилам и описывает алгоритм работы программы. Совокупность правил записи текста называется языком программирования. В системе Delphi используется язык программирования Object Pascal, который представляет собой расширенную и усовершенствованную версию широко распространенного языка Паскаль

Сразу после открытия нового проекта в нем будут такие строки:

unit Unit1;

interface

uses

Windows, Messages, SysUtils, Classes, Graphics, Controls, Frms, Dialogs;

type

TFormI = class(TForm) private

{ Private declarations } public

{ Public declarations } end;

var

Form1: TForm1;

implementation

{SR *.DFM}

end.

Эти строки Delphi автоматически вставляет в окно кода для новой формы.

3 Задание к работе

1. Изучите все свойства необходимых для работы компонентов.

2. Разместите на форме командную кнопку, которая позволяла бы уменьшать шрифт объекта Label на 4 пикселя и увеличивать на 2пикселя.

3. Создайте группу кнопок, позволяющих видоизменять текст (видоизменение, начертание, тип шрифта), используя свойство Font.

4. Увеличьте скорость движения надписи.

4 Порядок выполнения

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

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

Новый компонент имеет стандартное имя Label1, и надпись на нем повторяет это имя. Изменим эту надпись, для этого в окне Инспектора объектов в свойстве Caption удалим стандартное имя

А затем разместим на форме еще один компонент - кнопку - и заставим ее откликаться на событие, связанное с нажатием левой кнопки мыши. Чтобы заставить программу реагировать на нажатие кнопки, необходимо написать на языке object pascal фрагмент программы, который называется обработчиком события.

Этот фрагмент должен представлять собой последовательность текстовых строк, в которых программист указывает, что именно должна делать программа в ответ на нажатие кнопки. Фрагмент оформляется в виде специальной подпрограммы языка Object Pascal - процедуры.

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

procedure TFormI.ButtonlClick(Sender: TObject);

begin

end;

Слово procedure извещает компилятор о начале подпрограммы-процедуры. За ним следует имя процедуры TFormi.ButtonlClick. Это имя - составное: оно состоит из имени класса TForm1 и собственно имени процедуры Button1Click. Слово begin (начало) сигнализирует компилятору о начале последовательности предложений, описывающих алгоритм работы процедуры, а слово end (конец) - о конце этой последовательности.

Пусть наша кнопка будет запускать программу, т.е. присваивать Label1 название «Я начинаю программировать на Delphi!». Назовем кнопку «Пуск».

Введем программный код для кнопки «Пуск»:

procedure TForm1.Button1Click(Sender: TObject);

begin

Label1.Caption:='Я начинаю программировать на Delphi!';

end;

Для командной кнопки «Закрыть»:

procedure TForm1.Button2Click(Sender: TObject);

begin

Close;

end;

Эта кнопка закрывает нашу программу.

Следующая командная кнопка будет увеличивать шрифт текста на 2 пикселя. У свойства Font есть списки, например Size (размер), который Вы можете обнаружить при щелчке в окне Инспектора объектов напротив Font по знаку «+». Код программы выглядит следующим образом:

procedure TForm1.Button3Click(Sender: TObject);

begin

Label1.Font.Size:=Label1.Font.Size+2;

end;

Получаем следующий результат:

Чтобы надпись могла изменять свое положение, разместим на форме четыре командные кнопки, назовем их: «ВЕРХ», «НИЗ», «ПРАВО», «ЛЕВО» и напишем для них фрагменты программ соответственно.

Label1.Top:=Label1.Top-3;

Label1.Left:=Label1.Left+3;

Label1.Top:=Label1.Top+3;

Label1.Left:=Label1.Left-3;

Для изменения цвета поместим на форме ColorBox (комбинированный список цветов). Его обработчик событий имеет следующий вид:

procedure TForm1.ColorBox1Change(Sender: TObject);

begin

Label1.Font.Color:=ColorBox1.Selected;

end;

Теперь пользователь может поменять цвет текста надписи на любой, понравившейся ему.

Чтобы наша надпись могла производить движение, вставим в форму компонент таймер и командную кнопку.

Для таймера в окне кода опишем следующий программный код:

label1.Left:=label1.Left+a;

if (label1.Left=form1.Width-label1.Width-10) then a:=-1;

if label1.Left=0 then a:=1;

А для командной кнопки

a:=1;

Timer1.Enabled:=true;

timer1.Interval:=10;

Необходимо описать переменную «a». Это делается после слова Var.

var

Form1: TForm1;

a:integer;

5 Содержание отчета

1. Титульный лист

2. Название работы

3. Цель работы

4. Краткая теоретическая часть

5. Собственные разработки программы

6. Ответы на контрольные вопросы

6 Контрольные вопросы

1. Что называется классами в Delphi?

2. Какие списки находятся в свойстве Font?

3. Что позволяет делать свойство Visible?

4. Что означает свойство Name?


 

А также другие работы, которые могут Вас заинтересовать

69393. Лазерні принтери (електро-графічні принтери) 42 KB
  Пристрої введення виведенення мови Спілкування користувача із компютером мовою голосом вважається найбільш перспективним з часу початку широкого застосування компютерів однак реалізувати цю задачу ефективними засобами не вдалося проектувальникам і до сьогоднішнього часу і в даний час...
69395. Інтерфейс ПП IBM 360-370 57 KB
  Він передбачає взаємодію на магістралі канали введення виведення та периферійних пристроїв які в даному інтерфейсі називаються абонентами. Абоненти фізично підєднуються до магістралі короткими відведеннями.
69397. Иностранные инвестици 1.03 MB
  Инвестиционная деятельность неотъемлемая часть в функционировании предприятия. Любое предприятие в результате своего функционирования сталкивается с необходимостью вложения средств в свое развитие или выхода из кризисной ситуации
69398. Анализ и синтез системы автоматического регулирования (САР) с заданными показателями качества 1.22 MB
  Проектируемая САР должна поддерживать погрешность на заданном уровне вне зависимости от действия возмущений. Для анализа и синтеза САР в работе применен метод логарифмических амплитудных характеристик (ЛАХ) системы. Он является наиболее удобным благодаря простоте, наглядности и точности
69399. Политический распад Руси 203 KB
  Анализ вчерашнего дня дает возможность избежать ошибок ныне. Это тем более необходимо сегодня, ибо мы живем в динамичное время, обильное идеалами, борющимися друг с другом и порой глубоко враждебными. Определяя задачи и направления своей деятельности, каждый должен быть в определенной степени историком, чтобы стать сознательно действующим гражданином.
69400. Разработка шаблона для web сервиса по учету ошибок программных продуктов 411.5 KB
  HTML, как основа создания WEB-страниц, имеет прямое отношение и к новому направлению изобразительного искусства - WEB-дизайн. Художнику в Интернете недостаточно просто нарисовать красивые картинки, оригинальный логотип, создать новый фирменный стиль. Он должен еще поместить все это в Сети...