Лаборатория иши топшириқлари мавзу: Кичик лойиҳалар яратиш: Матнли майдонга парол киритиш, сатрларга қайта ишлов бериш

5- жадвалдаги топшириқларни бажариш учун услубий кўрсатмалар.
Visual C++ дастурида 30 – вариантдаги масалани Windows Application муҳитида ишланиши:


1-қадам. Формага 2 та TextBox, 2 та label, 1 та Button компоненталари жойлаштирилади. Button компонентасини onclick ходисасига қуйидаги кодлар ёзилади:
char satr[200]="";
for(int i=0; iText->Length; i++){
satr[i]=textBox1->Text[i];}
for(int i=0; i{ if(satr[i]==' '){satr[i]='_';}}
String^ s=gcnew String(satr);
textBox2->Text=s;


2-қадам. Form1 нинг load ходисасига қуйидаги кодлар ёзилади:
label2->Visible=false;
label1->Text="Parolni kiriting";
textBox2->Visible=false;
button1->Visible=false;
Button^ button4 = gcnew Button();//button яратиш
button4->Font = gcnew System::Drawing::Font("Courier New", 16.0F, FontStyle::Italic);
textBox1->PasswordChar = '*';//кодлар терилганда * //кўринишида бўлишини таъминлайди
textBox1->Font = gcnew System::Drawing::Font("Courier New",16.0F);
textBox1->Size = Drawing::Size(208, 35);
Form1::Height=200;
Form1::Width=230;
button4->Visible = true;
button4->Size = Drawing::Size(100, 30);
button4->Location = Drawing::Point(50, 90);
button4->Text = "Ok";
this->Controls->Add(button4);
parol="Salom";
button4->Click += gcnew EventHandler(this, &Form1::ЩелчокНаКнопке );


3-қадам. Сатрларга ишлов берувчи функциялар кутубхонаси эълон қилинади ва ЩелчокНаКнопке функцияси тузилади:
#pragma once
#include
private: System::Void ЩелчокНаКнопке(System::Object^ sender, System::EventArgs^ e){
newparol=textBox1->Text;
if(parol==newparol){
textBox1->Size = Drawing::Size(208, 242);
Form1::Size=Drawing::Size(503,369);
textBox1->Location = Drawing::Point(20, 35);
textBox1->Text = "";
textBox1->PasswordChar = NULL;
label1->Text="Kiruvchi ma'lumotlar";
label1->Visible=true;
label2->Visible=true;
textBox1->Visible=true;
textBox2->Visible=true;
button1->Visible=true;}
else {
System::Windows::Forms::FormClosingEventArgs^ r;
auto MBox = MessageBox::Show("Yana urunib ko'rasmi?", "Xato", MessageBoxButtons::YesNoCancel, MessageBoxIcon::Exclamation);
// YES — диалог; NO — выход; CANCEL - редактировать
if (MBox == Windows::Forms::DialogResult::No) return;
if (MBox == Windows::Forms::DialogResult::Cancel){ this->Close();}
if (MBox == Windows::Forms::DialogResult::Yes)
{ textBox1->Text="";
} } }

Дастурнинг умумиу кўриниши 5.1-расмда келтирилган.