ďťż

Ładny brzuch

Jak zrobić odtwarzacz multimedialny bez dodatkowych komponentów w deplhi 7 ( mam pełną).


No przynajmniej standardowych musisz użyc :P Poczytaj o TMediaPlayer :)


Jak zrobić odtwarzacz multimedialny bez dodatkowych komponentów w deplhi 7 ( mam pełną).

Ja jednak szczerze odradzam kozystania z MediaPlayera.



Jak zrobić odtwarzacz multimedialny bez dodatkowych komponentów w deplhi 7 ( mam pełną).
Napisać sobie samemu procedury wyświetlające film :P
Każdy ma pełną wersję Delphi 7 (zazwyczaj personal)

A oto odpowiedź:
Pozamykaj wszystkie moduły (*.PAS), wejdź do Project.dpr i napisz coś takiego:
program Project1; uses  Windows,  ActiveX,  DirectShow9; {$R *.res} var   pGraph: IGraphBuilder;   pControl: IMediaControl;   pEvent: IMediaEvent;   evCode: Longint; begin  CoInitialize(nil);  CoCreateInstance(CLSID_FilterGraph, NIL, CLSCTX_INPROC_SERVER,                        IID_IGraphBuilder, pGraph);  pGraph.QueryInterface(IID_IMediaControl, pControl);  pGraph.QueryInterface(IID_IMediaEvent, pEvent);  pGraph.RenderFile('C:\FILM.AVI', NIL);               // Twój film  pControl.Run;  pEvent.WaitForCompletion(INFINITE, evCode);  pControl._Release;  pEvent._Release;  pGraph._Release;  CoUnInitialize; end.



  • zanotowane.pl
  • doc.pisz.pl
  • pdf.pisz.pl
  • zsf.htw.pl
    •