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



бет21/44
Дата03.10.2023
өлшемі2,7 Mb.
#183587
1   ...   17   18   19   20   21   22   23   24   ...   44
Байланысты:
«Бағдарламалау тілдері» пәнінен тәжірибелік жұмыстар жинағы

void __fastcall TForm1::Button1Click(TObject *Sender)
{
int I, J, K;
K = 0;
for (I = 0; I < StringGrid1->ColCount; I++)
for (J = 0; J < StringGrid1->RowCount; J++)
StringGrid1->Cells[I][J] = IntToStr(++K);
}
Кестедегі бағандардың енін өзгерту үшін типі іnt болатын DefaultColWidth қасиеті, ал кесте жолының биіктігін өзгерту үшін DefaultRowHeight қасиеттері қолданылады. Мысалы, программада терезенің өлшемдері өзгергенде кесте ұяшықтарының /баған мен жолдың/ өлшемдерін өзгерту келесі түрде жазылады:
void __fastcall TForm1::FormCreate(TObject *Sender)
{
if (DrawGrid1->DefaultColWidth > 90)
DrawGrid1->GridLineWidth = 2;
else
DrawGrid1->GridLineWidth = 1;
}
GridLineWidth қасиетін кесте ұяшығын көмкеріп тұрған сызықтарының қалыңдығын немесе жіңішкелігін беру үшін қолданады. Әдетте оның мәні 1-ге тең болып тұрады, егер оны 3-ке өзгертсеңіз онда кесте ұяшықтары қалың бояулы сызықпен көмкерілетін болады.


Тапсырмалар
1-деңгей

Үшбұрыштың ауданын, биіктігі мен табаны бойынша есептеуді орындайтын қарапайым қосымша құру. Қосымша терезесі келесі түрде болуы қажет /1-сурет(а,б)/.





1-сурет. а) Форма терезесі



1-сурет. в) Қосымша терезесі
Орындалуы:
1. File -> New -> Application командалары орындалады.
2. Жаңа құрылған жобаны сақтау үшін Filе-> Save All командасы орындалады. Жоба құрамына кіретін файлдардың бір бумада сақталуы қажет.
3. Форма терезесіне қажет компоненттер /1-суреттегідей/ орналастырылып және олардың келесі қасиеттері өзгертіледі:



«Есептеу» деп аталатын батырмаға екі рет шертіліп, пайда болған терезеге келесі код жазылады:


void __fastcall TForm1::Button1Click(TObject *Sender)


Достарыңызбен бөлісу:
1   ...   17   18   19   20   21   22   23   24   ...   44




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

    Басты бет