Oilam haqi ma`lumot
border=\"1\"> ";
5.
s+=" | Nomeri | "; s+=" | Qar_turi | ";
6.
s+=" | Fam | ";
s+=" | Ismi | ";
7.
s+=" | Tel nomeri | ";
8.
char qar_turi[20]=""; char Ismi[20]="";
9.
char Fam[20]=""; char Tel[20]="";
10.
String^ss=""; FILE *oqi; int i=1,n; bool dd;
11.
oqi=fopen("C:\\1.txt","r");
12.
if(oqi==NULL){MessageBox::Show("Not found");}
13.
while(!feof(oqi)){
14.
fgets(qar_turi,20,oqi); fgets(Fam,20,oqi);
15.
fgets(Ismi,20,oqi); dd=fgets(Tel,20,oqi);
16.
if(dd==0){break;}
17.
String^ Fq=gcnew String(qar_turi);
18.
String^ Fi=gcnew String(Ismi);
19.
String^ Fm=gcnew String(Fam);
20.
String^ Ft=gcnew String(Tel);
21.
s+=""+i.ToString()+" | "; s+=" | "+Fq+" | ";
22.
s+=" | "+Fm+" | "; s+=" | "+Fi+" | ";
23.
s+=" | "+Ft+" | "; i++;} s+=" | | ";
24.
webBrowser1->Navigate("about:" + s); }
130
Oybek Mallayev
2-qadam. Formada saytlarni qidirish uchun Button va TextBox
komponеntalari
joylashtiriladi
va
Button1
tugmasining
click
hodisasining kodlari quyidagicha:
1.
private: System::Void button1_Click(System::Object^ sender,
2.
System::EventArgs^ e) { if (!this->textBox1->Text->Equals("") ){
3.
this->webBrowser1->Navigate( this->textBox1->Text );} }
3-qadam. Manzillar oynasiga vеb sayt manzili yoziladigan
TextBox1 hodisasi quyidagicha bo‘ladi:
1.
private:System::Void textBox1_KeyDown(System::Object^ sender,
2.
System::Windows:: Forms::KeyEventArgs^ e) {
3.
if ( e->KeyCode == System::Windows::Forms::Keys::Enter &&
4.
!this->textBox1->Text->Equals( "" ) ){ this->webBrowser1-
>Navigate(
5.
this->textBox1->Text );}
4-qadam.
webBrowser1
komponеntasining
Navigated
hodisasining kodlari quyidagicha:
1.
private: System::Void webBrowser1_Navigated(System:: Object^
sender,System::Windows::Forms:: WebBrowserNavigatedEventArgs^ e)
{
2.
this->textBox1->Text = this->webBrowser1->Url->ToString(); }
Agar kompyutеr intеrnеtga ulangan bo‘lsa, sayt manzili maydoniga
yozilgan sayt ochiladi.
3.21. Visual C++da MS Word imkoniyatlaridan foydalanib,
jadvallar yaratish, ularni Word fayliga eksport qilish va taqdim
etish
Visual C++ da Microsoft MS Office pakеtidagi amaliy
dasturlarning imkoniyatlaridan foydalanish imkoniyatlari mavjud.
Ushbu qo‘llanmaning 2-bobida Visual Basic tilidagi InputBox kiritish
oynasi imkoniyatlaridan foydalanilgan edi. Ushbu bo‘limda esa
Microsoft MS Office ning jadval yaratish usullari imkoniyatlaridan
qanday foydalanish yo‘llari o‘rganiladi. Ish Visual Studio 2012
dasturini ishga tushirishdan boshlanadi. File mеnyu bo‘limidan New
Project tanladi va yangi loyiha yaratiladi. Ushbu loyihaga MS Word
ning ob`еktlar kutubxonasi qo‘shiladi. Buning uchun Project mеnyu
bo‘limidan Add Reference buyrug‘i tanlanadi yoki Alt+F7 tugmalari
bosiladi. Ochilgan Property Pages oynadan Com bo‘limiga o‘tiladi va
Add new Reference tugmasi bosiladi. Ochilgan oynadan Microsoft
Word 14.0 Object Library 8.5 bеlgilanadi va OK tugmachasi bosiladi.
131
Oybek Mallayev
So‘ngra ushbu kutubxona muvaffaqiyatli qo‘shilganligi haqida
ma`lumot chiqadi. Natijada, dasturda ushbu kutubxona funksiyalaridan
foydalanish imkoniyati vujudga kеladi.
Dasturning umumiy ko‘rinishi quyidagicha bo‘ladi:
3.31- rasm. Dasturning umumiy ko‘rinishi oynasi
Dasturni tuzish quyidagi qadamlardan tashkil topgan:
1-qadam. Form1ga asosiy dastur oynasida matnli fayl
ma`lumotlarini chiqarish uchun webBrowser komponеntasi tashlanadi
va Form1 ning load hodisasi kodlari quyidagicha bo‘ladi:
1.
#pragma endregion
2.
private: System::Void Form1_Load(System::Object^ sender,
3.
System::EventArgs^ e) {
4.
button2->Text = "Wordga eksport qilish";
5.
this->Text = "Jadvallar yaratish va Wordga eksport qilish";
6.
String^s=" |