- выделить компонент 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
Уважаемый посетитель!
Чтобы распечатать файл, скачайте его (в формате Word).
Ссылка на скачивание - внизу страницы.