«Бағдарламалау тілдері» пәнінен оқу тәжірибесі бойынша



бет50/62
Дата08.02.2022
өлшемі2,7 Mb.
#117933
1   ...   46   47   48   49   50   51   52   53   ...   62
Байланысты:
с

__fastcall TForm3::TForm3(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm3::N4Click(TObject *Sender)
{
Form2->Show();
}
//---------------------------------------------------------------------------
void __fastcall TForm3::N5Click(TObject *Sender)
{
Form1->Close();
}
//---------------------------------------------------------------------------
void __fastcall TForm3::N2Click(TObject *Sender)
{
if (OpenPictureDialog1->Execute())
Image1->Picture->LoadFromFile(OpenPictureDialog1->FileName);
}
4. «Аныктама» / Form4/ терезедегі компоненттер қасиеттерінің және оқиғаларының мәндері:

«Анықтама» терезесінің unit4 мәтіні:
#include
#pragma hdrstop
#include "Unit1.h"
#include "Unit4.h"
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm4 *Form4;
//---------------------------------------------------------------------------


Достарыңызбен бөлісу:
1   ...   46   47   48   49   50   51   52   53   ...   62




©engime.org 2024
әкімшілігінің қараңыз

    Басты бет