SmallTune [0.3.1]

[Mithrandir]

SmallTune [0.3.1]
https://web.archive.org/web/20140712...smalltune.net/

Vorgeplänkel
(bei Desinteresse einfach überlesen. )

Im September gabs ja den Thread mit dem Abspielen einer MP3-Datei über DirectX. Knapp einen Monat später hat turboPASCAL einen kleinen MP3-Player veröffentlicht. Irgendwann hat meine Wenigkeit dann nachgezogen.

Allerdings war der Player damals sehr "featurearm" und eigentlich mehr ein "Proof-of-Concept". Mittlerweile ist SmallTune gewachsen. Und zwar richtig.

Beschreibung
"SmallTune" ist ein kleiner Audioplayer für Windows. Er ist primär dafür geschaffen worden, klein und unauffällig das zu tun, was so ein Player nunmal tun soll: Musik abspielen.

SmallTune startet in der Notification Area, legt keinen Eintrag in der Taskleiste an. Das Programm nutzt zum Verwalten der Playlist eine SQL-Datenbank. Somit sind auch MP3-Sammlungen jenseits der Zehntausende kein Problem. Die Listview, die zum Anzeigen der Playlist benutzt wird, ist virtuell. Somit stellen auch hier die großen Datenmengen kein Problem dar.

Beim Import werden, soweit möglich, die ID3-Tags aus den Dateien ausgelesen (bislang nur MP3/MP2). Dies führt natürlich dazu, dass der Import-Vorgang bei mehreren 1000 Dateien seine paar Minütchen dauert. Die Playlist besitzt eine Filterfunktion.

Außerdem kann er Internetradio wiedergeben, eine komplette Verwaltung ist integriert. Das Programm ist multilingual.

Außerdem ist es möglich, MySpace, Wikipedia und Google mit dem aktuellen Künstler direkt aus dem Programm heraus zu füttern.

//Edit: Kleiner technischer Nachtrach: Es wurde komplett auf die VCL verzichtet.


Download, Screenshots und Changelog
Screenshots

• Screenshots findet ihr auf dieser Seite

Changelog

• Das Changelog findet ihr auf dieser Seite

Downloads
//Edit 26.06.2019: Siehe Anhänge

Lizenz
SmallTune ist unter der MPL veröffentlicht.

Danksagung
Ein riesiges DANKE geht an turboPASCAL, der mich tatkräftig bei der Entwicklung unterstützt.

Desweiteren an HalloDu, lbccaleb und Luckie, die mir direkt oder indirekt geholfen haben.

Viel Spaß beim Testen...

//Edit 26.06.2019: Links auf Archive.org geändert, Downloads als Anhänge hinzugefügt

[Mithrandir]

Zitat von mleyen:

Jetzt noch die optionale Einstellungsmöglichkeit zur Unterstützung globaler Mediatasten und das Ding ersetzt meinen Winamp.

Da müsste ich mal schauen, sowas habe ich auf meinem Laptop nicht. Ich weiß aber, dass Windows da einige Keys kennt. Ich guck mal...

[wicht]

Hab das Programm nicht getestet (sorry ) aber der Source, die Screenshots und auch die Webseite sehen sehr schön aus, also

[Mithrandir]

Zitat von wicht:

Hab das Programm nicht getestet (sorry ) aber der Source, die Screenshots und auch die Webseite sehen sehr schön aus, also

Bei soviel Lob sei's dir verziehen...

[Mithrandir]

@mleyen und alle, die solche MM-Keys haben:

Könnt ihr die Exe im Anhang samt DLL mal testen? Ihr braucht dazu natürlich die sqlite.dll aus dem Originalarchiv.

Die DLL erstellt einen Shell-Hook. Nur dummerweise kommt bei meinem Programm nix an. Jetzt habe ich die DLL debuggt, und festgestellt, dass der Hook auf das Testprogramm, dass ich geschrieben habe um die MM-Keys zu simulieren, gar nicht anspringt. Wohl aber der Windows Media Player reagiert. Das wäre dann noch eine andere Baustelle.

Mich würde also mal interessieren, ob die "richtigen" Tasten auf dem Keyboard funktionieren.

//Nachtrag: Mittlerweile läuft es. An dieser Stelle danke an die zwei Unbekannten Downloader.

[toms]

Drag & Drop in die Playlist wäre noch nützlich.

[Mithrandir]

Bugfix only Release 0.2.1

Zitat von Changelog:

• [-] After restarting the explorer, the icon was lost.
• [-] After adding files oder folders, clicking and removing items from the playlist without restarting failed
• [-] Different names for the same action
• [-] Position didn't change when Taskbar was replaced

[toms]

Wenn Shuffle = True ist und auf "Next" geklickt wird im Player gibt es einen "Range check error" wenn die Playlist leer ist.

Der Fehler entsteht hier (unit dgstMediaClass.pas):

Delphi-Quellcode:

procedure TMediaClass.PlayNextTrack;
//....
      repeat
        Pos := random(GetDBItemsCount - 1) + 1;
        inc(i);
      until (fSongsAlreadyPlayed[Pos - 1] <> true) or (i >= Length(fMediaFileLst));

oder genauer gesagt hier: fSongsAlreadyPlayed[Pos - 1] Beheben lässt es sich wahrscheinlich so (kommt auf jeden Fall keine Fehlermeldung mehr)

until (i >= Length(fMediaFileLst)) or (fSongsAlreadyPlayed[Pos - 1] <> true);

[DeddyH]

Bitte bitte nicht mit true vergleichen

[turboPASCAL]

So besser ?
until (i >= Length(fMediaFileLst)) or (fSongsAlreadyPlayed[Pos - 1] = false);


until (i >= Length(fMediaFileLst)) or not (fSongsAlreadyPlayed[Pos - 1]);

[mleyen]

Zitat von Daniel G:

• [-] Position didn't change when Taskbar was replaced

Bei mir funzt´s immer noch nicht wie gewollt.
Warum? Weil ich meine Taskleiste auf dem 2tem Desktop habe.