практические работы в Delphi
учебно-методический материал по информатике и икт по теме

Практическая работа №1

Тема: ПЕРВЫЙ  ПРОЕКТ

Цель занятия: использование компонентов Label (метка) и Button (кнопка) палитры компонентов Standard, обработка события OnClick – нажатие кнопки.

Задача №1.

Создать программу, выполняющую следующие действия:

После запуска программы по щелчку мышью на кнопке «Приветствие» появляется сообщение «Первые успехи!». Для выхода из программы необходимо щелкнуть мышью на кнопке «Выход».

Новым в этой работе является:

Этапы разработки программы

1.  Откройте новый проект.

2.  Разместите в форме экземпляры компонентов: метку Label и две кнопки Button

3. Выделите кнопку Button2, перейдите в Object Inspector на вкладку Properties, найдите свойство Caption (заголовок) и измените Button2 на заголовок

«Выход». Перейдите на страницу Events окна Object Inspector, найдите событие OnClick, справа от него дважды щелкните мышью. Оказавшись в коде программы, точнее, в заготовке процедуры TForm1.Button2Click, напишите лишь одну команду Close; (обязательно поставьте точку с запятой после «Close»).

procedure TForm1.Button2Click(Sender: TObject);

begin

  Close;

end;

4.  Сохраните код программы и проект под именами, например, Unit2.pas и Pr2.dpr.

5.  Запустите программу, затем закрыть окно проекта, щелкнув на кнопке «Выход».

6.  Выделите форму, в свойстве Caption окна Object Inspector замените слово Form1 на «Мой проект». Это и будет заголовком основного окна программы.  

7.  Выделите кнопку Button1, в свойстве Caption окна Object Inspector замените слово Button1 на название копки «Приветствие». При необходимости увеличьте длину кнопки.

8.  Не снимая выделения с кнопки Button1, перейдите на страницу Events окна Object Inspector и найдите событие OnClick, справа от него дважды щелкните

мышью. Введите следующий код:  Label1.Caption:= ’Первые успехи!’;

9.  Сохраните проект окончательно, запустите и протестируйте его.  

Задача №2.

1. Сделайте шрифт выводимой реплики «Первые успехи!» отличным от стандартного по виду, цвету и размеру.

2. Замените вид кнопки «Выход» на более привлекательный.  

3. Сделайте так, чтобы после нажатия кнопки «Приветствие» на экране  появлялось сообщение «Первые и не последние!».

4. Запустите исполняемый файл Pr2.exe не в среде Delphi, а в Windows.