Заглавная страница Избранные статьи Случайная статья Познавательные статьи Новые добавления Обратная связь FAQ Написать работу КАТЕГОРИИ: ТОП 10 на сайте Приготовление дезинфицирующих растворов различной концентрацииТехника нижней прямой подачи мяча. Франко-прусская война (причины и последствия) Организация работы процедурного кабинета Смысловое и механическое запоминание, их место и роль в усвоении знаний Коммуникативные барьеры и пути их преодоления Обработка изделий медицинского назначения многократного применения Образцы текста публицистического стиля Четыре типа изменения баланса Задачи с ответами для Всероссийской олимпиады по праву
Мы поможем в написании ваших работ! ЗНАЕТЕ ЛИ ВЫ?
Влияние общества на человека
Приготовление дезинфицирующих растворов различной концентрации Практические работы по географии для 6 класса Организация работы процедурного кабинета Изменения в неживой природе осенью Уборка процедурного кабинета Сольфеджио. Все правила по сольфеджио Балочные системы. Определение реакций опор и моментов защемления |
Рис 1. Меню выбора свойств объектаСодержание книги
Поиск на нашем сайте
Уберем выделение со всех компонентов, тем самым в инспекторе объектов будут отображаться свойства формы. Основные свойства формы: Caption — название окна, отображающееся в строке заголовка; Значения BorderStyle: bsDialog — форму можно только переместить и закрыть, кнопки свернуть/развернуть отсутствуют; Основные события формы: onCreate — происходит при создании формы;
Для начала запустите Delphi. После запуска, перед вами появиться окно вашего будущего приложения. Код, который уже сгенерирован, можно просмотреть в окне кода, для перехода к нему нажмите F12. Пока не чего не изменяйте, подробнее его мы рассмотрим в следующих главах. Теперь преступил к созданию первой программы. Первым делом поменяем размер формы, для этого кликнете в любое место формы. Потом отредактируйте свойства ClientHeight и ClientWidth, поставьте значения 150 и 180 соответственно, первое свойство изменяет высоту окна, а второе его ширину. Также можно подписать окно, для этого отредактируем свойство Caption, поставив значение «Программа». Пример получившегося окна приведен на рисунке 1, пример настроек приведен на рисунке 2.
Рис 1 – Пример окна
Рис 2 – Пример настроек
Далее выберите на палитре Standard элемент Button. И поместите его на форме, после этого отредактируйте свойство Caption, поставив значение «ОК», это свойство определяет надпись кнопки. Пример приведен на рисунке 3. Далее выберите на палитре Standard элемент Label. И поместите его на форме, после этого отредактируйте свойство Caption, поставив значение «Здесь будет надпись», это свойство определяет надпись объекта. Пример приведен на рисунке 4. TLabel Основные cвойсва: Все события аналогичны TEdit. Компонент обычно используется для разнообразных подписей, вывода текста сообщений. Name - название компонента;
Рис 3 – Пример окна с размещенной кнопкой
Рис 4 – Пример окна с надписью
После этого выделите кнопку, и перейдите на вкладку Events окна Object Inspector, двойным щелчком левой кнопки мыши, зайдите в событие OnClick, данное событие происходит, когда кто-то нажмет кнопку. После этого произойдет автоматический переход к окну кода и сгенерируется код события приведенный ниже (// авторские комментарии не генерируемые Delphi).
procedure TForm1.Button1Click(Sender: TObject); //Название процедуры begin //начало //место для кода end; //конец
Теперь допишем нужный код для работы нашей программы. А именно код label1.Caption:='Моя первая программа'; Где: Label1 – Название объекта, в нашем случае это надпись. Caption – Свойство объекта. := - оператор присваивания, то есть с помощью этого оператора мы присваиваем новое значение свойству объекта. ‘ – кавычки обозначают, начало и конец строкового значения. ; - оператор закрытия, служит для закрытия операций.
После внесения данного строки код должен выглядеть так:
procedure TForm1.Button1Click(Sender: TObject); begin label1.Caption:='Моя первая программа'; end;
Теперь запустите программу и проверьте её работу путем нажатия кнопки «ОК». Вариант 2. unit Unit1;
interface
uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;
type TForm1 = class(TForm) Button1: TButton; procedure Button1Click(Sender: TObject); private { Private declarations } public { Public declarations } end;
var Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject); begin Form1.Close; end; end. Выложим на форму еще одну кнопку. И по клику на нее будем писать следующий код (для тех кто не уловил как это делается - щелкнем по выложенной кнопке два раза): Button1.Left:=Button1.Left+10; Теперь после нажатия на вторую кнопку первая сместится вправо на 10 пикселей. Жмем F9 и проверяем. Почему мы написали именно так? Многие просто не понимают почему в событиях связанных с Button2 изменяет свое положение кнопка Button1. Постараюсь объяснить доступно. Чтобы обратиться к свойствам любого компонента нужно написать имя этого компонента — в данном случае это Button1. Далее через символ "." осуществляется доступ к его свойствам и методам. Для удобства работы в Delphi после ввода точки было сделанно появление меню в котором отображаются все доступные свойства и методы объекта.
Через точку мы и написали свойство Left, т.е. координаты по горизонтали от левой границы родителя, в данном случае формы. Мы свойству Left присваиваем координату на 10 пикселей больше чем она сама. Свойство Left можно найти в инспекторе объектов. Таким образом можно обратиться к любому свойству которое видно в инспекторе объектов (например поменять Caption кнопки, шинину, высоту, и т. д.) Чтобы поменять размеры кнопки пишем следующий код: Button1.Height:=150; Button1.Width:=150; Код можно написать там же где и изменение координат кнопки.
Свойства расположения. К этим свойствам относятся Width, Height, Top и Left. Это, очевидно, ширина, высота, и две координаты левого верхнего угла нашего компонента. Все эти величины измеряются в пикселях. Приведем пример задания этих свойств для кнопки.
Button1.width:=150; Button1.Height:=15; Button1.top:=50; Button1.left:=50;
Кроме расположения для компонента есть такая характеристика, как его клиентская область. Можно считать, что это сам компонент без своих границ. Ширина и высота клиентской области задается свойствами ClientWidth и ClientHeightсоответственно. К расположению компонента относится также свойство Align типа TAlign. Оно отвечает за выравнивание элемента в контейнере и может принимать следующие значения: alBottom (выравнивание по нижней границе контейнера), alTop (по верхней), alLeft и alRight (по левому и правому краям соответственно), alNone (выравнивания нет) и alClient (выравнивание по всей клиентской области контейнера). Свойство Align полезно при изменении размеров контейнера - компонент автоматически будет принимать новое положение. Теперь перейдем к рассмотрению свойств видимости. Обычно для этого используют свойство Visible для компонентов и для форм Show (для того чтобы показать) и Hide (для того чтобы скрыть).
Пример отображения: buttin1.visible:=true; form1.show;
Пример невидимости: buttin1.visible:=false; form1.hide;
Так же компонент можно отключить, с помощью свойства Enable. Если компонент отключен, то он становиться серым и не доступным.
Включение компонента: button1.enable:=true;
Выключение компонента: button1.enable:=false; Класс TEdit представляет из себя обычное поле для ввода текста. Соответствующий компонент расположен на вкладке Standard Палитры компонентов. Для изучения свойств Edit расположите его на форме. Самое важное свойство для этого компонента - это свойствоText. Разумеется, в нем хранится текст, введенный в наш Edit. Обратите внимание, что текст хранится именно как текст, и, если пользователь, скажем, введет в edit число 23, то оно будет храниться как строка "23", а не как число 23.
edit1.text:=’10’; if strtoint(edit1.text)>0 then showmessage(‘Число положительное’);
Разберем по подробнее этот код. В первой строчке мы меняем значение edit на 10. Далее с помощью команды strtointпреобразуем текст в число. После преобразования сравниваем полученное число с нулем, в случае если полученное число больше нуля, то выводим сообщение с помощью команды showmessage. Свойство MaxLenght определяет максимальную длину вводимого текста. Если оно равно нулю (это значение по умолчанию), то длина текста не ограничена. Из полезных свойств отметим также AutoSelect логического типа. Если оно установлено в true (а по умолчанию так оно и есть), то при получении фокуса нашим edit весь текст в нем выделяется. Это может оказаться полезным, если пользователь скорей всего полностью заменит этот текст. Из свойств отметим еще свойство PasswordChar. Оно понадобится при использовании нашего edit в качестве поля для ввода пароля. Это свойство позволяет задать символ для визуальной замены вводимых пользователем символов. Обычно в этом случае используется звездочка. Из событий для этого компонента чаще всего используется событие OnChange, OnKeyDown, OnKeyPress иOnKeyUp. Первое из них возникает, естественно, при изменении текста в нашем edit, последующие три - при нажатии и отпускании клавиши. Вот как, например, можно использовать событие OnKeyPress для ограничения ввода только цифрами:
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char); begin if not (Key in ['0'..'9']) then Key:=#0 end;
Edit понимает такие стандартные для Windows комбинации клавиш как Ctrl+C (для копирования текста в буфер),Ctrl+X (для вырезания текста), Ctrl+V (для вставки текста), Ctrl+Z (для отмены последнего действия). Изучаем компонент TEdit
|
||
|
Последнее изменение этой страницы: 2024-06-17; просмотров: 28; Нарушение авторского права страницы; Мы поможем в написании вашей работы! infopedia.su Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав. Обратная связь - 216.73.216.198 (0.008 с.) |