Изучение основ интегрированной среды разработки языка программирования С++ Builder: Методические указания к лабораторной работе № 5 по дисциплине “Микропроцессорные информационно-управляющие системы и устройства железнодорожного транспорта”, страница 10

- выделить компонент Button1 (щёлкнуть один раз левой кнопкой мыши по компоненту Button1, расположенному на Форме);

- перейти в окно Инспектора объектов на страницу Properties;

- изменить текст свойства Caption, который по умолчанию имеет вид Button1, на русский текст "Пуск".

6.3.2.4. Аналогичным образом занести в заголовок компонента Button2 русский текст "Закрыть".

6.3.2.5. После выполнения операций по занесению текста на русском языке в заголовки соответствующих компонентов Форма примет вид, по­казанный на рис. 16.

6.3.3. Установить необходимые свойства для компонента Timer1:

- выделить компонент Timer1, щелкнув один раз левой кнопкой мыши по компоненту Timer1 на Форме;

- перейти в окно Инспектора объектов на страницу Properties;

- изменить свойство Enabled (разрешение), которое по умолчанию имеет вид true (истинное), на false (ложное), тем самым запрещая работу Timer1;

- изменить свойство Interval (интервал), которое по умолчанию имеет 1000 мс, на 2000 мс (две секунды).

6.3.4.Создать обработчики событий.

6.3.4.1. Создать обработчик событий для компонента Button1:

- щёлкнуть два раза левой кнопкой мыши по компоненту Button1 (кнопка "Пуск"), находящемуся на Форме, - в окне Редактора кода, в фай­ле реализации, появится функция вида:

void__fastcall TForm1::Button1Click(TObject*Sender)

 {

  }

6.3.4.2. Аналогичным образом создаётся обработчик событий для компонента Button2 (кнопка "Закрыть") - в файле реализации появится функция вида:

void__fastcall TForm1::Button1Click(TObject*Sender)

{

 }

6.3.4.3. Обработчик событий для компонента Timer1 (таймер) созда­ётся аналогично тому, как это делается для кнопок "Пуск" и "Закрыть" - в файле реализации появится функция вида:

void__fastcall::Timer1Timer(TObject*Sender)

{

}

6.3.4.4. После сохранения проекта, выполнения операций визуально­го проектирования головной файл проекта, заголовочный файл и файл реа­лизации примут вид, показанный на рис. 17, 18, 19 соответственно.

PauseProject1.cpp                                         01.10.02                                            8:52:46

//--------------------------------------------------------------------------------------------------------------------------

# include <vcl.h>

#pragma hdrstop

USERES(“Project1.res”);

USEFORM(“Unit1.cpp”, Form1);

//--------------------------------------------------------------------------------------------------------------------------

WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)

{

               try

               {

                              Application->Initialize();

                              Application->CreateForm(__classid(TForm1)&Form1);

                              Application->Run();

               }

               catch ( Exception &exception)

               {

                              Application->ShowException(&exception);

               }

               Return 0;

}

//--------------------------------------------------------------------------------------------------------------------------

#include <Extrls.hpp>

//--------------------------------------------------------------------------------------------------------------------------

Class TForm1 : public TForm

{

__published:      //IDE-managed Components

               TLable* Lable1;

               TLable* Lable2;

               TButton*Button1;

               Tbutton*Button2;

               TTimer*Timer1;

               void__fastcall Button1Click(TObject*Sender);

               void__fastcall Button2Click(TObject*Sender);

               void__fastcall Timer1Timer(TObject*Sender);

private: // User declarations

public:          // User declarations

               ­­__fastcall TForm1(TComponent*Owner);

};

//--------------------------------------------------------------------------------------------------------------------------

Extern PACKAGE TForm1*Form1