Перейти к содержанию
Fire Monkey от А до Я

cezif

Пользователи
  • Постов

    4
  • Зарегистрирован

  • Посещение

Информация о cezif

  • День рождения 29.04.1982

Информация

  • Пол
    Мужчина

Посетители профиля

617 просмотров профиля
  • eser

  1. Спасибо за подсказку, в вообщем-то получилось. Сделал так: Создал отдельный каталог, скопировал туда модуль FMX.Media.Win.pas, FMX.Controls.Win.res, FMX.Filter.res (без последних двух проект не компилировался) Внес каталог в Tools - Options - Library - Library path В модуле FMX.Media.Win.pas в процедуре TWindowsMedia.UpdateMediaFromControl первой строкой в коде добавил добавление масштабирования: procedure TWindowsMedia.UpdateMediaFromControl; var P: TPointF; R: TRect; Bounds: TRectF; Form: TCommonCustomForm; begin FVMRWindowlessControl.SetAspectRatioMode(VMR9ARMode_LetterBox); // <-- Добавить if FWnd <> 0 then .... далее в коде закомментировал строку: Bounds := TRectF.Create(0, 0, P.X, P.Y); вместо P.X и P.Y (Ширина и высота видео) - ввел ширину и высоту контрола: Bounds := TRectF.Create(0, 0, Control.AbsoluteWidth, Control.AbsoluteHeight); После этих манипуляций видео стало растягивать под контрол.
  2. При изменении контейнера TMediaPlayerControl - видео меняется только в меньшую сторону, в большую не растягивается. Простите чайника, не совсем понял, в какую часть модуля FMX.Media.Win нужно поправки внести о способе скалирования?
  3. Забыл уточнить, вопрос интересует про windows приложение, не мобильные
  4. Существует ли способ растягивания видео до нужных размеров? Если нет, есть ли какой иной компонент под FM для вывода видео с произвольными шириной и высотой?
×
×
  • Создать...