petage de plomb avec un Pchar [Delphi] - Programmation
Marsh Posté le 30-12-2001 à 12:07:50
http://perso.wanadoo.fr/fobec/Delphi/T_Truc.htm
Marsh Posté le 30-12-2001 à 12:22:55
je suis allé voir sur le site et j'ai pas trouvé de reponse a ma question.
Il y a bien un truc sur la lecture des tag id3 mais version 1 et donc avec taille définie ce qui dans mon cas ne pose pas de probleme.
Marsh Posté le 30-12-2001 à 12:48:06
c'est très bizarre cette histoire.
tu utilises quoi pour le fichier ?
J'utilise TFileStream, et ca marche très bien.
Exemple tiré de mon code source, pour une fonction locale à une autre fonction, et que j'utilise pour lire la chaine suivante dans un fichier où il y a des enregistrement de longueur variable (4 octets donnant la longueur, suivis par les caractères). intsize est un const valant sizeof(integer)
Code :
|
[edtdd]--Message édité par antp--[/edtdd]
Marsh Posté le 30-12-2001 à 12:52:16
DrLobo a écrit a écrit : je suis allé voir sur le site et j'ai pas trouvé de reponse a ma question. Il y a bien un truc sur la lecture des tag id3 mais version 1 et donc avec taille définie ce qui dans mon cas ne pose pas de probleme. |
La taille d'1 partie est indiqué dans le tag ID3V2
http://www.stcommunications.ca/~mb [...] d3v2.shtml ou http://www.id3.org/id3v2.3.0.html
Marsh Posté le 30-12-2001 à 13:42:14
antp>j'ai fait pareil ca marche pas
[SDF]Poire> je sais et j'ai taille exacte mais je la connait pas a l'avance -> taille dynamique
ca marche pas, je comprend pas
j'ai mis le code source et un mp3 tagé pour que vous voyer par vous meme.
Je vais aller me pendre...
le lien: http://lyrixplugin.free.fr/dl/exempleID3.zip (3.8Mo)
Marsh Posté le 30-12-2001 à 14:04:09
DrLobo a écrit a écrit : antp>j'ai fait pareil ca marche pas [SDF]Poire> je sais et j'ai taille exacte mais je la connait pas a l'avance -> taille dynamique ca marche pas, je comprend pas j'ai mis le code source et un mp3 tagé pour que vous voyer par vous meme. Je vais aller me pendre... le lien: http://lyrixplugin.free.fr/dl/exempleID3.zip (3.8Mo) |
G :
debut de la lecture
---------------------------------
USLT
Taille du tag = 1114 Position=184
>
fin de la lecture
engSummer Son
Texas
Greatest Hits (2000)
i'm tired of telling the story
tired of telling it your way
yeh i know what i saw
i know that i found the floor
before you take my heart reconsider
before you take my heart reconsider
i've opened the door
i've opened the door
here comes the summer's son
he burns my skin
i ache again
i'm over you
i thought i had a dream to hold
maybe that has gone
your hands reach out and touch me still
but this feels so wrong
before you take my heart reconsider
before you take my heart reconsider
i've opened the door
i've opened the door
here comes the summer's son
he burns my skin
i ache again
i'm over you
before you take my heart reconsider
before you take my heart reconsider
i've opened the door
i've opened the door
here comes the summer's son
he burns my skin
i ache again
i'm over you
here comes the winter's rain
to cleanse my skin
i wake again
i'm over you
here comes the summer's son
he burns my skin
i ache again
i'm over you
here comes the winter's rain
to cleanse my skin
i wake again
i'm over you
i'm over you
Marsh Posté le 30-12-2001 à 14:17:07
j'ai aussi ca met si tu regardes le code c'est vraiment pas elegant pour recuperer ces paroles
de plus ca devrai aussi les afficher apres le ">" et la ca marche pas
et puis si tu essayes dans la boucle de replacer:
memo2.Text:=memo2.Text+Buffer[j];
par
temp:=temp+Buffer[j];
avec temp:string ca devrais faire la meme chose et ben nan!
[edtdd]--Message édité par DrLobo--[/edtdd]
Marsh Posté le 30-12-2001 à 14:29:43
bon, mystère résolu:
les valeurs 0 sont utilisées comme fin de chaîne en C/C++, et pour le PChar du Pascal aussi.
Ici comme la chaîne commence par un 0, il considère que c'est une chaîne vide !
(sur le screenshot on voit le contenu de la variable buffer après lecture, "dumpée" dans un fichier. l'éditeur hexadécimal est souvent l'ami du programmeur, en tout cas c'est le cas d'après mon expérience pourtant relativement courte de programmeur)
[edtdd]--Message édité par antp--[/edtdd]
Marsh Posté le 30-12-2001 à 14:37:08
Youhou !!
merci pour votre aide !!
je coinçai la dessus depuis un journée!!
Marsh Posté le 30-12-2001 à 11:53:20
je suis en train de devenir fou!!
j'essaie de lire dans un mp3 les tags id3v2 (donc taille variable)
j'ai fais toutes les routines qui trouvent les tag et les tailles des champs, jusqu'a la pas tres compliqué tous est en taille fixe.
Mainteant pour récuperer les valeurs je fais ca:
var
Buffer:PChar;
temp:string;
taille:integer;
GetMem(Buffer,taille);
mp3.ReadBuffer(Buffer^,taille);
le probleme c'est que je n'arrive pas exploiter le contenu de Buffer!
premiere chose: Buffer n'est pas vide j'arrive a voir ce qu'il y a dedans en faisant
for j:=1 to taille do
memo2.Text:=memo2.Text+Buffer[j];
Par contre si je fais ca:
memo2.text:=Buffer
OU memo2.text:=Buffer^
OU temp:=Buffer
OU setString(temp,Buffer,Taille)
OU for j:=1 to taille do
temp:=temp+Buffer[j];
et ben y a rien!!
on pourrait m'expliquer ce qui va pas?
tous ce que je veux c'est recuperer le Buffer dans un string...