Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
delph_t.doc
Скачиваний:
47
Добавлен:
12.04.2015
Размер:
2.26 Mб
Скачать

Методы компонента:

procedure AutoButtonSet(Btn: TMPBtnType); dynamic;

Реализует разрешение/запрещение кнопок компонента при установке в свойство AutoEnable значения True.

procedureBack;

Перемещает текущую позицию в носителе информации назад на количество кадров, содержащихся в свойстве Frames.

procedure Click(Button: TMPBtnType; var DoDefault: Boolean); dynamic;

По умолчанию вызывает обработчик события OnClick. Предназначен для перекрытия в потомках.

procedureClose;

Закрывает связанное с компонентом устройство.

procedure DoNotify; dynamic;

По умолчанию вызывает обработчик события OnNotify. Предназначен для перекрытия в потомках.

procedureEject;

Выгружает носитель информации из устройства.

procedure MMNotify(var Message: TMessage); message MM MCINOTIFY;

Реализует отклик на сообщение Windows MMMCINOTIFY. По умолчанию вызывает метод DoNotify.

procedureNext;

Перемещает текущую позицию носителя на начало следующей дорожки, а если устройство не имеет дорожек - в конец носителя.

procedure Notification( AComponent: TComponent; Operation: TOperation); override;

Извещает компонент AComponent о том, что завершилась операция Operation.

procedureOpen;

Открывает мультимедийное устройство.

procedurePause;

Приостанавливает процесс воспроизведения или записи информации. Если устройство уже было приостановлено, восстанавливает процесс с помощью вызова метода Resume.

procedure Pa use Only

Приостанавливает процесс воспроизведения или записи информации. Если устройство уже было приостановлено, ничего не делает.

procedurePlay;

Начинает воспроизведение с позиции StartPos, а если это свойство не установлено - с текущей позиции Position.

procedure PostClick(Button: TMPBtnType); dynamic-

Реализует отклик на событие OnPostClick. По умолчанию вызывает соответствующий обработчик события.

procedurePrevious;

Перемещает текущую позицию носителя на начало предыдущей дорожки, а если устройство не имеет дорожек - в начало носителя.

procedureResume;

Восстанавливает процесс записи или воспроизведения. Вызывается при повторном щелчке по кнопке btPause.

procedureRewind;

Перемещает текущую позицию носителя к положению, определяемому свойством Start,

procedureSave;

Сохраняет информацию в файле с именем FileName.

procedure StartReс or dingy-

Начинает запись информации с текущей позиции или позиции StartPos.

procedureStep;

Перемещает текущую позицию в носителе информации вперед на количество кадров, содержащихся в свойстве Frames.

procedureStop;

Прекращает запись или воспроизведение информации.

Для компонента определены следующие события:

EMPNotify = procedure (Sender: TObject; Button: TMPBtnType; var DoDefault: Boolean) of object; property OnClick: EMPNotify;

Возникает после щелчка по кнопке Button компонента. Если DoDefault=True, вызывается метод, связанный с этой кнопкой (см. пояснения ниже).

property OnNotify: TNotifyEvent;

Возникает после завершения вызова одного из методов Back, Close, Eject, Next, Open, Pause, PauseOnly, Play, Previous, Resume, Rewind, StartRecording, Step или Stop, если свойство Notify имеет значение True.

EMPPostNotify = procedure (Sender: TObject; Button: TMPBtnType) of object; property OnPostClick: EMPPostNotify;

Если Wait=True, событие OnPostClick возникает только после завершения соответствующей операции, вызванной событием OnClick, в противном случае - немедленно после OnClick.

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]