Ver Mensaje Individual
  #1  
Antiguo 10-01-2010
Avatar de HombreGordo
HombreGordo HombreGordo is offline
Miembro
 
Registrado: jul 2008
Posts: 41
Reputación: 0
HombreGordo Va por buen camino
Unhappy Optimización de un simple sampler

Saludos, tengo una pequeña duda en cuánto a la optimización de un sampler que hice para una radio. Sin embargo, presenta ciertos retrasos (1 o 2 segundos) para lanzar un sonido, entonces es problemático porque los sonidos deberían lanzarse al momento. El código es el siguiente:

El sampler consta de una rejilla de varios TButton y cada uno de ellos se les asignó un evento "OnMouseDown" y otro "OnMouseUp" (para controlar la reproducción del sonido, OnClick no serviría porque el sonido seguiría sonando aún después y no sería adecuado agregar otro para detenerlo, cuando esa modalidad estilo "Push to talk" es ideal).

OnMouseDown:
Código Delphi [-]
if FileExists('Sonidos\01.mp3') then begin
MediaPlayer1.FileName:='Sonidos\01.mp3';
MediaPlayer1.Open;
MediaPlayer1.Play;
end;
OnMouseUp:
Código Delphi [-]
MediaPlayer1.Stop;
MediaPlayer1.Rewind;

Mi pregunta en la que por favor les pido que me ayuden, es ¿Cómo haría para optimizar ese código para cada botón de tal forma que la reproducción sea mucho más rápida? Creo que sería pre-cargarlos en la RAM, pero no sé como sería eso... Gracias de antemano por su ayuda.
__________________
Aprendiz de Embarcadero RAD Studio...
Responder Con Cita