Laboratoriya jumısı_3

Laboratoriya jumısı 3 .11

Pusk-programmı-Borland C++Builder 6. Nátiyjede tómendegishe taza Project 1 ayna ashıladı.

File-Save Project As… tańlaymız nátiyjede tómendegi ayna ashıladı.

Work 3 papka jaratıp sonıń ishine saqlaymız.

Komponentalar palitrasınan Standart vkladkasın tańlaymız.

MainMenu knopkasın tańlap Form1 aynasına mısh penen tartıp qoyamız.

Soń MainMenu knopkasın eki reet shertemiz. Ashılǵan aynanıń Properties-Saption-File dep jazıp Enter di basamız. File bólimin tańlaymız oǵan Open dep jazamız. Keyingisine Close di jazamız. Soń Exit sózin jazamız.

Keyin Open ge barıp mıshtıń oń knopkasın basamız ashılǵan aynadan Sreate Submenu tańlaymız. Kórinisi tómendegishe. Onıń Properties-Saption ge Nimanidur chikar? sózin jazamız.

Ekinshi menyuge ótemiz. Properties-Saption- Edit sózin jazamız hám Enter di basamız.

Úshinshi menyuge ótemiz. Properties-Saption- Help sózin jazamız hám Enter di basamız.

File menyudiń Edit ti eki ret shertemiz . Unit1.cpp aynasında mına kórinistegi kod payda boladı.Sonıń ishine tómendegilerdi jazamız:

Application->Terminate();

Form1 aynasındaǵı mına MainMenu knopkasın eki reet shertemiz.

File menyudiń Open ti eki ret shertemiz . Unit1.cpp aynasında mına kórinistegi kod payda boladı.Sonıń ishine tómendegilerdi jazamız:

Form1 -> Caption ="Fayl - Otkrıt";

Form1 aynasındaǵı mına MainMenu knopkasın eki ret shertemiz.

File ózin eki ret shertemiz . Unit1.cpp aynasında mına kórinistegi kod payda boladı.Sonıń ishine tómendegilerdi jazamız:

Form1 -> Caption ="Fayl";

Form1 aynasındaǵı mına MainMenu knopkasın eki reet shertemiz.

File menyudiń Open –Nimanidur chikar? ti eki ret shertemiz . Unit1.cpp aynasında mına kórinistegi kod payda boladı.Sonıń ishine tómendegilerdi jazamız:

Form1 -> Caption ="Fayl - Otkrıt - Chto-nibud";

Application->MessageBox("Ameliy xam Laboratoriya jumısların orınlan bolmasa baxanız 2 ...",

"Xammege eskertiu:", MB_OK);

Aqırında Run tańlaymız.