Программалау технологиясы

4.6-сурет. Студенттер терезесі 

4.7-сурет. Оқытушылар терезесі 
 
// «Студенттер
» 
батырмасының оқиға ӛңдеуші коды 
void __fastcall
TForm1::Button1Click(TObject *Sender) 
{ 
Form2->Show(); 
} 
// «Оқытушылар» батырмасының оқиға ӛңдеуші коды 
void __fastcall
TForm1::Button2Click(TObject *Sender) 
{ 
Form3->Show(); 
} 
//«Программаны жабу
»
батырмасының оқиға ӛңдеуші коды 
void __fastcall TForm1::Button3Click(TObject *Sender) 
{ 
Form1->Close(); 
} 
«Студенттер» терезесі (Form2) үшін жазылған программа мәтіні:
#include "Unit2.h" 
#include "Unit1.h" 
#include "Unit3.h" 
//--------------------------------------------------------------------------- 
#pragma package(smart_init) 
#pragma link "SHDocVw_OCX" 
#pragma resource "*.dfm" 
TForm2 *Form2; 
//--------------------------------------------------------------------------- 

жүктеу/скачать 2,48 Mb.

Достарыңызбен бөлісу: