AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Projekte *iBan* ( Mediaplayer )
Thema durchsuchen
Ansicht
Themen-Optionen

*iBan* ( Mediaplayer )

Ein Thema von mr_emre_d · begonnen am 18. Mai 2008 · letzter Beitrag vom 15. Sep 2008
Antwort Antwort
Seite 1 von 6  1 23     Letzte »    
mr_emre_d
Hallo liebes Community,

Heute möchte ich euch meinen Mediaplayer ("iBan") vorstellen.
Es ist ein simpler Player, der Musik(mp3, wma, wav) und Video(wmv, asf) Dateien abspielen kann

Das ist mein erster Upload

Akso, eines sollte ich wahrscheinlich noch erwähnen:
Die "MciVolume.pas" Datei habe ich von SwissDelphiCenter.ch

Version 1.4:
...Mit 'add' kann man mehrere Dateien einfügen ( Opendialog )
...Man kann mit Rechtsklick zwischen XP & Vista Style wechseln, wobei nur die Schriftart und Flats umgeändert werden
...Man kann direkt Mediendateien mit iBan öffnen
...Sort Funktion

Version 1.5:
...Man kann jetzt mit der Maus vor- und zurückspulen ( konnte man früher mit den Pfeiltasten )
...Initialdir vom Opendialog ( SpeedButton: Open ) gesetzt
--> man muss allerdings das richtige Betriebssystem auswählen ( Rechtsklick )

Version 1.6:
...einige neue Funktionen ( Playlist-Verwaltung ) sind dazu gekommen

Version 1.7
...man kann nun *.m3u & *.pls Dateien reinladen bzw abspielen
...hab gestern unabsichtlich die nicht fertige Version upgelodet ( nun steht die richtige zur Verfügung )

Version 1.8:
...paar Sachen gefixt

Version 1.9
...Bugs gefixt ( unter XP könnten Bugs auftreten... das Design leidet unter XP auch sehr ! )
..."Add Folder" hinzugefügt
...ID3v1 Tag Editor ! ( könnte noch fehlerhaft sein !)
...*.mod Dateien nun abspielbar !
...Hintergrundbilder sowie Logos usw. nun in der .exe !

Aktuelle Version ( 2.0 ) ( 22.6.08 )
...Umstieg von Mediaplayer auf Bass.dll ( bass.pas ) !
...Equalizer, Visualisierung !
...Rechtsklick auf "Auto" - "Random"

EDIT:
Ich sehe gerade, dass die 2.0 er Version oben ist... Hab vergessen den 2.1 raufzuladen, wo der Tag-Bug gefixt wurde

Ach übrigens:
Ich hab mit der Weiterentwicklung aufgehört -- wenn irgendeiner weiterarbeiten will, der darf das von mir aus ABER
er soll mich vorher kontaktieren ! Und mir immer über den aktuellen Status berichten



Was ich noch vorhabe:
... Keine interesse mehr
Miniaturansicht angehängter Grafiken
unbenannt_947.jpg  
Angehängte Dateien
Dateityp: rar iban_2.1_802.rar (623,2 KB, 137x aufgerufen)
 
mr_emre_d
 
#2
  Alt 18. Mai 2008, 12:18
Es soll anscheinend Probleme unter Xp geben

Falls das so ist, bitte ich euch, eine detaillierte Beschreibung des Problems hier rein zu stellen

MfG
  Mit Zitat antworten Zitat
BullsEye

 
Delphi 7 Personal
 
#3
  Alt 18. Mai 2008, 12:28
Kurz angetestet:
  • Spielt immer nur ein Lied ab.. Sprich Playlist geht nicht. Wird auch nicht das eine Lied angezeigt
  • Add, Save, Clear geht nicht
  • Stop ist nur ein Pause Button
  • Man kann nicht zu einer anderen Stelle springen
  • Man kann nur die Playlist oder das Andere(KA was das sein soll) öffnen nicht beides gleichzeitig
  • Lied wird nicht zu Ende gespielt
  • Falsche angaben der Länge und der aktuellen Stelle

Getestet unter Win XP SP2
selbst für eine Alpha ist das Teil nicht zu gebrauchen!
Marc
  Mit Zitat antworten Zitat
Benutzerbild von Matze
Matze

 
Turbo Delphi für Win32
 
#4
  Alt 18. Mai 2008, 12:30
Hallo,

ich komme mit dem Player nicht nicht klar.

Wenn ich per Drag&Drop Dateien in das Playlist-Feld ziehe, bleibt das Feld leer und einen Dateinamen sehe ich oben, der auch abgespielt wird.
Der OpenDialog sollte standardmäßig als Filter alle unterstützten Formate beinhalten. Ich muss zur Zeit den Filter wechseln, wenn ich eine MP3-Datei öffnen möchte. Auch kann ich nicht mehrere Dateien auf einmal auswählen.
Ich verstehe nicht, wozu das Feld ist, das man nach unten und nach rechts aufklappen kann. Die Benutzerfreundlichkeit ich wirklich nicht die beste.

Die Anzeige der ID3-Tags wäre evtl. auch noch nett, zumindest beim aktuell abgespielten Titel. Den Dateinamen würde ich nur anzeigen lassen, wenn Titel und Interpret nicht in den ID3-Tags vorhanden sind.

Wenn kein Lied geladen wurde, wird eine unschöne Meldung beim Klick auf "Stop" und "Play" angezeigt.

Grüße, Matze
  Mit Zitat antworten Zitat
Benutzerbild von SirThornberry
SirThornberry

 
Delphi 2006 Professional
 
#5
  Alt 18. Mai 2008, 12:31
könntest du dem Beitrag bitte einen aussagekräftigeren Titel geben?
Jens
  Mit Zitat antworten Zitat
mr_emre_d
 
#6
  Alt 18. Mai 2008, 15:36
Probiert diese Version

MfG
  Mit Zitat antworten Zitat
BullsEye

 
Delphi 7 Personal
 
#7
  Alt 18. Mai 2008, 20:24
Ist immernoch nicht so gut.
Wenn ich auf Add klicke, kommt immer nen Fehler. "Datei ist bereits in der Playlist".
Der Rest ist eig fast alles gleich geblieben!

EDIT:
Wie ich gerade im Code sehe, nutzt du die Mediaplayer funktion. Dies ist eig "Müll", zumal, wenn du nen Musikplayer schreiben willst. Diese Komponente kann man wohl nutzen, wenn du bei nem Spiel oder so Hintergrundmusik haben willst. Sonst nicht
Nutze lieber "FMOD" oder BassDLL bzw dessen Komponente von tP "BassDLLPlayer"
Marc
  Mit Zitat antworten Zitat
mr_emre_d
 
#8
  Alt 18. Mai 2008, 20:39
ja wenn die datei schon in der liste ist ...
  Mit Zitat antworten Zitat
BullsEye

 
Delphi 7 Personal
 
#9
  Alt 18. Mai 2008, 21:01
Das Problem dabei ist ja, SIE IST NICHT VORHANDEN!
Ich lade da nichts rein! :wall:
Ich klicke ja auf diesen Button, damit ich irgendetwas da rein bekomme! Tut sich aber nicht^^

Und iwie finde ich den ganzen Code auch unnütz blöde...

  if listbox1.Count > 0 then Das müsste, wenn ich richtig bin nicht 0 sondern -1 sein.
Und außerdem ist in der ganzen Prozedure nicht was irgendwas irgendwo reinlädt!??!
:gruebel:


Zum Speichern: Eine Playlist speichert man nicht in einer INI File sondern als m3u oder pls etc..
Außerdem speicherst du da nur wie viele Lieder in der Playlist drin sind, und nicht WELCHE Lieder drin sind?!
:gruebel:

Zum Löschen:

 DeleteFile( 'playlist.ini' ); Das ist öhm... NICHTS!
Wenn dann wäre folgender Code angebrachter:
ListBox1.Clear;
Warum benutzt du Speed anstatt normale Buttons?

Ich will dir ja nicht zu nahe treten, aber es scheint, als wäre das nicht so dein Ding!

EDIT: AHA ich habe die Funktion des "add Buttons" gefunden! Der fügt das Lied, welches gerade abgespielt wird der Playlist hinzu! Wie sinnlos, zumal wenn ich mehrere Lieder hinzufügen will!

Zu der "is already in Playlist" Message: Finde ich unnütz, da ich vllt ein Lied am Anfang der Playlist und das selbe am Ende haben will. Gott weiß warum aber vllt ist das so1
Marc
  Mit Zitat antworten Zitat
Benutzerbild von Garfield
Garfield

 
Delphi XE5 Professional
 
#10
  Alt 19. Mai 2008, 08:03
Zitat von BullsEye:
  if listbox1.Count > 0 then Das müsste, wenn ich richtig bin nicht 0 sondern -1 sein.
Bei -1 würde der Vergleich immer True ergeben, da eine Anzahl nicht negativ sein kann. Bei der Prüfung des ItemIndex wäre -1 richtig.

Der erste Eindruck:
  • Bei den TSpeedbutton für "play", "pause" und "open" ist Flat := True eingestellt. Da die Farbe der Button mit der Farbe der Schrift übereinstimmt, kann man kann die Caption nicht mehr lesen wenn man mit der Maus drüberfährt.
  • Bei einem Klick auf "Open" wird kein Verzeichnis - zB Eigene Musik - vorgegeben.
  • Nach dem Öffnen einer Datei wird die Lautstärke immer "voll" aufgedreht.
  • Die Playlist wird in einer Endlosschleife abgespielt, wobei der aktuelle Titel nicht markiert ist.
  • Es gibt keine Stop-Funktion.
  • Das Auf- und Zuklappen dauert mir zu lange. Nach dem Aufklappen müsste die Caption des TSpeedButton von ">" auf "<" geändert werden.
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 1 von 6  1 23     Letzte »    


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 21:09 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz