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



бет51/63
Дата06.01.2022
өлшемі2,75 Mb.
#14335
1   ...   47   48   49   50   51   52   53   54   ...   63
Байланысты:
000ee066-e66f71bc

__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   ...   47   48   49   50   51   52   53   54   ...   63




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

    Басты бет