Направи си сам CD обвивка
Заден план.
Факт е, че понякога разрушавате вашия Windows поради редица причини, било то вирусна атака или липса на свободно място на твърдите дискове (има и такива) и след като го пренаредите, започвате да инсталирате необходимия софтуер. Всичко би било нищо, но има едно „но“ - всички необходими програми са на различни дискове, изглежда, че той е създал диск, записал е всичко, което е необходимо на него, но наистина ли това прави истинският Delphi енкодер. Освен това, например, често ме питат за моите дискове със софтуер и след това задават въпроси: "Каква програма?"; — За какво е тя? и т.н. И така, виждали ли сте дискове от AlexSoft? Ние ще направим същото. Да започваме.
От самото начало.
За да напишем програма, имаме нужда от глава, ръце, Delphi (6.7), Notepad, малко познания по HTML.
Пишем основата.
Взимаме стандартна форма, аз я нарекох MainForm и поставих върху нея (в зависимост от предпочитанията ви за дизайн) компонента WebBrowser от раздела Internet. Нека напишем HTMLView в свойството name. И във FormCreate поставете този код:
Този код определя кой html ще бъде зареден първи (когато програмата стартира). Ще хвърлим и два бутона върху формуляра. В свойствата Caption и Name напишете съответно: Back, Forward, BackButton, ForwardButton. И напишете съответните манипулатори на събития за тях:
опитайте структура. с изключение. end има за цел да спаси програмата от срив, ако потребителят все още не се е преместил никъде или няма къде да се премести.
Сега нека поговорим за навигацията. Всичко зависи от вашите нужди. Лично аз избрах три секции SYSTEM, NET, DOCS на моя диск и съответно добавих същия брой бутони към формата със съответните надписи и имена. И написа този код:
Както можете да видите с просто око, когато щракнете върху съответните бутони в HTMLView, те ще се покажатнеобходимите html файлове (разбира се, можете да ги наименувате по свое усмотрение, основното е да не се бъркате). Можете също да създадете друг бутон с Caption:='Преглед на CD' и Име:='Преглед на CD'. Целта му е най-проста: когато щракнете върху него в Explorer, нашият диск с всички файлове ще се отвори, така че това да се случи, напишете това:
Разбира се, можете да използвате функцията CreateProcess, но има твърде много параметри и е по-лесно по този начин.
Пикантност.
Основата е готова, но можете да добавите малко жизненост към приложението. Нека поставим компонент MediaPlayer във формата и го наречем MediaPlayerMenu, свойство Visible=false. С него съответният звук ще се възпроизвежда, когато курсорът е върху който и да е бутон. За това пишем кода:
Файлът check.wav се намира в папката с изпълнимия файл (вашият файл може да има различно име). И за всички останали бутони поставяме съответната процедура в Events->OnMouseMove.
Музика, музика, музика.
Инсталирането на програми не винаги е забавно, така че можете да направите така, че докато нашата обвивка работи, да се възпроизвежда музика (любимата ви, разбира се). Поставяме компонент MediaPlayer във формата и го наричаме musicmenu или нещо друго. Задайте свойството Visible на fasle. И поставяме четири бутона върху формата с имената previousbutton(предишна мелодия), nextbutton(следваща), playbutton(възпроизвеждане), паузаbutton(пауза). Манипулатори за писане:
Сега можете да извършвате действия с възпроизвеждане на музика. Взех файловете в mp3 формат. Срещаните променливи трябва да бъдат разпределени в цялата програма. Но проблемът е, че след края на една песен преходът към друга не се извършва. Мислим и записваме това като отделна процедура (обща):
И така, че музиката да се възпроизвежда веднага след началото на работата, ние пишем това във FormCreate:
Намерена променлива в кодаmusictime, така че е необходим, за да съхраним продължителността на mp3 и ако текущата позиция е равна на края на файла, тогава правим прехода. За да проверим, поставяме компонента Timer във формата и записваме процедурата:
За да няма пропуски, ще напиша това (иначе всичко може да се случи):
Това зависи от FormCreate.
Създайте HTML.
Програмата е написана, но няма достатъчно html файлове. Ето кратката структура:
Повече за html в този сайт (вижте сами - много материал).
Заключение.
Програмата може да бъде допълнена по Ваша преценка. Разбира се, всичко изглежда избледняло, но можете да свържете кожи, аз лично използвах компонентите на Dinamic Skin Form и дори не е необходимо да променяте кода - просто заменете необходимите компоненти с подходящите.