Player

[Alex_ITA01]

Hallo erstmal,
wollte mal mein Programm vorstellen und nach Meinungen fragen die "kritisch" sind aber auch gute...
Ist ein Programm zum abspielen von, MP3's Ogg's und WAV's
MFG Alex

PS: Readme liegt bei...

[DP-Maintenance]

Dieses Thema wurde von "sakura" von "Programmieren allgemein" nach "Freeware" verschoben.
Dat ist Software, net ne Frage ;)

[djmasi]

Konnte bis jetzt nur mp3's testen. Die liefen ohne Probleme. Allerdings haken die Regler bei mir ab und zu.
Ähm hab gerade Deine Suche ausprobiert - jetzt kann ich nichtmehr auf die MainForm zugreifen :(
Playlist und Visualisierung sind noch erreichbar :gruebel:

Ein paar Effekte wären nicht schlecht (läßt sich ja schön mit der bass.dll machen). Hast Du die eigentlich auch bezahlt? :mrgreen:

[HW764]

Die allgemeine Olivenfarbe ist nicht sehr schön, nimm einen Grauton

[Alex_ITA01]

Sorry hatte leider Freeware übersehen...
Beim nächsten mal kommts gleich da rein!

Das die Regler haken kommt beim mir aber nicht vor.Weiß nicht voran das liegen könnte.
Das mit der Suche weiß ich woran es liegt, das wollte ich schon lange mal ausmerzen den Bug aber habs irgendwie immer vergessen-> mach ich sofort, DANKE

Bezahlt? :gruebel:
Ich denk schon :mrgreen:

Visualisierung habe ich ja 3 Stück bisher eingebaut.
Bin noch dran weitere zu "machen"

Aber danke bisher

[Alex_ITA01]

Farbe kannst du ändern unter Visualisierungsoptionen bzw einstellungen
Dort kann man einiges ändern
Mfg

[djmasi]

Mit Effekte meine ich Equalizer, Verzerrungen (Änderung Ton/Geschwindigkeit), Crossfading, ...

Die Regler haken in dem Sinne, dass sie mal kurz ihre Position verändern, wenn ich am regeln bin und dann hängen bleiben für nen moment

@HW764:
Im Vordergrund sollte erstmal die Funktion stehen. Dat Aussehen kommt später. Aber hast schon recht. Standardmäßig grau wäre besser (auch wenn man es dann bei den Optionen ändern kann)

[Alex_ITA01]

Equalizer und sowas habe ich mir auch schon überlegt nur ist das Problem folgendes das ich auf einem PC programmiere der eine Soundkarte hat aber kein EAX unterstützt und soweit ich informiert bin benötige ich das für den Equalizer.Oder hast du irgendwie ein Tip wie ich das hinbekomme @djmasi?
Änderung wegen des Suchen-Dialoges habe ich erledigt :thumb:
Lege ich demnächst dann mal ab (hat nur ein Close Event gefehlt *g*)
Alex

[djmasi]

Jepp, das steht auch in den Beispielen.

Delphi-Quellcode:

//globale Variable
var    p: BASS_FXPARAMEQ;
       fx: array[1..4] of Integer;


procedure TFPlayer.vrBassChange(Sender: TObject);
begin
  BASS_FXGetParameters(fx[1], @p);
  p.fGain := Round(vrBass.Position/3.33)-15;
  BASS_FXSetParameters(fx[1], @p);
end;

procedure TFPlayer.vrMiddleChange(Sender: TObject);
begin
  BASS_FXGetParameters(fx[2], @p);
  p.fGain := Round(vrMiddle.Position/3.33)-15;
  BASS_FXSetParameters(fx[2], @p);
end;

procedure TFPlayer.vrTrebleChange(Sender: TObject);
begin
  BASS_FXGetParameters(fx[3], @p);
  p.fGain := Round(vrTreble.Position/3.33)-15;
  BASS_FXSetParameters(fx[3], @p);
end;

//dass dann bei play aufrufen
procedure TFPlayer.SetFx;
begin
  fx[1] := BASS_ChannelSetFX(PriChan, BASS_FX_PARAMEQ);
  fx[2] := BASS_ChannelSetFX(PriChan, BASS_FX_PARAMEQ);
  fx[3] := BASS_ChannelSetFX(PriChan, BASS_FX_PARAMEQ);

  p.fGain := Round(vrBass.Position/3.33)-15;
  p.fBandwidth := 18;
  p.fCenter := 125;
  BASS_FXSetParameters(fx[1], @p);
  p.fGain := Round(vrMiddle.Position/3.33)-15;
  p.fCenter := 1000;
  BASS_FXSetParameters(fx[2], @p);
  p.fGain := Round(vrTreble.Position/3.33)-15;
  p.fCenter := 8000;
  BASS_FXSetParameters(fx[3], @p);
end;

[Alex_ITA01]

Danke für den schnellen Tip
Probiere ich gleich mal
Frage:
Was ist PriChan???

fx[1] := BASS_ChannelSetFX(PriChan, BASS_FX_PARAMEQ);
.
.
.

Thx