*iBan* ( Mediaplayer )

[Garfield]

Das Aussehen hat aber mit der erwarteten Funktion nichts zu tun.

[mr_emre_d]

Neue Version ist jetzt verfügbar

Kann mir bitte einer helfen:
Ich bekomme es einfach nicht hin, wenn eine Datei mit iBan geöffnet wird, Vol zu setten !?!
Habs schon vieles probiert... !

MfG Mr_Emre_D

[mr_emre_d]

kann mir keiner helfen ?

[Garfield]

Delphi-Quellcode:

  if Style = 'XP' then
    od.InitialDir:= 'C:\Dokumente und Einstellungen\' + UN + '\Eigene Dateien\EigeneMusik\'
  else if Style = 'Vista' then
    od.InitialDir:= 'C:\Users\' + UN + '\Music\';

Das ist nicht so gut. Da solltest Du Dir mal dies ansehen.

Delphi-Quellcode:

  if fileexists( 'form.ini' ) then
  begin
    Ini:= TInifile.Create( extractfilepath( paramstr( 0 ) ) + '\form.ini' );
    Style:= ini.ReadString( 'Style', 'Form', '' );
    if ini.ReadString( 'Volume', 'Vol', '' ) <> '' then
      Vol:= strtoint( ini.readstring( 'Volume', 'Vol', '' ) )
    else
      Vol:= 50;
    Ini.Free;
  end;

besser

Delphi-Quellcode:

  Ini:= TInifile.Create( extractfilepath( paramstr( 0 ) ) + '\form.ini' );
  Style:= ini.ReadString( 'Style', 'Form', '' );
  Vol := ini.ReadInteger( 'Volume', 'Vol', 50);
  Ini.Free;

[mr_emre_d]

Danke für die Tipps;

Kannst du mir auch sagen, wie ich die Lautstärke am Anfang anpasse ?

[Garfield]

Vol := ini.ReadInteger( 'Volume', 'Vol', 50); bedeutet, dass Vol = 50 ist, wenn kein Wert aus der INI gelesen werden kann. Zum Beispiel weil es noch keine INI gibt.

[mr_emre_d]

ja danke,
wusste ich eigentlich schon ( automode wird auch so geladen ), weiß grad nicht warum ich es nicht so gemacht hab

Aber das mit der Lautstärke krieg ich einfach nicht hin ...



Ich hab grad ne Idee wie es klappen könnte... schau ma mal

EDIT:
Das Problem lag im Timer bei der if Abfrage von ( trackbar2.position <> tb2pos )
Ich hab einfach n Flag gesetzt :
PSetted //trackbar.Position setted

bei Form.Create hab ich nach Trackbar2.positon = Vol * 10 ( hab ich gerade umgeändert, da OVol nicht notwenidg ist )
PSetted umgeboolt
Anschließend hab ich einfach vor der Abfrage im timer noch ne abfrage über den flag gemacht !

Das Problem ist:
Bei Paramstr( 1 ) <> 0 wirds der Vol-Wert im .Ini nicht der Variable Vol zugewiesen ...


MfG

[Garfield]

Zitat von mr_emre_d:

Aber das mit der Lautstärke krieg ich einfach nicht hin ...

Ich versteh nicht, was Du meinst. Allerdings würde ich nicht andauernd im Timer prüfen, ob die Position der Trackbar2 geändert wurde, sondern stattdessen das OnChange der Trackbar2 nutzen.

[mr_emre_d]

ich weiß

Da gibts irgendeinen Grund dafür, nur fällt der mir gerade nicht ein
Denke ich zumindest

EDit:
Ok es gibt doch keinen Grund

[Larsi]

Also erstmal was positives: Bis darauf dass wenn man mit der Maus über die Buttons geht dass es dann blöd aussieht ist der Player übersichtlich gestaltet.

Verbesserungsvorschläge:
- Visualiesierung
- Ordner hinzufügen