
Практическая работа, целью которой является создание несложного проекта в среде визуального программирования Lazarus.
- Запустить среду программирования: Lazarus.
- Сохранить проект: Проект — Сохранить проект как…. Сохранить Unit1. Создать в проекте новую папку Primer_1, и сохранить.
Так мы сохраним файл Unit1.pas, который содержит текст программы. Откроется окно Сохранить проект, в котором также необходимо щёлкнуть по кнопке Сохранить и сохранить файл Project1, который содержит общие сведения о проекте. Приступим к визуальному программированию. - Выделим форму ( F12) — Form1.
- В окне инспектора объектов в свойстве Caption (Заголовок) вместто Form1 напишите Пример 1. В панели компонентов выберите компонент Tbutton и поместите на форму . Для этого щелкнете мышкой: первый раз — по компоненте, второй раз — по окну формы. Форма примет вид:
- Чтобы кнопка реагировала на щелчок мыши, выделите объект кнопка Button1.
Пусть, при щелчке по кнопке, выйдет сообщение : «УРА! ЗАРАБОТАЛО!». - На вкладке События Инспектора объектов выберите событие OnClick – и дважды щёлкните в поле справа от названия, а затем на кнопке. В месте курсора между словами begin и end напишите:
Button1.Caption:=’УРА! ЗАРАБОТАЛО!’ В окне редактора появиться следующий текст:[html]procedure TForm1.Button1Click(Sender: TObject);
begin
Button1.Caption:=’УРА! ЗАРАБОТАЛО!’
end;
[/html] -
Сохраните проект. Убедитесь, что кнопка реагирует на щелчок мыши, запустив его на выполнение(F9).