Домашний медиа-сервер (UPnP, DLNA, HTTP) Домашний медиа-сервер (UPnP, DLNA, HTTP) Домашний медиа-сервер (UPnP, DLNA, HTTP)
Главная Решения пользователей программы "Домашний медиа-сервер (UPnP, DLNA, HTTP)"
 
Текущее время: Пт ноя 22, 2019 7:20 pm

Часовой пояс: UTC+03:00




Начать новую тему  Ответить на тему  [ 1 сообщение ] 
Автор Сообщение
СообщениеДобавлено: Ср мар 13, 2013 6:59 pm 
Не в сети

Зарегистрирован: Вт сен 16, 2008 7:30 pm
Сообщения: 2768
Настройки - Медиа-ресурсы - Обработка - Добавить

Название: "После окончания просмотра фильма" // может быть изменено
Скрипт:
Код:
var
  dtLastPlaybackTime: TDateTime;
begin
  if (CurrentMediaItem <> nil) and (CurrentMediaItem.MediaType = mtVideo) then begin
    if (Pos('[Просмотрен]', CurrentMediaItem.Properties[mpiTitle]) = 0) then begin
      if VarToStr(CurrentMediaItem.Properties[mpiLastPlaybackTime]) <> '' then try
        dtLastPlaybackTime := CurrentMediaItem.Properties[mpiLastPlaybackTime];
        if (Now - dtLastPlaybackTime) > EncodeTime(0, 1, 0, 0) then // 1 минута
          CurrentMediaItem.Properties[mpiTitle] := '[Просмотрен] ' + CurrentMediaItem.Properties[mpiTitle]
      except end   
    end   
  end   
end.

Ok - Ok

Настройки - События - "После завершения воспроизведения медиа-ресурса" - "После окончания просмотра фильма" - Ok


Вернуться к началу
Показать сообщения за:  Поле сортировки  
Начать новую тему  Ответить на тему  [ 1 сообщение ] 

Часовой пояс: UTC+03:00


Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и 4 гостя


Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете добавлять вложения

Найти:
Перейти:  
Создано на основе phpBB® Forum Software © phpBB Limited
Русская поддержка phpBB