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



бет38/62
Дата08.02.2022
өлшемі2,7 Mb.
#117933
1   ...   34   35   36   37   38   39   40   41   ...   62
Байланысты:
с

void __fastcall TForm1::Button2Click(TObject *Sender)
{
if (Edit1->Text=="")
{ShowMessage("Massiv elementterinin sanin beriniz");
Edit1->SetFocus();}
Elem_sani=StrToInt (Edit1->Text);
for(int i=0; i{ a[i]= (float) random(100)/7-3;
Memo1->Lines->Add("a["+IntToStr(i)+"]=
"+FloatToStrF(a[i],ffGeneral,3,1));}
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormActivate(TObject *Sender)
{Edit1->SetFocus();}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button4Click(TObject *Sender)
{Form1->Close();}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button3Click(TObject *Sender)
{Memo1->Clear(); Memo2->Clear();
Edit1->Clear(); Edit2->Clear(); Edit3->Clear();}
//---------------------------------------------------------------------------


2- деңгей

2. Студенттер туралы мәліметтер (фамилиясы, аты және туған жылы) класс түрінде анықталған. Группадағы студенттер туралы мәліметтерді сұрыптауды (фамилиясын немесе


атын алфавит бойынша, туған жылдарын кему реті бойынша орналастыру) орындайтын программа жазыңыз. Программа терезесі 2.2.2- суретте көрсетілген.



3.2.2-сурет. Студенттер туралы мәліметтер

Терезедегі компоненттер қасиеттерінің және оқиғаларының мәндері:






Программаның мәтіні:
#include "Unit1.h"
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;


Достарыңызбен бөлісу:
1   ...   34   35   36   37   38   39   40   41   ...   62




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

    Басты бет