CLASSEMENT DES MP3
DelphiCool
Messages postés
455
Date d'inscription
mardi 24 juillet 2001
Statut
Membre
Dernière intervention
10 mars 2009
-
4 sept. 2010 à 18:17
piette Messages postés 68 Date d'inscription jeudi 11 décembre 2008 Statut Membre Dernière intervention 16 juin 2019 - 8 sept. 2010 à 12:31
piette Messages postés 68 Date d'inscription jeudi 11 décembre 2008 Statut Membre Dernière intervention 16 juin 2019 - 8 sept. 2010 à 12:31
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/52255-classement-des-mp3
https://codes-sources.commentcamarche.net/source/52255-classement-des-mp3
8 sept. 2010 à 12:31
En fait je me suis pris les pieds dans le tapis!
Je pensais que le composant se plaçait automatiquement dans la barre d'outils??
Dans mon prog je l'utilise comme une unité ce qui permet de ne pas l'installer.
J'ai fait une petite modif dans TglissListBox concernant le fonctionnemnt de Sorted pour le rendre plus conforme à l'explication de l'aide en ligne.
Comment faire pour remplacer la version dans mon zip ? Si cela peut intéresser quelqu'un.
Piette
7 sept. 2010 à 23:22
Pour moi, ce sont des classes "De Dion-Bouton".
Difficiles à faire démarrer... Mais une fois lancées, ça roule pépère. lol
7 sept. 2010 à 22:30
"Je ne connais pas la création dynamique du composant?"
si si c'est l'appellation que tu connais pas:
une création dynamique signifie que c'est le programmeur qui crée l'objet/composant par code lors de l'exécution du programme, généralement dans l'évènement "OnCreate" de la fiche et c'est ce que tu as fait :
" GlisseFichiers := TGlisseListBox.Create(self);"
@Caribensila:
"Effectivement, l'utilisation de ces classes n'est pas évidente."
sont utilisation est bien plus facile qu'il n'y parait à première vue ;)
7 sept. 2010 à 16:58
TCollection existe effectivement sous D5, mais il me faut relire l'utilisation qui n'est pas évidente! Avec l'aide en ligne j'ai toujours du mal alors j'improvise.
Merci pour le conseil.
Piette
7 sept. 2010 à 15:44
Je crois que TCollection et TCollectionItem sont disponibles sous Delphi5, et je pense qu'elles t'auraient grandement facilité la tâche dans une telle application.
Dommage d'avoir manqué l'occasion d'un bon tuto sur ces classes méconnues. :)
6 sept. 2010 à 17:30
Je ne connais pas la création dynamique du composant?
dans l'unité "tagMP3v1.pas" c'est mieux d'ajouter après la ligne 374 :
Data:=lowerCase(Data);
l'exe peut être utile pour ceux qui ne compile pas et voir le résultat?
j'ai oublié de joindre "AscenseurListBox.res", ce n'est pas très important mais cela fait désordre.
salut
Piette
5 sept. 2010 à 23:52
Merci Cirec, ça compile.
Intéressant comme composant: "TGlisseListBox"
5 sept. 2010 à 20:04
pour pouvoir compiler le code il faut:
dans l'unité "tagMP3v1.pas" il faut remplacer la déclaration suivante (ligne 103)
procedure FWriteDataFile (var NewDataFile: TrcALLData);
par
procedure FWriteDataFile (const NewDataFile: TrcALLData);
faire la même chose dans la partie "implementation" (ligne 164)
et dans l'unité "AscenseurListBox.pas" il manque le fichier "AscenseurListBox.res"
mais en mettant cette ligne en commentaire
{*$R AscenseurListBox}
ça compile enfin
S.T.P.
pourrais tu retirer tous les fichiers inutiles du ZIP :
"*.dsk; *.dcu; *.cfg; *.dof"
la présence de l'exe n'est pas nécessaire ici, la création du composant "TGlisseListBox" est faite dynamiquement, ça ne fait que prendre de la place.
pour le code .. désolé j'ai encore eu le temps de regarder ;)
5 sept. 2010 à 15:24
unit tagMP3v1
property AllData : TrcAllData read Fdata write FWriteDataFile;
[erreur]tagMP3v1(123): Les setters de propriétés n'acceptent pas de paramêtre var