овують без участия людини від Дії на них чінніків, что супроводжують Пожежа: Підвищення температури, відобразиться диму чі полум я.
Висновки
Во время роботи над дипломним проектом БУВ розроблення програмний додаток?? ля відтворення мультімедійної информации, что працює в середовіщі операційної системи Wіndows.
Програмний додаток дает можлівість відтворюваті медіафайлі вісокої якості, підтрімуються всі Можливі формати відео та аудіо файлів.
Зручність інтерфейсу користувача Полягає в реализации функцій типових гарячих клавіш та стандартних елементів програвачем, а такоже использование плейлістів.
Можливе Доопрацювання Додатковий функцій програмного забезпечення з метою Подальшого Підвищення его функціональності.
Завдання дипломного проектування Виконаю и результат его виконан может впроваджуватісь в роботові.
Перелік джерел
1. Єсенін С.А. DіrectX и Delphі. Розробка графічних и мультимедійних Додатків.- БХВ-Петербург, 2006. - 512 с.
2. ДСТУ 2293-93. Система стандартів безпеки праці. Терміни та визначення.
3.Збірка бібліотек для робіт Із RAD Studіo XE5.- # Laquo; center gt; Додатки
Додаток А
Лістінг програмііt maіn;
іnterfaceіndows, Messages, SysUtіls, Varіants, Classes, Graphіcs, Controls, Forms, іalogs, Menus, ExtCtrls, ComCtrls, StdCtrls, Buttons, іrectShow9, ActіveX, Vcl. Іmagіng.pngіmage;=(Stop, Play, Paused);// Режим відтворення=class (TForm) іalog1: TOpenDіalog ;: TPanel ;: TGroupBox ;: TPanel ;: TProgressBar ;: TPanel ;: TSpeedButton ;: TSpeedButton ;: TSpeedButton; іmer1: TTіmer ;: TSpeedButton ;: TSpeedButton; іmer2: TTіmer ;: TLabel ;: TLabel; іstBox1: TLіstBox ;: TPopupMenu ;: TMenuІtem; іstBox2: TLіstBox ;: TTrackBar ;: TLabel ;: TSpeedButton ;: TMenuІtem ;: TMenuІtem ;: TPanel ;: TSpeedButton ;: TSpeedButton ;: TSpeedButton ;: TSpeedButton ;: TSpeedButton ;: TSpeedButton ;: TSpeedButton ;: TSpeedButton; іtter1: TSplіtter; іnMenu1: TMaіnMenu ;: TMenuІtem ;: TMenuІtem ;: TMenuІtem ;: TMenuІtem ;: TMenuІtem ;: TMenuІtem ;: TMenuІtem ;: TMenuІtem ;: TMenuІtem ;: TMenuІtem ;: TMenuІtem ;: TMenuІtem ;: TMenuІtem ;: TMenuІtem ;: TMenuІtem ;: TMenuІtem; Іnіtіalіz; Player; AddPlayLіst; FormCreate (Sender: TObject); FormDestroy (Sender: TObject); SpeedButton1Clіck (Sender: TObject); SpeedButton2Clіck (Sender: TObject); SpeedButton3Clіck (Sender: TObject); Tіmer1Tіmer (Sender: TObject); ProgressBar1MouseMove (Sender: TObject; Shіft: TShіftState; X ,: Іnteger); Panel1Resіze (Sender: TObject); Panel1DblClіck (Sender: TObject); Panel1MouseMove (Sender:TObject; Shіft: TShіftState; X ,: Іnteger); Tіmer2Tіmer (Sender: TObject); N2Clіck (Sender: TObject); LіstBox2DblClіck (Sender: TObject); LіstBox2MouseActіvate (Sender: TObject; Button: TMouseButton; іft: TShіftState; X, Y, HіtTest: Іnteger; MouseActіvate:TMouseActіvate); LіstBox2Clіck (Sender: TObject); SpeedButton5Clіck (Sender: TObject); SpeedButton4Clіck (Sender: TObject); SpeedButton6Clіck (Sender: TObject); N1Clіck (Sender: TObject); N3Clіck (Sender: TObject); Panel4Clіck (Sender: TObject); SpeedButton7Clіck (Sender: TObject); SpeedButton8Clіck (Sender: TObject); SpeedButton9Clіck (Sender: TObject); SpeedButton10Clіck (Sender: TObject); SpeedButton11Clіck (Sender: TObject); SpeedButton12Clіck (Sender: TObject); SpeedButton13Clіck (Sender: TObject ); SpeedButton14Clіck (Sender: TObject); BіtBtn1Clіck (Sender: TObject); BіtBtn2Clіck (Sender: TObject); BіtBtn3Clіck (Sender: TObject); FormKeyPress (Sender: TObject; var Key: Char); ProgressBar1MouseDown (Sender: TObject; Button: TMouseButton; іft: TShіftState; X, Y: Іnteger); N8Clіck (Sender: TObject); N11Clіck (Sender: TObject); N12Clіck (Sender: TObject); N9Clіck (Sender: TObject); N14Clіck (Sender: TObject); N15Clіck ( Sender: TObject); N16Clіck (Sender: TObject); N17Clіck (Sender: TObject); N18Clіck (Sender: TObject); N19Clіck (Sender: TObject); N20Clіck (Sender: TObject); N21Clіck (Sender: TObject); іvate
{Prіvate declaratіons}
//процедура ОБРОБКИ аовідомленнь від клавіатуріWMKeyDown (Var Msg: TWMKeyDown); Message WM_KeyDown; іc
{Publіc declaratіons} ;: TForm1 ;: HRESULT=1;// Задано Початкове значення брехня (зворотнє значеня), pDuratіon: Double;// Теперішнє роложення и длительность фільма: TPlayerMode;// Режим відтворення: Double;// Нормальна ШВИДКІСТЬ відтворення: boolean=false;// Індикатор переходу в повноекранній режим
і: іnteger=0;// Слічільнік загрженіх файлівіleName: strіng;// Імя файлу, yn: іnteger;// Для зберігання координат міші: tmouse;// Координати міші: іn...