«Бағдарламалау тілдері» пәнінен оқу тәжірибесі бойынша
жүктеу/скачать 2,75 Mb.
|
| void __fastcall TForm3::TForm3(TComponent* Owner)
: TForm(Owner) { }
void __fastcall TForm3::ComboBox1Change(TObject *Sender) {
Memo1->Lines->LoadFromFile("Мухтаров.txt");
Memo1->Lines->LoadFromFile("Асанова.txt"); } //«КЕЙІН» батырмасының оқиға өңдеуші коды void __fastcall TForm3::Button1Click(TObject *Sender) { Form1->Show(); Form3->Close(); Form2->Hide(); } 3-деңгей А(5,5) матрицаның бағандары мен жолдарын алмастырғанда шығатын матрицаны көрсетіңіз. Программа терезесі 5-суретте көрсетілген. 5-сурет. Программа терезесі. Программа терезесіндегі компоненттердің қасиеттерін өзгерту: Программа мәтіні: #include #pragma hdrstop #include "Unit1.h" #include "stdlib.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma resource "*.dfm" TForm1 *Form1; //--------------------------------------------------------------------------- __fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner) { }
void __fastcall TForm1::N3Click(TObject *Sender) { Form1->Close(); } //--------------------------------------------------------------------------- void __fastcall TForm1::N4Click(TObject *Sender) { for(int i=0;i<5;i++) for(int j=0;j<5;j++) StringGrid1->Cells[i][j]=IntToStr(i+j-2); } //--------------------------------------------------------------------------- void __fastcall TForm1::N5Click(TObject *Sender) { for(int i=0;i<5;i++) StringGrid1->Rows[i]->Clear(); } //--------------------------------------------------------------------------- void __fastcall TForm1::N6Click(TObject *Sender) { for(int i=0;i<5;i++) for(int j=0;j<5;j++) StringGrid1->Cells[i][j]=IntToStr(rand()%100-27); } //--------------------------------------------------------------------------- void __fastcall TForm1::N7Click(TObject *Sender) { for(int i=0;i<5;i++) StringGrid1->Cols[i]->Clear(); } //--------------------------------------------------------------------------- void __fastcall TForm1::Button1Click(TObject *Sender) { for(int i=0;i<5;i++) for(int j=0;j<5;j++) StringGrid2->Cells[j][i]=StringGrid1->Cells[i][j]; } //--------------------------------------------------------------------------- жүктеу/скачать 2,75 Mb. Достарыңызбен бөлісу:
|