Теми рефератів
> Реферати > Курсові роботи > Звіти з практики > Курсові проекти > Питання та відповіді > Ессе > Доклади > Учбові матеріали > Контрольні роботи > Методички > Лекції > Твори > Підручники > Статті Контакти
Реферати, твори, дипломи, практика » Новые рефераты » Розробка мультимедіа

Реферат Розробка мультимедіа





T command1 AS commandbutton WITH;=336,;=504,;=27,;=84,;="Закрити" ,; =« Command1 »OBJECT edit1 AS editbox WITH; =« »,;= 1,;=0,;=276,;=24,; =. T.,;=48,;=564,;=RGB (240,240,240),;=RGB (240,240,240),;=RGB (255,255,255),; =RGB (255,255,255),;

Value=[Програма створена за допомогою книги «Visual Foxpro 9 - Клепінін і Агафонова».] + CHR (13) + [У цій програмі Ви зможете слухати музику і дивитися відео. ] + CHR (13) + [Ця програма не вимагає ніяких навиків і умінь, необхідно тільки зарегестріроваться і насолоджуватися улюбленими музикою і відео, що знаходяться у Вас на комп'ютері.],;

ControlSource=«»,; =. F.,;=«Edit1» command1.Click.Release ()

ENDPROC


3.4 Форма registr.scx


У формі registr.scx (див. рис.4) можна не тільки зареєструвати користувачів, але також їх змінювати і видаляти.


Рис. 4

CLASS form1 AS form

PROCEDURE LoadDELETE off=SYS (5) NOT USED («rega») F1 + « Kursovaya dbfs rega.dbf» exclusive IN 0 rega c

PROCEDURE cmdsave.Click=SYS (5) NOT USED («rega») F1 + « Kursovaya dbfs rega.dbf» exclusive IN 0 rega c=2BLANK=thisform.pageframe1.Pagedit.text2.valueLogin WITH thisform.pageframe1.pagedit.text1.ValuePass WITH thisform.pageframe1.pagedit.text2.Valueadm WITH thisform.pageframe1.pagedit.text3.Value=0

thisform.pageframe1.pagedit.Enabled=.F..pageframe1.paglist.Enabled=.T..pageframe1.ActivePage=1.CmdAppendblank.Enabled=.T..CmdEditblank.Enabled=.T..CmdDelblank.Enabled=.T.cmdcansel.Click.CmdAppendblank.Enabled=.T..CmdEditblank.Enabled=.T..CmdDelblank.Enabled=.T..pageframe1.pagedit.Enabled=.F..pageframe1.paglist.Enabled=.T..pageframe1.ActivePage=1=0cmdappendblank.Click=2.CmdAppendblank.Enabled=.F..CmdEditblank.Enabled=.F..CmdDelblank.Enabled=.F..pageframe1.pagedit.Enabled=.T..pageframe1.paglist.Enabled=.F..pageframe1.ActivePage=2.pageframe1.pagedit.text1.Value=«».pageframe1.pagedit.text2.Value=0.pageframe1.pagedit.text3.Value=0cmdeditblank.Click=1.CmdAppendblank.Enabled=.F..CmdEditBlank.Enabled=.F..CmdDelblank.Enabled=.F..pageframe1.paglist.Enabled=.F..pageframe1.pagedit.Enabled=.T..pageframe1.ActivePage=2.pageframe1.pagedit.text1.Value=rega.login.pageframe1.pagedit.text2.Value=rega.pass.pageframe1.pagedit.text3.Value=rega.admcmddelblank.ClickDELETE onnRetMsgBox, nRecno=0=0

nRetMsgBox=MESSAGEBOX («видалити поточний запис?», 4 +32 +256, «видалення»)

IF nRetMsgBox=6! EOF () EOF () BOTTOMEOF () TOP.REFRESH () cmdexit.ClickUSED ([regs]) rega

ENDIF.Release ()

3.5 Форма spravka.scx


Форма spravka.scx (див. рис.5) видає довідку з користування всього програми.


Рис. 5

CLASS form1 AS form

Top=2=24=371=612 =. T.="Довідка"="Form1» OBJECT command1 AS commandbutton WITH;=336,;=504,;=27,;= 96,;="Закрити",;=«Command1» OBJECT edit1 AS editbox WITH;=1,;=0,;=276,;=24,; =. T.,;

Top=48,;=576,;=RGB (240,240,240),;=[Для того щоб можна було слухати музику, необхідно: 1) У верхньому контекстному меню вибрати ряд...


Назад | сторінка 4 з 7 | Наступна сторінка





Схожі реферати:

  • Реферат на тему: Типи даних в Object Pascal
  • Реферат на тему: Програмування на мові Object Pascal
  • Реферат на тему: Реалізація алгоритму визначення n! засобими Object Pascal 2.0
  • Реферат на тему: Програма, призначена для відтворення відео файлів
  • Реферат на тему: Регіональна інвестиційна програма як форма державного управління інвестіцій ...