Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Media";
Текущий архив: 2004.10.31;
Скачать: [xml.tar.bz2];

Вниз

Картинка по пропорциям   Найти похожие ветки 

 
DDDeN   (2004-08-02 18:35) [0]

Я воспроизвожу авишку при помощи TMediaPlayer. Как при изменении размеров формы пропорционально менять размеры картинки?


 
DDDeN   (2004-08-03 03:37) [1]

Подскажите хоть идею...


 
NailMan ©   (2004-08-03 11:54) [2]

Ну не знаю как во всяких там супер-классах-медиаплеерах, но в чистом DirectShow, это делается довольно просто.

---
WBR, NailMan aka 2:5020/3337.13


 
Ricks   (2004-08-03 15:17) [3]


procedure TAP7MainForm.VideoWindowResize(Sender: TObject);
var pW, pH, vW, vH, X, Y : Integer;
   S                    : Single;
begin
if not Player.Video.Exists then Exit;

pW:=VideoWindow.Width;
pH:=VideoWindow.Height;
vW:=Player.Video.Width;
vH:=Player.Video.Height;

if FitVideo then begin
 if SmartFit then begin
  if (vW >= pW) or (vH >= pH) then begin
   S:=pW / vW;
   if vH * S > VideoWindow.Height  then S:=pH / vH;
   vW:=Round(vW * S);
   vH:=Round(vH * S);
  end;
 end else begin
  S:=pW / vW;
  if vH * S > VideoWindow.Height  then S:=pH / vH;
  vW:=Round(vW * S);
  vH:=Round(vH * S);
 end;
end;

X:=pW div 2 - vW div 2;
Y:=pH div 2 - vH div 2;
Player.VideoPosition:=Rect(X, Y, vW, vH);
Player.VideoOwner:=VideoWindow;
end;


Это кусочек моей программы. Она правда написана на DirectShow, но, я думаю, разобраться можно, а тем более, я надеюсь, я подсказал тебе идею :)


 
DDDeN   (2004-08-03 18:44) [4]

Спасибочки!!!


 
DDDeN   (2004-08-03 18:48) [5]

Хм-Хм...
Не очень понятно...
Я в ДиректШоу ни бум-бум... А можно парой строк пояснить суть, а откуда сам поток идет, и как его открыть-то???
Ну если все это долго и сложно, помогите хоть с МедиаПлеером! Ну если не влом, объясните про этот ДиректШоу ;-)


 
Ricks   (2004-08-04 10:47) [6]

Про DirectShow лучше почитай на MSDN или поищи примеры. Там пока сам не разберешься - ничего не выйдет!
А что тебе насчет MediaPlayer"а помочь?


 
NailMan ©   (2004-08-04 12:52) [7]

Мой класс-медиаплеер с очень простым исполнением(для ознакомления есть пример) и возможностями:
http://nailman.cyborghome.ru/zakroma/sources/nm_play_class.zip

Заголовки DirectX 8.1 для Delphi:
http://nailman.cyborghome.ru/zakroma/archives/d3d81.exe

Если хочешь под DX9 то сливай заголовки с clootie.narod.ru

---
WBR, NailMan aka 2:5020/3337.13


 
DDDeN   (2004-08-05 04:22) [8]

Да хочется мне чтоб при воспроизведении кинушки и при растягивании формы сама кинушка меняла размеры относительно своим изначальным размерам. Например в МедиаПлеере есть св-во Дисплей (простите на инглиш влом переключиться), на которое и выводится вся ета беда.



Страницы: 1 вся ветка

Форум: "Media";
Текущий архив: 2004.10.31;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.46 MB
Время: 0.029 c
1-1097561439
-=SS=-
2004-10-12 10:10
2004.10.31
Изменение цвета кнопки


3-1096621509
msguns
2004-10-01 13:05
2004.10.31
MSACCESS. Ошибка синтаксиса


14-1097204040
КаПиБаРа
2004-10-08 06:54
2004.10.31
Где хранить инфу о версии (формате) базы


3-1096497226
Vsevolod
2004-09-30 02:33
2004.10.31
Проблема с БД


9-1088578445
zorik
2004-06-30 10:54
2004.10.31
Реверси и другие





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский