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

int top,left; // ekranning chap yuqori burchagi

int sw, sh; // ekran o’lchami (kengligi, balandligi)

int mw, mh; // ekranning mumkin bo’lgan maksimal

//o’lchami (oynaning joriy o’lchamini aniqlaydi)

float kw, kh; // kadrni mashtablashtirish koefsenti

// kenglik va balandlik bo’yicha

float k; // kadrni mashtablashtirish koefsenti

OpenDialog1->Title = "Klipni tanlash";

OpenDialog1->InitialDir = "";

OpenDialog1->Filter=

"Barcha formatlar|*.avi;*.mpg;*.mpeg|"

"AVI|*.avi|MPG|*.mpg|MGEG|*.mpeg";

if (!OpenDialog1->Execute() )

return; // foydalanuvchi Отмена tugmasini bosdi

/* Klip faylini ochishga o’rinishda, yani oldindan ochilgan bo’lsa, xatolik ro’y beradi. */

if (MediaPlayer1->FileName==OpenDialog1->FileName)

return;

/* Foydalanuvchi klipni tanladi. Klipni chiqarish kerak bo’lgan "ekran"ning xolatini va o’lchamini berish. Buning uchun, klip kadrlarining o’lchamini bilish kerak. */

// kadr o’lchamini olish

GetFrameSize(OpenDialog1->FileName,&fw, &fh);

// kadrning maksimal imkoniyatini hisoblash

mw = Form1->ClientWidth;

mh = Form1->Panel1->Top-10;

if (fw < mw)

kw=1;// kadr kenglik bo’yicha ekran o’lchamidan

// kichik