Добавил:
Studfiles2
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз:
Предмет:
Файл:Программа для зачета1 / Unit2
.cpp//---------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "Unit1.h"
#include "Unit2.h"
//---------------------------------------------------------------------
#pragma resource "*.dfm"
TAboutBox *AboutBox;
//---------------------------------------------------------------------
__fastcall TAboutBox::TAboutBox(TComponent* AOwner)
: TForm(AOwner)
{
}
//---------------------------------------------------------------------
void __fastcall TAboutBox::BitBtn1Click(TObject *Sender)
{
Form1->N4->Enabled=true;
Form1->Och->Caption="0";
Form1->Och_not->Caption="0";
Form1->Memo1->Clear();
Form1->Image2->Picture->LoadFromFile("img/wash.bmp");
Form1->Image3->Picture->LoadFromFile("img/wash.bmp");
Form1->Image4->Picture->LoadFromFile("img/wash.bmp");
Form1->Image5->Picture->LoadFromFile("img/wash.bmp");
Form1->Image2->Visible=false;
Form1->Image3->Visible=false;
Form1->Image4->Visible=false;
Form1->Image5->Visible=false;
Form1->Timer1->Enabled=false;
Form1->Timer2->Enabled=false;
Form1->Timer3->Enabled=false;
Form1->Timer4->Enabled=false;
Form1->Label7->Caption="0";
Form1->Label8->Caption="0";
Form1->Label9->Caption="0";
Form1->Label10->Caption="0";
Form1->systime->Enabled=false;
Form1->ss->Caption="0";
Form1->mm->Caption="0";
Form1->hh->Caption="0";
AboutBox->Close();
}
//---------------------------------------------------------------------------
Соседние файлы в папке Программа для зачета1