O’zbekiston respublikasi raqamli texnologiyalarvazirligi toshkent axborot texnologiyalari universiteti farg‘ona filiali

O’ZBEKISTON RESPUBLIKASI 
RAQAMLI 
TEXNOLOGIYALARVAZIRLIGI 
 
TOSHKENT AXBOROT 
TEXNOLOGIYALARI UNIVERSITETI 
FARG‘ONA FILIALI
 
 
 guruh talabasi Axmadaliyev Faxriddinning 
Dasturlash 2 fanidan
 
 
 
 
 
 
 
 
 
 
 
Topshirdi: Axmadaliyev Faxriddin 
Qabul Qildi: Xoshimov .B 

Mavzu:C++ Builder Dasturida Bloknot dasturini yaratish. 
Kirish
Forma komponentalari bu dasturni boshqarish uchun maxsus tugmachalar
bo‘lib uni formaga joylashtirishdan oldin
bosh oynadan kerakli komponentalar
palitrasi tanlanadi. Masalan, Standart (Standart) komponentalar palitrasida
quyidagi piktogrammalar (tugmachalar) majmuasi mavjud:
Birinchi novbatda Form4 oynasiga Panel yaratib olamiz.
MainMenu 
- dastur bosh menyusi. Komponenta murakkab ierarxik
strukturali menyu yaratish uchun xizmat qiladi.
Kerakli komponentalar tanlab yozib olamiz. masalan:Fayl tahrirlash,shrift yordam 
kabi menularni kitib shuni elementlarini yozib olamiz. Yani 
yangi,ochish,saqlash,chiqish, 
yordam kabi…………..lar.

Dialog menusidan bizga kerakli bo’lgan Saqlash Ochish hamda Shriftlar 
bo’limlarini tanlab olamiz. 

Keyin har bir yozgan element buttonlarimizga kerakli kodlarni yozib olamiz. 
Shriftlar bo’limiga dialogdan olgan 
shriftlar funkdiyasini kodlar yordamida ulab 
olganmiz.shuning uchun bemalol ishlatsak bo’ladi bu bo’limni.

Endi yaratgan Dasturimizga biron malumot yozib saqlab koramiz. Va ekranda 
shunday oyna chiqish kerak. 
 
 
 
 

Dasturni ishga tushiramiz. 
 
Dastur kodlari: 
//--------------------------------------------------------------------------- 
#include  
#pragma hdrstop 
#include "Unit4.h" 
//--------------------------------------------------------------------------- 

#pragma package(smart_init) 
#pragma resource "*.dfm" 
TForm4 *Form4; 
String faylnomi; 
//--------------------------------------------------------------------------- 
__fastcall TForm4::TForm4(TComponent* Owner) 
: TForm(Owner) 
{ 
} 
//--------------------------------------------------------------------------- 
void __fastcall TForm4::Ochish1Click(TObject *Sender) 
{ 
if (OpenDialog1->Execute()) 
{ 
RichEdit1->Lines->LoadFromFile(OpenDialog1->FileName ); 
} 
} 
//--------------------------------------------------------------------------- 
void __fastcall TForm4::Yanginombilansaqlash1Click(TObject *Sender) 
{ 
if(SaveDialog1->Execute()) 
{ 
RichEdit1->Lines->SaveToFile(SaveDialog1->FileName); 
faylnomi=SaveDialog1->FileName ; 
} 
} 
//--------------------------------------------------------------------------- 
void __fastcall TForm4::Yangi1Click(TObject *Sender) 
{ 
RichEdit1->Lines->Clear(); 
} 
//--------------------------------------------------------------------------- 
void __fastcall TForm4::Saqlash1Click(TObject *Sender) 

{ 
if(RichEdit1->Modified) 
{ 
RichEdit1->Lines->SaveToFile(faylnomi); 
} 
} 
//--------------------------------------------------------------------------- 
void __fastcall TForm4::Shriftniozgartirish1Click(TObject *Sender) 
{ 
if(FontDialog1->Execute()) 
{ 
RichEdit1->Font=FontDialog1->Font; 
} 
} 
//--------------------------------------------------------------------------- 
void __fastcall TForm4::Dasturhaqida1Click(TObject *Sender) 
{ 
ShowMessage(" Ushbu dastur Axmadaliyev Faxriddin tomonidan yaratilgan "); 
} 
//--------------------------------------------------------------------------- 
void __fastcall TForm4::Nusxaolish1Click(TObject *Sender) 
{ 
RichEdit1->SelectAll() ; 
RichEdit1->CopyToClipboard(); 
} 
//--------------------------------------------------------------------------- 
void __fastcall TForm4::Xotiradanqoyish1Click(TObject *Sender) 
{ 
RichEdit1->PasteFromClipboard(); 
} 
//--------------------------------------------------------------------------- 

void __fastcall TForm4::Qirqibolish1Click(TObject *Sender) 
{ 
RichEdit1->SelectAll() ; 
RichEdit1->CopyToClipboard(); 
RichEdit1->Clear() ; 
} 
//---------------------------------------------------------------------------