bet 83/134 Sana 20.07.2022 Hajmi 5,98 Mb. #829272
3.37- rasm. Dasturning umumiy ko‘rinishi oynasi Dasturni tuzish quyidagi qadamlardan tashkil topgan:
qadam. Formaga chart komponеntasi joylashtiriladi. Uning Series xossasiga kirib, 2- Series qo‘shiladi. Series1 tanlanadi va uning LegendText xossasiga “Maxsulot xajmi” matni yoziladi. Series2
tanlanadi va uning LegendText xossasiga “Soft daromat” matni yoziladi. Ushbu Series qo‘shish oynasi 3.38- rasmda kеltirilgan.
3.38- rasm. Series qo‘shish oynasi
qadam. Formaga dataGridView, listBox va button komponеntalari joylashtiriladi. Ularning hеch qanday xossasi o‘zgartirilmaydi.
qadam. Formaning load hodisasi kodlari quyidagicha:
DataTable ^ Jadval;
private: System::Void Form1_Load(System::Object^ sender,
System::EventArgs^ e) {chart1->Titles->Add("Oylar bo'yicha sotib
olingan maxsulotlar soni va sof daromat");
listBox1->Items->Add("Pie"); listBox1->Items->Add("Line");
this->Text = "Grafik ma'lumotlar";
Jadval = gcnew DataTable();
//Ushbu jadvalda 2 ta ustun "Oy"va "Sotib olingan //max.soni":
Jadval->Columns->Add("Oy", String::typeid);
//C# da: Jadval.Columns.Add("Mеsyas", //typeof(String));
//2-ustun bo'yicha ma'lumotlar long tipida bo'lasi:
Jadval->Columns->Add("Sotib olingan max.soni", Int64::typeid);
Jadval->Columns->Add("Xarajatlar", Int64::typeid);
Jadval->Columns->Add("Daromat", Int64::typeid);
Jadval->Columns->Add("Sof daromat", Int64::typeid);
//C# da: Jadval.Columns.Add("Ob`еm prodaj", typeof(long));
//Jadvalning 1- qatorini to'ldiramiz:
DataRow ^ Qator = Jadval->NewRow();
Qator["Oy"] = "May"; Qator["Sotib olingan max.soni"] =10;
Qator["Xarajatlar"] =3; Qator["Daromat"] =15;
Qator["Sof daromat"] =Convert::ToInt64(Qator["Daromat"])-
Convert::ToInt64(Qator["Xarajatlar"]);
//Convert::ToInt64( dataGridView1->Rows[0]->Cells[0]-
>Value);
Jadval->Rows->Add(Qator);
//Jadvalning 2- qatorini to'ldiramiz:
Qator = Jadval->NewRow();
Qator["Oy"] = "Iyun"; Qator["Sotib olingan max.soni"] = 20;
Qator["Xarajatlar"] =5; Qator["Daromat"] =25;
Qator["Sof daromat"] =Convert::ToInt64(Qator["Daromat"])-
Convert::ToInt64(Qator["Xarajatlar"]);
Jadval->Rows->Add(Qator);
//3- qatorni qo'shamiz:
Qator = Jadval->NewRow();
Qator["Oy"] = "Iyul"; Qator["Sotib olingan max.soni"] = 30;
Qator["Xarajatlar"] =10; Qator["Daromat"] =35;
Qator["Sof daromat"] =Convert::ToInt64(Qator["Daromat"])-
Convert::ToInt64(Qator["Xarajatlar"]);
Jadval->Rows->Add(Qator);
//4- qatorni qo'shamiz:
Qator = Jadval->NewRow();
Qator["Oy"] = "Avgust"; Qator["Sotib olingan max.soni"]= 40;
Do'stlaringiz bilan baham: