2.3.10.2. Мультимедийный проигрыватель (MediaPlayer)

Компонент (панель System) пред­наз­начен для воспроизведения му­зы­кальных и видеоклиповMCI.

Специфичные свойства(первые четыре свойства первоочередные)

DeviceType, FileName‑ источник воспроизведения: тип устройства или файл с указанным именем (DeviceType=dtAutoSelect).

Display‑ имя объекта (обычно панель), в котором демонстрируется видео.

AutoOpen‑ автоматическое открытие устройства.

AutoEnabled‑ автоматическое управление своими кнопками.

AutoRewind‑ автоматическая перемотка в начало.

ColoredButtons‑ выбор кнопок управления проигрывателя.

StartPos, EndPos‑ начало и конец клипа (в кадрах, интервалах времени).

Error, ErrorMessage‑ код и описание ошибки при воспроизведении.

Frames‑ число условных кадров, пропускаемых при прогонах.

Length‑ длина клипа в условных единицах.

TimeFormat‑ значение условной единицы.

Position‑ текущая позиция в файле в условных единицах.

Специфичные методы

Open, Close, Eject‑ открыть, закрыть, отсоединить устройствоMCI.

Back/Step‑ пропустить назад/вперед условных единиц, заданных вFrames.

Next/Previous‑ перейти к началу следующей/предыдущей дорожки.

Play/Stop, Pause/Resume ‑ начать/прекратить, приостановить/продолжить.

Rewind, StartRecording‑ перемотка в начало, начало записи.

Save‑ сохранить клип в файле, указанном вFileName.

2.3.10.3. АнимацияAvi(Animation)

Компонент (панель Win32) воспроизводит клип в форматеAVIбез воспроизведения звука.

Специфичные свойства

CommonAVI ‑ источник воспроизведения:aviNone(файл, указанный в свойствеFileName),aviFindFolder/File/Computer(поиск папки/ файла/ компьютера),aviCopyFiles/File(копирование файлов/файла),aviRecycleFile(перемещение файла в корзину),aviEmptyRecycle(очистка корзины),aviDeleteFile(удаление файла).

FileName‑ файл‑источник воспроизведения приCommomAVI=aviNone.

Active, Open‑ разрешает, открывает воспроизведение.

FrameCount, FrameWidth, FrameHeight‑ номер, ширина и высота кадра.

Repetitions‑ число повторений клипа (0 ‑ повторение покаActive=True).

StartFrame, StopFrame‑ номер начального и конечного кадра (отсчет с 1).

Timers‑ синхронизация по таймеру.

Специфичные методы

Play(N1,N2,N3)‑ вывод клипаN3 раза, начиная с кадраN1 поN2.

Reset‑ восстановление исходного состояния:Open=True,Active=False.

Seek(N), Stop‑ пропускает, не показывая, кадр под номеромN; прекратить.

2.3.11. Стандартные диалоги

Компоненты стандартных диалогов Windowsнаходятся на панелиDialogs. После размещения диалога на форме осуществляется его вызов методомExecuteиз соответствующего обработчика события (например, выбора пункта меню). Метод возвращает значениеTrueпри выходе из диа­лога по кнопкеOK. Введенные в диалоге параметры используются далее в программе пользователя. СобытияOnShowиOnCloseвозникают при первом открытии диалога и при его закрытии соответственно.

Диалоги‑шаблоны можно выбрать командой File/New/Dialogs.

2.3.11.1. Открытие и сохранение файла (OpenDialog,SaveDialog)

Диалог используется для выбора имени открываемого или сохраняемого файла. Диалоги открытия и сохранения от­ли­­чаются только некоторыми настройками.

Специфичные свойства

FileName/Files‑ маршрут поиска и имя выбранного файла/файлов.

Filter‑ фильтр с именами и масками отбора имен файлов через символ «|», формируемый редактором в колонках:FilterName(имя маски, например, «Текстовые файлы»),Filter(маска выбора, например, «*.TXT»).

FilterIndex‑ номер текущей маски (отсчет с 1).

InitialDir/DefaultExt‑ начальный каталог/расширение по умолчанию.

Options‑ набор флажков с режимами работы диалога:ofReadOnly(только чтение),ofOverWritePrompt/ofCreatePrompt(подтверждение на перезапись / создание нового файла),ofHideReadOnly(убрать переключатель на чте­ние),ofChangeDir(не менять каталог),ofShowHelp(кнопкаHelp),ofNo­­Validate(запрет контроля имени файла),ofAllowMultiDate(мно­жествен­ный вы­бор файлов),ofExtensionDifferent(ввод расширения, отлич­ного от умал­чиваемого),ofPath/FileMustExist(существующие ката­ло­ги / фай­лы),of­Share­Awar(можно выбирать файлы, занятые другими прог­рам­ма­ми),ofNo­ReadOnlyReturn(запрет выбора только читаемых файлов),ofTest­FileCreate(запрет проверки доступности диска),ofNetworkButton(нет кноп­ки создания сетевого диска),ofNoLongNames(короткие име­на файлов).

FileEditStyle‑ стиль поля с именем файла:fsComboBox(поле со списком),fsEdit(поле редактирования)

HistoryList,Title‑ список ранее выбранных файлов, заголовок окна.

Специфичные методы

HistoryList.Add(OpenDialog1.FileName)‑ сохранить имя файла в списке имен ранее выбранных файлов для поля с именем файла со списком (FileEditStyle=fsComboBox).

GetStaticRect:TRect‑ возвращает координаты прямоугольника.

Пример выбора имени текстового файла для его открытия:

Procedure TForm1.BitBtn1Click(Sender: TObject); Var F:TextFile; Begin

Opendialog1.FileEditStyle:=fsComboBox; //имя файла в поле со списком

Opendialog1.Filter:='Текстовые файлы|*.TXT'; //выбор текстовых файлов

IFOpendialog1.ExecuteThen//сохранить имя в списке выбранных файлов

Begin Opendialog1.HistoryList.Add(OpenDialog1.FileName);//сохранить имя

AssignFile(F,OpenDialog1.FileName); End; End;