Ver Mensaje Individual
  #7  
Antiguo 25-11-2012
Avatar de bulc
bulc bulc is offline
Miembro
 
Registrado: jun 2010
Posts: 415
Reputación: 14
bulc Va por buen camino
CreaUnaCarpetaSonoraYPasala

Gracias por la explicación de crear recursos embutidos en el exe.
Otra solución sería colocar los sonidos (\SOUNDS) en una carpeta que cuelgue de la que guarda el ejecutable. De modo que al pasarle a alguien el .EXE también se le incluyan los sonidos. Luego como constantes se incluyen en el código:
Código Delphi [-]
Const
Fagina='C:\... \APLICACION\SOUND\TARARI.WAV'
//Haces un procedure  que requiera un parámetro string:
Procedure Toca(xFile, PChar);
begin
  SndPLaySound(xFile, SND_ASYNC);
end;
Para ejecutarlo pones una línea tal como : Toca(Fagina);
Y no olvides añadir al Uses MMSystem.

Yo es el método que uso, cuando busco solución rápida y sencilla. Va bien. Sin contar el espacio en disco, claro.
Responder Con Cita