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

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

        procedure TForm1.Button1Click(Sender: TObject);
        begin
        Button1.Caption:='УРА! ЗАРАБОТАЛО!'
        end;
        
      7. Сохраните проект. Убедитесь, что кнопка реагирует на щелчок мыши, запустив его на выполнение(F9).
like
Понравилось?
Подпишитесь на рассылку и получайте новые статьи!
Поделитесь в соц. сетях: