begin process at 2010 02 10 07:14:12
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

Multimedia

 > MEDIA PLAYER COMPLET

MEDIA PLAYER COMPLET


 Information sur la source

Note :
2 / 10 - par 1 personne
2,00 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :Multimedia Classé sous :mediaplayer Niveau :Débutant Date de création :23/06/2006 Date de mise à jour :23/06/2006 18:04:51 Vu / téléchargé :7 883 / 2 613

Auteur : le nouveau

Ecrire un message privé
Commentaire sur cette source (19)
Ajouter un commentaire et/ou une note

 Description

petit mediaplayer avec playlist ,bibiliotheque,lecture aleatoire etc..



 Fichier Zip

Les Membres Club peuvent télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !
  •   mediaplayer2
    • ajoutermusique.dcuTélécharger ce fichier [Réservé aux membres club]3 376 octets
    • ajoutermusique.dfmTélécharger ce fichier [Réservé aux membres club]700 octets
    • ajoutermusique.pasTélécharger ce fichier [Réservé aux membres club]Voir ce fichier406 octets
    • biblio.dcuTélécharger ce fichier [Réservé aux membres club]3 418 octets
    • biblio.dfmTélécharger ce fichier [Réservé aux membres club]471 octets
    • biblio.pasTélécharger ce fichier [Réservé aux membres club]Voir ce fichier403 octets
    • choixbiblio.dcuTélécharger ce fichier [Réservé aux membres club]9 372 octets
    • choixbiblio.dfmTélécharger ce fichier [Réservé aux membres club]1 978 octets
    • choixbiblio.pasTélécharger ce fichier [Réservé aux membres club]Voir ce fichier4 673 octets
    • mediaplayer1.dcuTélécharger ce fichier [Réservé aux membres club]27 102 octets
    • mediaplayer1.dfmTélécharger ce fichier [Réservé aux membres club]250 728 octets
    • mediaplayer1.pasTélécharger ce fichier [Réservé aux membres club]Voir ce fichier22 711 octets
    • modiflist.dcuTélécharger ce fichier [Réservé aux membres club]20 620 octets
    • modiflist.dfmTélécharger ce fichier [Réservé aux membres club]4 447 octets
    • modiflist.pasTélécharger ce fichier [Réservé aux membres club]Voir ce fichier14 724 octets
    • optionplaylist.dcuTélécharger ce fichier [Réservé aux membres club]3 749 octets
    • optionplaylist.dfmTélécharger ce fichier [Réservé aux membres club]1 144 octets
    • optionplaylist.pasTélécharger ce fichier [Réservé aux membres club]Voir ce fichier546 octets
    • playlist.dcuTélécharger ce fichier [Réservé aux membres club]6 338 octets
    • playlist.dfmTélécharger ce fichier [Réservé aux membres club]1 296 octets
    • playlist.pasTélécharger ce fichier [Réservé aux membres club]Voir ce fichier2 136 octets
    • progresse.dcuTélécharger ce fichier [Réservé aux membres club]10 123 octets
    • progresse.dfmTélécharger ce fichier [Réservé aux membres club]1 558 octets
    • progresse.pasTélécharger ce fichier [Réservé aux membres club]Voir ce fichier5 134 octets
    • Project1.~dprTélécharger ce fichier [Réservé aux membres club]749 octets
    • Project1.cfgTélécharger ce fichier [Réservé aux membres club]Voir ce fichier434 octets
    • Project1.dofTélécharger ce fichier [Réservé aux membres club]Voir ce fichier2 030 octets
    • Project1.dprTélécharger ce fichier [Réservé aux membres club]Voir ce fichier793 octets
    • Project1.resTélécharger ce fichier [Réservé aux membres club]876 octets
    • Unit1.dcuTélécharger ce fichier [Réservé aux membres club]19 265 octets
    • Unit1.dfmTélécharger ce fichier [Réservé aux membres club]5 526 octets
    • Unit1.pasTélécharger ce fichier [Réservé aux membres club]Voir ce fichier14 416 octets
  • scrutedossier.zipTélécharger ce fichier [Réservé aux membres club]3 112 octets

Télécharger le zip


 Historique

23 juin 2006 18:04:51 :
desoler j'aivais oublier de mettre le scrute avec le zip encore desoler

 Sources du même auteur

Source avec Zip APERCU DES FENETRES REDUITE

 Sources de la même categorie

Source avec Zip Source avec une capture SCREENCAMTURE 0.2 par JulioDelphi
Source avec Zip Source avec une capture CHANGEUR DE FOND D'ÉCRAN par John Dogget
Source avec Zip Source avec une capture SCAN THREAD : BASS par Nicolas___
Source avec Zip Source avec une capture PEDALE MULTI EFFETS [BASS ASIO] par Nicolas___
Source avec Zip Source avec une capture POPUP ALERTE STYLE MSN AVAST par strobinateur

 Sources en rapport avec celle ci

Source avec Zip PORT PARALLÈLE : CONTRÔLEZ MEDIAPLAYER AVEC UNE TÉLÉCOMMANDE... par rylryl
Source avec Zip Source avec une capture LECTEUR MP3 A L'AIDE DE L'OUTIL MPLAYER par kamalz
Source avec Zip Source avec une capture LECTEUR MP3 DEZAMP par Dezouille
Source avec Zip OUVRIR UNE WEBRADIO AVEC TWINDOWSMEDIAPLAYER par homer88

Commentaires et avis

Commentaire de Also know as le 23/06/2006 17:37:43

Salut,

On ne peu malheureusement rien testé sous ton lecteur car il manque un fichier :

  [Erreur fatale] Unit1.pas(7): Fichier non trouvé : 'Scrute.dcu'

Se serait bien de préciser ou est-ce que l'on peu le télécharger.

J'ai pris le scrupte de cette page :
http://www.delphifr.com/code.aspx?ID=21324

Cela fonctionne mais maleureusement je pense qu'il n'est pas du tout adapté à ton lecteur.

Vous pouvez donc en attendant qu'il les rajoute télécahrger ces fichier à cette adresse :
http://m.strasser.free.fr/delphifr/MEDIA-PLAYER-COMPLET_38268/scrute.zip

Je ne commente donc pas plus cette source et ne donne pas de note !

@+

Commentaire de Also know as le 23/06/2006 19:24:20

Salut,
Voici donc mes remarques par rapport à ton logiciel :
> Tout d'abord la bibliothèque :
- Faudrait revoir ta phrase si le fichier ini n'existe pas, d'une elle n'est pas bien écrite, et de deux on ne comprend pas trop cette phrase la première fois que l'on utilise ce logiciel
- Une fois qu’on à choisi un dossier avec des musiques, celui-ci ne peu pas se finir, pour ma part j'ai une erreur du style : "Violation d'accès à l'adresse XXXXXXXX dans le module "Project1.exe". Lecture de l'adresse XXXXXXXX.
- Si je clique du coup sur annuler, pareil il ne peut pas terminer l'opération car un problème intervient et un message du même style apparait
- Il devient donc impossible de quitter la fenêtre
- On ne peu sélectionner qu'une musique par une musique, il faudrait revoir globalement l'histoire de la bibliothèque
+ Le concept d'ajout de cette manière est bien faite et bien pensée
+ Si on ne tiens pas compte des erreurs ci-dessus, tout fonctionne correctement

> Point de vue de la PlayList
> J'ai eu des problèmes mais alors de tous les côtés
- Si je fais clic-droit ==> Nouveau ==> Nom de la playlist "Test" ou encore "ma playlist", le programme plante et s'arrête à cette ligne : "fichier.WriteString('playlist','nom',test);"
- Clic droit ==> Voir ==> Le programme plante à nouveau, normal vu qu'il n'existe pas de playlist (indice hors limite). Voici son message : "frame61.ComboBox1.Text:=listbox1.Items.Strings[listbox1.itemindex];"

> Sur le lecteur même
- On ne sait pas quelle chanson passe, je pense qu'il faudrait avoir la liste des chansons sélectionnées, à part ou dans la même fenêtre, mais visible dés le départ
- On voit que les boutons (Pause, lecture, etc) scintillent légèrement, j'ai testé avec le "DoubleBuffered" sur la form mais cela n'y change strictement rien.

J'aurais plein d'autre remarques à faire sur le lecteur, mais je n'ai aps envie que tu le prennes mal, car ce n'est pas mon but, bien au contraire.
Ensuite c'est dommage que tu ne commente pas de temps à autre ton code source, cela pourrait en valoir la peine pour les débutants comme moi.
Ce qui est bizarre c'est que tu utilises des Form, des Frames, de tous les côtés, mais alors ca par partout ! :D, on sait plus ou on est à la fin ^_^.

Donc voilà

Au final je ne pense pas que je vais la noter car je ne suis pas assez bon dans ce domaine pour donner mon point de vue.

@+

Commentaire de cirec le 23/06/2006 19:53:18 administrateur CS

Salut,

Il y a des fichiers qui ne devraient pas se trouver dans ton Zip :
*.DCU et *.~*

et si tu veux tu peux même télécharger la source de F0xi qui fera le "ménage" à ta place :-)

Ici : http://www.delphifr.com/codes/DELPHI-PROJECT-CLEANNER-DEPOC-OUTILS-POUR-NETTOYER-VOS_38066.aspx

@+
Cirec

Commentaire de jlen100 le 23/06/2006 20:06:12

salut,
en plus des remarques ci dessus:
composants non renommés et pas de commentaires ce qui le code illisible

@+
jlen

Commentaire de Francky23012301 le 23/06/2006 20:13:40

Salut,

Je te remercie : voila une application novatrice.Evidemment c'est quelque chose qui manquait cruellement sur CS. Ca doit juste faire le 300 ieme mediaplayer sur CS : Mdrrrrrrrrr.

Revois tout ca et la prochaine fois publie quelque chose qui interesse la communauté si tu veux pas te faire allumer comme ci-dessus

A+

Commentaire de Francky23012301 le 23/06/2006 20:20:27

Second post, je viens de voir ton source : le source est mal structuré. Tu as mal répartie les fonctions et procedures.

Je rejoins JLen : c'est mal codé et pas commenté. En plus d'erreurs flagrantes, tu aurais pu simplifier le source.

Désolé si on est durs mais quand on fait du réchauffer, en général les gens sont intransigeants

A+

Commentaire de Also know as le 23/06/2006 20:20:32

Je pense que tu es un peut vache tout de même "Francky23012301", c'est son premier message ici donc sa proemière source, qui plus est il est inscrit depuis le 23/06/2006 16:46:56, autrement dit aujourd'hui.

Donc certe c'est pas parfait mais bon autant l'encourager dans ce qu'il souhaite faire non ?

@+

Commentaire de jlen100 le 23/06/2006 20:22:14

faut dire à sa décharge :
Arrivée sur CodeS-SourceS le : 23/06/2006 16:46:56
Date création : 23/06/2006 16:51:46
autrement dit il 'a surement pas eu le temps de prendre connaissance des us et coutumes du site!!! ni même de lire ce qui existait déjà.


Bien venue quand même et corriges les imperfections

@+
jlen

Commentaire de jlen100 le 23/06/2006 20:23:52

AlsoKnowAs tu m'as coupé l'herbe sous le pieds!!

Commentaire de Francky23012301 le 23/06/2006 21:03:44

Re,

Alors c'est pas bien de pointer du doigt les copains quand on ouvre "les hostilités" : ;).
En plus vu le nombres on aurait dit un listing : Mdrrrrr.

Sérieusement en ce qui concerne le MediaPlayer, il y a en a deja tellement sur CS que il me semblait important de le souligner. En plus je l'ai fais avec humour.

Pour le code : bon il y a un point positif : il y a eu du travail c'est flagrant vu la taille du code (en partant du principe que c'est un débutant). Donc oui continue  bien évidemment ... La prochaine fois que tu postes demandes aux membres avancés ce qu'ils en pensent et demande eventuellement une correction.

Pour conclure, continue à coder : tu me sembles bien partis pour etre un bon codeur

A+

Commentaire de Francky23012301 le 23/06/2006 21:05:07

Par contre je le félicite : pas de messages => Donc il s'est débrouillé tout seul.

Alors là j'applaudie plof plof plof (ca fait pas ca comme bruit mais bon ^^).

Bon coding

Commentaire de delphinait le 24/06/2006 02:01:46

Bonjour , tres bon prog  bravo  , vraiment complet !!!

Commentaire de f0xi le 24/06/2006 04:09:34 administrateur CS


Quelques petites erreur et methodes lourdes :



function RechercheMot(const Phrase,Mot:String; const SensitiveCase : boolean = false):Boolean;
var i : integer;
begin
  if SensitiveCase then
     Result := Pos(Mots,Phrase) <> 0
  else
     Result := Pos(lowercase(Mots),lowercase(Phrase)) <> 0;
end;


if RechercheMot(name ,edit1.Text) and (edit1.Text <> '') then begin


if radiobutton2.Checked then
   for y := 0 to listbox1.Count-1 do
       listbox1.Checked[y] := true;


{{
if minute<10 then begin
if seconde<10 then
label3.Caption := signe+'0'+inttostr(Minute)+' : 0'+inttostr(Seconde)
else
label3.Caption := signe+'0'+inttostr(Minute)+' : '+inttostr(Seconde)
end else begin
if seconde<10 then
label3.Caption := signe+inttostr(Minute)+' : 0'+inttostr(Seconde)
else
label3.Caption := signe+inttostr(Minute)+' : '+inttostr(Seconde)
end;
}}
a remplacer par :

Label3.Caption := format(Signe+'%.2d : %.2d',[Minute,Seconde]);


pour tester une extention valide :

function ValidExt(const FileName : string) : boolean;
const
    CExts: string = '|.mp3|.wav|.avi|';
begin
  result := pos('|'+LowerCase(ExtractFileExt(FileName))+'|', CExts) <> 0;
end;


ce qui permet de virer cela :

if (extractfileext(NomDuFichierstr)='.wma') xor
(extractfileext(NomDuFichierstr)='.avi') xor
(extractfileext(NomDuFichierstr)='.wav') xor
(extractfileext(NomDuFichierstr)='.mp3')
then begin

et de remplacer par :

if ValidExt(NomDuFichier) then begin ...

en plus je ne vois pas pourquoi tu fait un XOR la dessus. OR suffit.



sinon j'ai pas plus regarder que ça ... mais ça a l'air bien, le mieux serait egalement de mettre un petit screenshoot sur ta source ... et de nettoyer l'archive des fichiers inutiles.

Commentaire de Matt 261 le 24/06/2006 14:43:16

Et allez, un de plus...

Commentaire de Michele58 le 27/06/2006 18:10:19

Infonctionnable !!!

Michèle.

Commentaire de jlen100 le 27/06/2006 18:25:52

-->Michele58 tu pourrais traduire ton charrabia?
infonctionnable ça veut dire quoi?
Inutile d'écorcher la langue de Molière.
ce genre de remarques ne font pas avancer les choses si tu n'expliques pas ce qui ne te convient pas.
"Ce qui ce conçoit aisément s'exprime clairement"

@+
jlen

Commentaire de Michele58 le 28/06/2006 16:36:59

"Infonctionnable = ne fonctionne pas !" Voilà j'ai corrigé pour les âmes sensibles ! Celui qui commet aucune erreur, c'est bien celui qui ne fou rien !

Michèle.

Commentaire de N_M_B le 05/07/2006 19:21:44

Bonjour ! bein moi je voulais juste te dire que ton lecteur me sera bien utile pour entendre de la zik quand mon pc commence a ralentire il est asser leger ! je te parle pas du code puisque je ne me suis pas encore lancé dans le multimedia mais tout ce que je peut te dire c'est continue !

Commentaire de kamalz le 18/07/2006 01:45:38

Il manque un fichiermais c bon comme effort

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

pb avec Mediaplayer [ par gemini24 ] Slt.Je débute et j' essaye de faire un lecteur video basé sur ce composant, et certain bug m' agace.Le premier et sans doute le plus simple : lorsque MediaPlayer S*X [ par SMoG ] Salut, jtrouve ke mediaplayer prend beaucoup trop de ressource et jvoudrais savoir si yavé pa un autre moyen pour lire un MP3... Mediaplayer et fullscreen [ par Bui ] Salut ! J'ai un petit probleme : je debute en Delphi et je voudrais realiser des applications avec des videos, mais je n'arrive pas a les mettre en pl lecteur mediaplayer [ par fab30 ] J'utilis un lecteur mediaplayer avec un TAnimate pour lir une video, et je cherche à couper le volume de son. Merci de me faire parvenir la solution s Tmemorystream et mediaplayer [ par zjb ] J'ai un problème lorsque j'utlise un tmediaplayer et que je souhaite charger un son à partir d'un stream, il ne les charges qu'a partir d'un chemin su mediaplayer et videos mpeg [ par santopadre ] Le media player de delphi 4 ne semble pas accepter les videos MPEG, y a t il une soluce ?Sinon a partir de quelle version de Delphi cela est-il inclus Scrollebar avec mediaplayer [ par lupoo ] hello, je voudrais lier une scrollbar avec une vidéo chargé par mediaplayer..quelle est la propriété de Mediaplayer qu'il faut utiliser avec ......... jarrive à lire les WAV mais pas les MP3 avec le Tmediaplayer de delphi. comment faire? [ par nicola2s ] Je suis en train de créer un lecteur mp3 avec base de données access pour stocker mes MP3 et la je suis en train de créer la partie qui permet de lire mediaplayer: avancer une musique avec TtrackBar [ par etrix ] Salut tousj'ai commencer un lecteur mp3 avec Tmediaplayer et je voudrais pouvoir avancer la musique à l'aide d'un TrackBar, mais je ne trouve pas la s Mediaplayer: Bruit de fond génant [ par etrix ] Bonsoir,J'ai fait un Player mp3 assez complet, et lorsque je joue une musiqe (format mp3 bien sur) un son génant vient par accout en fond de musique (


Nos sponsors


Sondage...

CalendriCode

Février 2010
LMMJVSD
1234567
891011121314
15161718192021
22232425262728

Consulter la suite du CalendriCode

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 1,076 sec (4)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales