Delphi tilida


Procedure TForml.TimerlTimer(Sender: TObject)



Yüklə 3,41 Mb.
səhifə68/133
tarix07.01.2024
ölçüsü3,41 Mb.
#210126
1   ...   64   65   66   67   68   69   70   71   ...   133
sodapdf-converted (1)

Procedure TForml.TimerlTimer(Sender: TObject); 

7.Tuzilgan loyiha ya’ni Projectl va Unitl standart modul nomlarini
mos nomlar bilan almashtirib saqlanadi. 
8.Yangi nom bilan saqlangan loyiha, ya’ni ilova F9 tugmachasini 
bosish bilan ishga tushiriladi. 
Ilova ishga tushirilganda ekranda Oyning Yer atrofida aylanishi 
namoyish qilinadi. 
Tashkil qilingan modulning to‘liq ko‘rinishini keltiramiz: 
Unit px2; 
interface 
Uses 
Windows, Messages, SysUtils, Variants, Classes, Graphics, 
Controls, Forms, Dialogs, StdCtrls, ExtCtrls; 
Type 



Var 

136 


x:=x+0.1; 
Shape2.Left:=265+Trunc(50*Cos(x)); 
Shape2.top:=150-Trunc(50*Sin(x)); 
End; 
Initialization 
x:=0 
end. 

Qism dasturi o‘zgaruvchi x global holda e’lon qilingan. Shu tufayli 


uning boshlangich qiymati Initialization seksiyasida berilgan. 



5.3.Delphining multimedia imkoniyatlari 

• 


MediaPlayer —murakkab vazifalamibajarish uchun, videoroliklarni

Animate komponentasi 

Animate komponentasining belgisi Win32 qatordajoylashgan bo‘lib. 
kadrlari AVI-faylda joylashgan sodda animatsiyani ko‘rishga imkonberadi.
AVI-fayldagi animatsiya tovushli bolishi mumkin bo‘lsa ham Animate 
komponentasi faqat tasvimi aks ettirishga imkon beradi. 
Animate komponentasi formaga oddiy usulda qo‘shiladi. 
Komponenta formaga qo‘shilgandan so‘ng uning xossalarini o‘rnatish 
lozim. Animate xossalari jadvalda keltirilgan: 
Animate komponentasining xossalari: 

Xossa 
Name 


FileName 
StartFrame 

Animatsiyada joylashgan AVI-fayl nomi 


Animatsiyani birinchi kadrining nomeri 

137 

stopFrame 
Color 
Repetitions 
Animatsiyadagi oxirgi kadming nomeri 
Animatsiyani aks ettirish jarayonini 
aktivlashtirish belgisi 
Komponenta fonining rangi 
Animatsiyani aks ettirishda shaffof 
rangdan foydalanish rejimi 
Animatsiyani qaytarish soni 

Agar FileName xossasiga tovushli fayl nomi yozilsa, Delphi faylni 


ochish mumkin emasligi haqida ma’lumot chiqaradi (Cannot open 
AVI). AVI-faylda animatsiya va tovush yoki faqat animatsiya 
yozilganligini aniqlash uchun Windowsda kerakli papkani ochib, AVI- 
faylni belgilash va kontekstli menyudan CBoiicTBa komandasini tanlash 
lozim. Natijada CsoiicTBa oynasi ochilib, Cso^Ka qatorida fayl
haqida toliq ma’lumot beriladi. 
Animate komponentasi dasturchiga Windows standart animatsiyasi- 
dan foydalanishga imkon beradi. Animatsiya turi Sommon AVI xossasi
qiymati bilan belgilanadi. Xossa qiymati nomlangan konstantalar orqali 
beriladi. Quyidagi jadvalda konstantalar qiymatlari, animatsiya turi 
va jarayon ta’rifi berilgan. 




Yüklə 3,41 Mb.

Dostları ilə paylaş:
1   ...   64   65   66   67   68   69   70   71   ...   133




Verilənlər bazası müəlliflik hüququ ilə müdafiə olunur ©azkurs.org 2025
rəhbərliyinə müraciət

gir | qeydiyyatdan keç
    Ana səhifə


yükləyin