| void __fastcall TForm2::N2Click(TObject *Sender) // Файл ->
Ашу пунктінің коды
{
if (OpenDialog1->Execute())
{ Edit1->Text=OpenDialog1->FileName;
MediaPlayer1->FileName=OpenDialog1->FileName;
MediaPlayer1->Open();
}
}
//---------------------------------------------------------------------------
void __fastcall TForm2::N4Click(TObject *Sender)
{
Form3->Show();
}
//---------------------------------------------------------------------------
void __fastcall TForm2::N5Click(TObject *Sender)
{
Form1->Show();
}
//----------------------------------------------------------------------------
3. «Суреттер» /Form3/терезедегі компоненттер қасиеттерінің және оқиғаларының мәндері:
«Суреттер» терезесінің unit3 мәтіні:
#include
#pragma hdrstop
#include "Unit1.h"
#include "Unit2.h"
#include "Unit3.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm3 *Form3;
//---------------------------------------------------------------------------
Достарыңызбен бөлісу: | 
