R. A. Yusupov C++ Builderda masalalar va topshiriqlar samarqand 2018 yil

void __fastcall TForm1::BitBtn1Click(TObject *Sender) {

if ( OpenDialog1->Execute() ) {

// foydalanuvchi faylni tanladi

ListBox1->Clear(); // ro'yxatni tozalash

aPath = ExtractFilePath(OpenDialog1->FileName);

Form1->Caption = "Rasmni ko'rish - "+ aPath;

if(FindFirst(aPath+"*.jpg",faAnyFile,aSearchRec)==0)

{

ListBox1->Items->Add(aSearchRec.Name);

while(FindNext(aSearchRec)==0)//keyingi rasmni top.

{

ListBox1->Items->Add(aSearchRec.Name);

}

// foydalanuvchi tanlagan fayl o'rnini ListBox

// ro'yxatidan aniqlash va uni tasvirlash

int n = ListBox1->Items->

IndexOf(ExtractFileName(OpenDialog1->FileName));

ListBox1->ItemIndex = n;

Label1->Caption = ListBox1->Items->Strings[n];

Image1->Picture->LoadFromFile(aPath +

ListBox1->Items->Strings[n]);

}

}

}

Kalkulyator

Kalkulyator dasturi (1.9-rasm) oddiy hisoblashlarni bajarishga imkon beradi. Shunga e’tibor beringki, indikator sifatida StaticText komponentasidan foydanilgan.