Главная страница
    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.057 c
9-1086070249
CyborgHome
2004-06-01 10:10
2004.10.31
Игру выпустили


1-1097755008
denis24
2004-10-14 15:56
2004.10.31
цвет курсора в гриде


14-1097251913
ОлегЪ
2004-10-08 20:11
2004.10.31
Проект!


1-1097584420
Aleksandr.
2004-10-12 16:33
2004.10.31
Что случилось с Excel.Application?


1-1097814277
yurai
2004-10-15 08:24
2004.10.31
Не могу поменять стандартную иконку Delphi в программе





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский