Aktív témák
-
_thomas_
tag
mindenekelőtt ajánlom hogy szerezz be egy delphi könyvet mert abból el tudod sajátani az alapokat!
ezt kell tenned:
egy button onClick eseményére írd ezt: opendialog1.execute
így meg fog jelenni a dialógus és ezen el tudsz indulni nagyon könnyű ezeket a dialógusokat delphiben kezelni,de én most lusta vagyok leírni mindent róluk ezért minél előbb szerezz be egy könyvet! sok sikert!
üdv.
_thomas_www.ironic-software.com
-
_thomas_
tag
rendben
egy esetet nézünk meg:
mondjuk egy file-t akarsz megnyitni, pl a mediaplayer komponenshez akarsz hozzárendelni egy file-t.
tegyél a formra egy panelt,egy opendialog-ot,egy button-t és term. a mediaplayer komponenst.
a mediaplayer-nek a display tulajdonságát állítsd panel1-re.
a gomb onclick eseményére írd:
opendialog1.execute;
if (opendialog1.filename <> '') then begin
mediaplayer1.filename := opendialog1.filename;
mediaplayer1.open;
mediaplayer1.play;
end;
ha mindent jól csináltál kész a saját videólejátszód. kicsit nagyon primitív de példának tökéletes.www.ironic-software.com
-
_thomas_
tag
kicsi kiegészítés a fentiekhez:
a dialógusokat execute metódussal tudod megjeleníteni.
mindegyiknek van visszatérési értéke pl:
opendialog.filename - a választott file
fontdialog.font - a választott betűtípus
stb.. nézd meg a delphi helpjét, abban nagyon részletesen megtalálsz mindent!
sokkal jobban leírják mint én...www.ironic-software.com
-
_thomas_
tag
akkor az új play gombod onclick eseményére írd a mediaplayer.play metódust.
ezt tedd meg pl a stop,next stb metódusokkal is és a mediplayer-t meg rejtsd el (visible := false) így saját gombokkal tudod vezérelni. használhatsz TBitBtn -t is ezt tudod 'textúrázni' így egész csinos dolgokat lehet összehozni és ráadásul nagyon egyszerűen!
persze lejátszás előtt illik megnézni hogy a DeviceID állapotát hogy ne legyen galiba. pl.: if (mediaplayer1.DeviceID <> 0) then mediaplayer.play;
[Szerkesztve]www.ironic-software.com
-
_thomas_
tag
egy TImage-t használsz és annak az onClick eseményére írod a kódot? mert akkor állítsd a Transparency tulajdonságát true -ra. amilyen színű a kép bal alsó pixele az a szín lesz átlátszó a képen! jelen esetben ez jó lesz neked.
megnéztem alaposabban a linket és tutira látom már hogy TImage. szal' jó lesz a fentebb írt tipp!
[Szerkesztve]www.ironic-software.com