Ver Mensaje Individual
  #9  
Antiguo 31-07-2008
Avatar de 2-D@monic
2-D@monic 2-D@monic is offline
Miembro
 
Registrado: may 2007
Posts: 94
Reputación: 18
2-D@monic Va por buen camino
gracias por la recomendación [rcarrillom] pero el programa que estoy haciendo va fusionar el archivo mp3 con el txt para crear un nuevo archivo que solo pueda abrir el programa que estoy haciendo (con otra extensión), no hay necesidad de que otro reproductor lo haga puesto que ese no es el objetivo.
Como les iba diciendo no puedo separar los archivos una vez fusionados, hasta el momento puedo recuperar sus tamaños con
Cita:
compuesto.Position:=compuesto.Size-8;
//recupero el tamaño del archivo mp3 y del texto
compuesto.Read(tamanio,sizeof(tamanio));
porque como ven la estructura contiene dos tipos integer.
Al momento de recuperar con
Cita:
while (compuesto.Position<=tamanio.tam_mp3) do
begin
compuesto.Read(cont,sizeof(cont));
mp3.Write(cont,sizeof(cont));
compuesto.Position:=compuesto.Position+1;
end;
no me recupera el archivo como debería. tal vez pueda ser porque la variables cont es tipo pchar; no se me ocurre otro tipo de dato que tiene que ser buffer según la ayuda de delphi, bueno en realidad puse pchar por un ejemplo que tenía la ayuda.
el archivo que guarda es de menor tamaño (casi 25% más pequeño) que el archivo mp3 original.

también les quiero comentar que al fusionar los archivos los guarda bien puesto que el tamaño concuerda con el archivo original más el texto añadido.

alguna sugerencia.........

saludos.
__________________
Soy pésimo en lo que mejor hago y por eso me siento bendecido.
Responder Con Cita