Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

TListBox, broj redova, TMediaPlayer * Primer!!!

[es] :: Pascal / Delphi / Kylix :: TListBox, broj redova, TMediaPlayer * Primer!!!

Strane: 1 2

[ Pregleda: 3920 | Odgovora: 23 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

inherited
Novi Sad

Član broj: 95516
Poruke: 219
*.neobee.net.



Profil

icon TListBox, broj redova, TMediaPlayer * Primer!!!17.06.2006. u 14:13 - pre 217 meseci
Upload-ovao sam jedan mali primer. Pozivam Vas da nastavite izradu primera, naravno,
ako znate. Naime, postavio sam TListBox u koji se na osnovu TOpenDialog ubacuju
"pesme" (D:\Folder\Naziv_Pesme.mp3). Pustaju se na osnovu TMediaPlayer komponente,
to mi se cini najjednostavnije.

Trebalo bi nastaviti:

1) dodati redne brojeve Item-a, ( 1. D:\Folder\Naziv_Pesme.mp3 ), redom?!
2) napraviti (1. Naziv_Pesme.mp3), bez "D:\Folder\" ?!
3) pustiti pesmu iz TMediaPlayer-a?!

Ako imate malo volje, da mi pomognete, u znanje ne sumnjam, siguran sam da ce primer
sam po sebi pomoci i drugima.

Hvala unapred.
Prikačeni fajlovi
 
Odgovor na temu

badam

Član broj: 78553
Poruke: 97
62.108.111.*



+2 Profil

icon Re: TListBox, broj redova, TMediaPlayer * Primer!!!17.06.2006. u 16:34 - pre 217 meseci
Evo, onako kako sam i u onom topicu napisao:
Za zadatak pod 2 mi najbrze bilo da stavim preko SongBox jos jedan ListBox (SongBox1) koji bi imao samo FileName, a u SongBox se upisuje FileName sa pathom.
Prikačeni fajlovi
 
Odgovor na temu

Miloš Baić
Miloš Baić
ERP (Dynamics NAV) programer
Beograd

Član broj: 72468
Poruke: 1155
*.neobee.net.



Profil

icon Re: TListBox, broj redova, TMediaPlayer * Primer!!!17.06.2006. u 16:53 - pre 217 meseci
Dodato brisanje iz TListBox...
Someone's sitting in the shade today because someone planted a tree a long time ago.
Prikačeni fajlovi
 
Odgovor na temu

badam

Član broj: 78553
Poruke: 97
62.108.111.*



+2 Profil

icon Re: TListBox, broj redova, TMediaPlayer * Primer!!!17.06.2006. u 17:22 - pre 217 meseci
Pardon, bilo je par gresaka, pa sam ih ispravio:
I dodao sam u brisanje da ponovo numerise redove.
Prikačeni fajlovi
 
Odgovor na temu

badam

Član broj: 78553
Poruke: 97
62.108.111.*



+2 Profil

icon Re: TListBox, broj redova, TMediaPlayer * Primer!!!17.06.2006. u 17:53 - pre 217 meseci
Dodao sam pomeranje pesama u playlisti, nastavak sa sledecom pesmom nakon kraja prethodne i loop.
Za ispraviti:
Pustanje sledece pesme radi samo ako je ItemIndex=pesmi koja ide.
Ne radi pomeranje selekcije(vise od 1 pesme)

Mrzi me danas vise oko toga, treba na zurku.
Pozdrav.
Prikačeni fajlovi
 
Odgovor na temu

Miloš Baić
Miloš Baić
ERP (Dynamics NAV) programer
Beograd

Član broj: 72468
Poruke: 1155
*.neobee.net.



Profil

icon Re: TListBox, broj redova, TMediaPlayer * Primer!!!17.06.2006. u 18:00 - pre 217 meseci
Ne bi bilo lose da napravis snimanje PlayList-e i otvaranje PlayList-e (.lst)?!
Someone's sitting in the shade today because someone planted a tree a long time ago.
 
Odgovor na temu

badam

Član broj: 78553
Poruke: 97
62.108.111.*



+2 Profil

icon Re: TListBox, broj redova, TMediaPlayer * Primer!!!17.06.2006. u 18:29 - pre 217 meseci
Evo, sredio sam pustanje sledece pesme i snimanje i ucitavanje playliste prilikom zatvaranja i pokretanja programa.
Sad je stvarno gotovo.
Prikačeni fajlovi
 
Odgovor na temu

Miloš Baić
Miloš Baić
ERP (Dynamics NAV) programer
Beograd

Član broj: 72468
Poruke: 1155
*.dialup.neobee.net.



Profil

icon Re: TListBox, broj redova, TMediaPlayer * Primer!!!18.06.2006. u 01:02 - pre 217 meseci
Pozdrav,

evo pogledao sam primer u vezi Save i Load PlayList... Nisi dobro odradio, badam, zato što memoriše fajl kao
1. D:\Folder\Naziv_Pesme.mp3, ali ga po pokretanju programa ( load ) odradi:D:\Folder\???
Koliko se sećam, pa sam malo to izmenio u upload-ovanom primeru. Dodao sam i brisanje cele liste (songbox, songbox1).
Someone's sitting in the shade today because someone planted a tree a long time ago.
Prikačeni fajlovi
 
Odgovor na temu

inherited
Novi Sad

Član broj: 95516
Poruke: 219
*.dialup.neobee.net.



Profil

icon Re: TListBox, broj redova, TMediaPlayer * Primer!!!18.06.2006. u 14:06 - pre 217 meseci
Kako bi trebalo odraditi dodavanje foldera u ovom slucaju?
 
Odgovor na temu

Nemanja Avramović
Engineering Manager
MENU Technologies
Beograd, Srbija

Član broj: 32202
Poruke: 4391
195.252.99.*

Sajt: https://avramovic.info


+46 Profil

icon Re: TListBox, broj redova, TMediaPlayer * Primer!!!18.06.2006. u 14:25 - pre 217 meseci
Evo i mog doprinosa :)

Uniti za učitavanje winamp skinova i opendir dialog ;)

www.delphamp.com
Laravel Srbija.

[NE PRUŽAM PODRŠKU ZA PHP PREKO PRIVATNIH PORUKA!]
Prikačeni fajlovi
 
Odgovor na temu

Miloš Baić
Miloš Baić
ERP (Dynamics NAV) programer
Beograd

Član broj: 72468
Poruke: 1155
*.neobee.net.



Profil

icon Re: TListBox, broj redova, TMediaPlayer * Primer!!!18.06.2006. u 14:50 - pre 217 meseci
Prilikom instalacije WinSkin.pas i SkinPlaylist.pas kaže delphi ovako:
Citat:
[Warning] SkinPlayList.pas(94): Method 'WndProc' hides virtual method of base type 'TControl'
[Fatal Error] Spectrum.pas(55): File not found: 'fmod.dcu'


JaHvram, da ne treba još nešto da upload-uješ uz to?! fmod.pas?!!!
Someone's sitting in the shade today because someone planted a tree a long time ago.
 
Odgovor na temu

Nemanja Avramović
Engineering Manager
MENU Technologies
Beograd, Srbija

Član broj: 32202
Poruke: 4391
195.252.99.*

Sajt: https://avramovic.info


+46 Profil

icon Re: TListBox, broj redova, TMediaPlayer * Primer!!!18.06.2006. u 14:52 - pre 217 meseci
Evo... 170 kb...
Laravel Srbija.

[NE PRUŽAM PODRŠKU ZA PHP PREKO PRIVATNIH PORUKA!]
Prikačeni fajlovi
 
Odgovor na temu

inherited
Novi Sad

Član broj: 95516
Poruke: 219
*.neobee.net.



Profil

icon Re: TListBox, broj redova, TMediaPlayer * Primer!!!18.06.2006. u 15:03 - pre 217 meseci
Ubacio sam OpenDirDialog. Kako sad odraditi da doda folder sa fajlovima, kao i
kad odradi OpenDialog. Znaci, izaberemo folder i kad kliknemo na OK doda njegove
fajlove?
 
Odgovor na temu

Nemanja Avramović
Engineering Manager
MENU Technologies
Beograd, Srbija

Član broj: 32202
Poruke: 4391
195.252.99.*

Sajt: https://avramovic.info


+46 Profil

icon Re: TListBox, broj redova, TMediaPlayer * Primer!!!18.06.2006. u 15:47 - pre 217 meseci
Code:
var path:string;
begin
if OpenDirDialog1.Execute then path:=OpenDirDialog1.Path;


E sad moraš naći način da prođeš kroz folder i pokupiš fajlove (rekurzivno, bilo bi bolje). Potraži ovde na forumu.. ima ona tema kako obrisati folder koji nije prazan... možda može to da se iskoristi...
Laravel Srbija.

[NE PRUŽAM PODRŠKU ZA PHP PREKO PRIVATNIH PORUKA!]
 
Odgovor na temu

Nemanja Avramović
Engineering Manager
MENU Technologies
Beograd, Srbija

Član broj: 32202
Poruke: 4391
195.252.99.*

Sajt: https://avramovic.info


+46 Profil

icon Re: TListBox, broj redova, TMediaPlayer * Primer!!!18.06.2006. u 15:53 - pre 217 meseci
Možda ti i ovo zatreba nekad
Laravel Srbija.

[NE PRUŽAM PODRŠKU ZA PHP PREKO PRIVATNIH PORUKA!]
Prikačeni fajlovi
 
Odgovor na temu

inherited
Novi Sad

Član broj: 95516
Poruke: 219
*.neobee.net.



Profil

icon Re: TListBox, broj redova, TMediaPlayer * Primer!!!18.06.2006. u 16:56 - pre 217 meseci
Citat:
JaHvram
Code:
var path:string;
begin
if OpenDirDialog1.Execute then path:=OpenDirDialog1.Path;



Nesto mi ne ide... Mogu da odradim putanju, dobijem C:\Folder
 
Odgovor na temu

Miloš Baić
Miloš Baić
ERP (Dynamics NAV) programer
Beograd

Član broj: 72468
Poruke: 1155
*.neobee.net.



Profil

icon Re: TListBox, broj redova, TMediaPlayer * Primer!!!18.06.2006. u 18:13 - pre 217 meseci
I meni bi bilo interesantno videti kako u ova dva TListBox-a, dodati folder sa fajlovima, kao i s TOpenDialog?! Pa pustiti da "peva"...

BTW, pravio sam formu na kojoj je TDriveBox, TDirectoryListBox, TFileListBox i tako ubacivao fajlove iz direktorijuma. Pretpostavljam da ovo s JaHvram - om komponentom je laksi nacin. Pa ako neko zna kako bi to moglo da se odradi u ovom primeru, nek puca....
Someone's sitting in the shade today because someone planted a tree a long time ago.
 
Odgovor na temu

Nemanja Avramović
Engineering Manager
MENU Technologies
Beograd, Srbija

Član broj: 32202
Poruke: 4391
195.252.99.*

Sajt: https://avramovic.info


+46 Profil

icon Re: TListBox, broj redova, TMediaPlayer * Primer!!!18.06.2006. u 19:16 - pre 217 meseci
Rekoh ti da potražiš temu sa brisanjem foldera koji nije prazan... ali uštedeo sam ti trud:

http://www.elitesecurity.org/tema/172206/0#1118490

Izmeni tu funkciju da, kad prođe kroz folder, ne briše sve na šta naiđe, nego samo doda u listu, i to je to...
Laravel Srbija.

[NE PRUŽAM PODRŠKU ZA PHP PREKO PRIVATNIH PORUKA!]
 
Odgovor na temu

inherited
Novi Sad

Član broj: 95516
Poruke: 219
*.neobee.net.



Profil

icon Re: TListBox, broj redova, TMediaPlayer * Primer!!!18.06.2006. u 19:32 - pre 217 meseci
Izvinjavam se svima, na dosadi, ali ne kontam... :(
Da li biste hteli to odraditi na ovom nasem primeru? Sa ova dva TlistBox-a?
 
Odgovor na temu

Nemanja Avramović
Engineering Manager
MENU Technologies
Beograd, Srbija

Član broj: 32202
Poruke: 4391
195.252.99.*

Sajt: https://avramovic.info


+46 Profil

icon Re: TListBox, broj redova, TMediaPlayer * Primer!!!18.06.2006. u 20:12 - pre 217 meseci
Ne kontam šta to ne razumeš, evo za 5 minuta napravljeno..
Laravel Srbija.

[NE PRUŽAM PODRŠKU ZA PHP PREKO PRIVATNIH PORUKA!]
Prikačeni fajlovi
 
Odgovor na temu

[es] :: Pascal / Delphi / Kylix :: TListBox, broj redova, TMediaPlayer * Primer!!!

Strane: 1 2

[ Pregleda: 3920 | Odgovora: 23 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.