Ĺadny brzuch
HEJ WAM WSZYSTKIM!!!Jestem tutaj nowym uczestnikiem tego Forum i mam nadzieje że mi pomożecie...A problem mam następujący:
Pracuje sobie nad odwarzaczem Video i jak mam zrobić aby:
1.Na panelu(czyli Panel1) film był dostosowany do rozmiarów mojego odwarzacza???
2.Jak zrobić napisy???
3.Jak zrobic aby TrackBar sie przesówał
4.Jak zrobić z tymi kodekami???
5.Jak pokazać czas trwania filmu:?:?:?:?:?
Z góry dziękuje wam za pomoc......
a takna boku to korzystam z Delphi 3 Standard z komponentu MediaPlayer z zakładki System...
Aha jeszcze jedno :
Ąciągnąłem z internetu komponenty(do mojej wersji kompilatora),zainstalowałem je i jak chce je dac na forme to wyskakuje mi bład że "Klasa nie jest zarejestrowana".Nigdy mi taki błąd nie wyskakiwał.Noi co z tym zrobic???
Sprawa komponentów - gdy kompilujesz i instalujesz pliki DPK poza folderem Lib, skopiuj skompilowane unity komponentów (to pliki DCU) do tegoż folderu (Lib)
]==][::::::::::::::::::::::::>
:! Nie tykać nawet kijem długim na pięć metrów :!
Poza tym - niech żyją moderatorzy :P
Jeśli chodzi o punkt 1 to wstawiasz na panel jakiśtam komponent do odtwarzania filmów i w Propelities tego komponentu masz takie coś jak Aligan i to pozmieniaj to ci się dopasuje tak samo panel... Albo kodem to zrob:
if komponent then panej powienksz else panel weź do domyslnych ustawień end;
Anonymous AdSoft
__________________
www.adsoft.glt.pl
adsoftt@o2.pl
gg:2283189
3: w time SCroll.Position := Player.Position;
1:
Form2.BorderStyle := bsNone;{ukrycie gornego paska}
Form2.WindowState := wsMaximized;{maximilizacja okna}
Player.Display := Form2.Panel1;{przypianie obrazu do Panelu na Formie drugiej}
Player.DisplayRect := Form2.Panel1.ClientRect;{dopasowanie rozmiaru
filmu do rozmiarow Panelu}
Form2.PopupMenu := Form1.PopupMenu1;{Przypisananie Panelowi Menu rozwijalnego}
Form2.ShowModal;{ukazanie okna Form2}
2:było gdzieś na forum
5 to już musisz sobie pomyśleć sam
Asdef www.kanalia.toya.net.pl
cytat:Asdef napisał:
3: w time SCroll.Position := Player.Position;
1:
Form2.BorderStyle := bsNone;{ukrycie gornego paska}
Form2.WindowState := wsMaximized;{maximilizacja okna}
Player.Display := Form2.Panel1;{przypianie obrazu do Panelu na Formie drugiej}
Player.DisplayRect := Form2.Panel1.ClientRect;{dopasowanie rozmiaru
filmu do rozmiarow Panelu}
Form2.PopupMenu := Form1.PopupMenu1;{Przypisananie Panelowi Menu rozwijalnego}
Form2.ShowModal;{ukazanie okna Form2}
No dzieki ale musze ci powiedzieć że;
do punktu 3 chodzilo mi o TracBar a nie Scroll...
A ten kod ktory napisałeś do pierwszego nie działa(hmmm a ciekawe dlaczego???)Czy tam gdzie napisałes Player nie powinno być czasem:
"MediaPlayer"???
W przyjaźni zdarza sie falstart!!!
cytat:MŁODY napisał:
"MediaPlayer"???
a... zmień nazwę komponenntu i będzie ok:lol:
Asdef www.kanalia.toya.net.pl
zanotowane.pl doc.pisz.pl pdf.pisz.pl zsf.htw.pl
Pracuje sobie nad odwarzaczem Video i jak mam zrobić aby:
1.Na panelu(czyli Panel1) film był dostosowany do rozmiarów mojego odwarzacza???
2.Jak zrobić napisy???
3.Jak zrobic aby TrackBar sie przesówał
4.Jak zrobić z tymi kodekami???
5.Jak pokazać czas trwania filmu:?:?:?:?:?
Z góry dziękuje wam za pomoc......
a takna boku to korzystam z Delphi 3 Standard z komponentu MediaPlayer z zakładki System...
Aha jeszcze jedno :
Ąciągnąłem z internetu komponenty(do mojej wersji kompilatora),zainstalowałem je i jak chce je dac na forme to wyskakuje mi bład że "Klasa nie jest zarejestrowana".Nigdy mi taki błąd nie wyskakiwał.Noi co z tym zrobic???
Sprawa komponentów - gdy kompilujesz i instalujesz pliki DPK poza folderem Lib, skopiuj skompilowane unity komponentów (to pliki DCU) do tegoż folderu (Lib)
]==][::::::::::::::::::::::::>
:! Nie tykać nawet kijem długim na pięć metrów :!
Poza tym - niech żyją moderatorzy :P
Jeśli chodzi o punkt 1 to wstawiasz na panel jakiśtam komponent do odtwarzania filmów i w Propelities tego komponentu masz takie coś jak Aligan i to pozmieniaj to ci się dopasuje tak samo panel... Albo kodem to zrob:
if komponent then panej powienksz else panel weź do domyslnych ustawień end;
Anonymous AdSoft
__________________
www.adsoft.glt.pl
adsoftt@o2.pl
gg:2283189
3: w time SCroll.Position := Player.Position;
1:
Form2.BorderStyle := bsNone;{ukrycie gornego paska}
Form2.WindowState := wsMaximized;{maximilizacja okna}
Player.Display := Form2.Panel1;{przypianie obrazu do Panelu na Formie drugiej}
Player.DisplayRect := Form2.Panel1.ClientRect;{dopasowanie rozmiaru
filmu do rozmiarow Panelu}
Form2.PopupMenu := Form1.PopupMenu1;{Przypisananie Panelowi Menu rozwijalnego}
Form2.ShowModal;{ukazanie okna Form2}
2:było gdzieś na forum
5 to już musisz sobie pomyśleć sam
Asdef www.kanalia.toya.net.pl
cytat:Asdef napisał:
3: w time SCroll.Position := Player.Position;
1:
Form2.BorderStyle := bsNone;{ukrycie gornego paska}
Form2.WindowState := wsMaximized;{maximilizacja okna}
Player.Display := Form2.Panel1;{przypianie obrazu do Panelu na Formie drugiej}
Player.DisplayRect := Form2.Panel1.ClientRect;{dopasowanie rozmiaru
filmu do rozmiarow Panelu}
Form2.PopupMenu := Form1.PopupMenu1;{Przypisananie Panelowi Menu rozwijalnego}
Form2.ShowModal;{ukazanie okna Form2}
No dzieki ale musze ci powiedzieć że;
do punktu 3 chodzilo mi o TracBar a nie Scroll...
A ten kod ktory napisałeś do pierwszego nie działa(hmmm a ciekawe dlaczego???)Czy tam gdzie napisałes Player nie powinno być czasem:
"MediaPlayer"???
W przyjaźni zdarza sie falstart!!!
cytat:MŁODY napisał:
"MediaPlayer"???
a... zmień nazwę komponenntu i będzie ok:lol:
Asdef www.kanalia.toya.net.pl