Lista de reproduccion

[b3nshi]

Bueno, mi pregunta es la siguiente. Como puedo hacer para insertar con un open dialog, varios archivos a mi listbox. Es decir, que si selecciono varios archivos mp3 en el opendialog, como los agrego???, pero ademas de agregarlos, necesito saber el tiempo que dura cada tema. Mi problema surge debido a que para cargar el tema de la forma que quiero, primero lo hago pasar por un MediaPlayer, para averiduar el tiempo que dura, y dsp lo cargo al Listbox. Y cuando quiero cargar de a muchos temas no puedo. Quise usar un Timer, pero = no me funciona, porque no se como ir cambiando del archivo 1 al n en el open dialog, como para ir cargandolos uno a uno. Alguien me puede dar una solucion a mi problema??? Creo que si en la playlist no cargo de a muchos temas, mi reproductor no va a ser muy útil.
Desde ya Muchas Gracias!!!

[ebeltete]

Te paso algo de codigo en un playlist que hice donde tempfile es un mediaplayer




procedure TMainForm.btnFileClick(Sender: TObject);
const
CrossFadeTime = 2500; {ms}
var
NewItem: PListItem;
Pos,Len: Longint;
i: integer;
begin
if OpenDialog.Execute then
begin
for i := 0 to OpenDialog.Files.Count-1 do
begin
TempFile.FileName := OpenDialog.Files[i];
Len := TempFile.FileLength;

if (PlayList.Count > 0) then
with PListItem(PlayList[PlayList.Count-1])^ do
Pos := Max(Position+Length-CrossFadeTime,0)
else
Pos := 0;

New(NewItem);
with NewItem^ do
begin
FileName := TempFile.FileName;
Length := Len;
Position := Pos;
end;

PlayList.Add(NewItem);

PlayListBox.Items.Add(NewItem.FileName+'|'+TimeToString(Pos)+'|'+TimeToString(Len));
end;
end;
end;

[b3nshi]

Muchisimas Gracias, me sirvió de mucha ayuda, es justo lo que queria hacer!!! Gracias en serio!!!

[ebeltete]

No hay porque, yo me dedico a desarrollar aplicaciones multimedia donde el manejo de archivos de audio es moneda corriente y realmente me es dificil encontrar ayuda en español, asi que todo lo nos puedamos ayudar mejor, salu2

[b3nshi]

hola de vuelta, no quiero ser abuso, pero queria preguntarte una cosita mas, ya que me dijiste que te dedicas al desarrollo de aplicaciones multimedia. Estoy tratando de hacer un programa que reconozca la voz, pero se me complico mucho el trabajo, por que primero me dijeron que utilizara la APIspeech de windows, pero no se como hacerlo. En VB hay un componente para ellos, pero no es muy bueno. Despues averiguando mas, lei algo hacerca de unos algoritmos de markov o algo asi, pero no los entiendo. Vos me podrias decir si existe alguna forma de hacerlo o si esxiste algun componente para el reconocimiento de la voz???
Gracias de vuelta!

[ebeltete]

Mira alguna vez estube incurciuonando en algo de eso, pero as final no hice nada, en esa oportunidad enccontre algo de info, estoy tratando de adjuntarte un archivo, si no sube dame tu email te paso un dll que es muy sencillo de usar desde Delphi, pero lo malo es que cuando lo ejecutas te aparece un cartel del copyrigth y otras mierdas, no recuerdo bien pero funciona,

[b3nshi]

Lo del copyright no importa, creo que le puedo encontrar una solucion. De todos modos, creo que me sería de mucha ayuda. Si me lo podes mandar, realmente estaría muy agradecido.
Estas son mis direcciones:
b3nshi@gmail.com
benja_akd@hotmail.com
Ymmm... yo no soy muuuy bueno programando, pero si en algo te puedo ayudar, no dudea en pedirmelo.
Muchisimas Gracias!

[Sotrono]

Hola, me podes enviar la dll a mi tambien???

sotrono@gmail.com

[vic_ia]

hola ebeltete...

seria mucha molestia si me lo pudieras igualmente a mi ?

mail : vic_ia@todito.com

gracias anticipadas...

[b3nshi]

Estuve investigando algo mas, y me encontré con que para analizar el sonido, se debe analizar con componentes activex, a un bajo nivel. Mi duda ahora es: primero como hago para dejar abierta la entrada del microfono, es decir, para que mi programa analice todo lo que se diga por microfono.
Segundo, pasó algo con la dll?