Lautstärke von TMediaPlayer mit der Trackbar regeln???

[mlspider]

Hallo,

mein Problem steht eigentlich schon im Titel. Wie kann ich die Lautstärke (Master) in Verwendeung mit der TMediaPlayer-Komponente mit einer Trackbar regeln ???

Ein Code-Schnipsel wäre nicht schlecht!!!

[fkerber]

Hi!

Schau mal hier:
http://www.swissdelphicenter.ch/de/showcode.php?id=618

Ciao Frederic

[mlspider]

Genau diesen Code habe ich bereits eingebunden, nur weis ich leider überhaupt nicht, wie ich das nun mit der Trackbar regeln kann, bzw. aufrufen soll????!!!!!

[Giantics]

Zitat:

Zitat von mlspider

Genau diesen Code habe ich bereits eingebunden, nur weis ich leider überhaupt nicht, wie ich das nun mit der Trackbar regeln kann, bzw. aufrufen soll????!!!!!

Trackbar aufs Form. Max auf 1000 stellen und bei OnChange folgendes eintragen:

Delphi-Quellcode:

SetMPVolume(MediaPlayer1,TrackBar1.Pos);

[fkerber]

Hi!

Der Aufruf geschieht ja so:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject); 
begin 
  SetMPVolume(MediaPlayer1, 500); 
end;

Das müsste man dann etwa so ändern:

Delphi-Quellcode:

procedure TForm1.TrackBar1Change(Sender: TObject);
begin
  SetMPVolume(MediaPlayer1, Trackbar1.Position);
end;

Wie du siehst, wird das ganze jetzt im OnChange-Ereignis der Trackbar aufgerufen.
Sinnvollerweise sollte die Trackbar folgendermaßen eingestellt werden:
Max: 1000
Frequenzy: 20 (abhängig von Länge etwas zu verändern, bis der Abstand ordentlich aussieht)


Ciao Frederic

[mlspider]

Jetzt gibt er mir aus, daß Pos ein undefinierter Bezeichner ist.

[fkerber]

Hi!

Siehe meinen Beitrag: Es müsste Position heißen, denke ich mal.


Ciao Frederic

[Giantics]

Zitat:

Zitat von mlspider

Jetzt gibt er mir aus, daß Pos ein undefinierter Bezeichner ist.

Sorry hab mich vertan, muss natürlich Position heißen. :-D

[mlspider]

Erst mal Danke. Es gibt zwar jetzt keine Fehler mehr, allerdings passiert irgendwie garnichts, wenn man an der Trackbar regelt.

[fkerber]

Hi!

Hast du es ins Onchange der trackbar geschrieben?

Ciao Frederic

[mlspider]

Jo, das wars. Man, was würde ich ohne euch bloß machen können. fkerber, Du hast natürlich recht. Ich habe natürlich vergessen im Objektinstector auf der Ereignisseite doppelt ins OnChange-Ereignis zu klicken um dort den Code einzutragen!!!

Danke nochmals an alle!!!

[Pitch-Bull]

Hat schon mal einer den Fehler mit der winmm.dll gehabt?

Den bekomme ich immer, beim Onchange Event von der Trackbar

[fkerber]

Hi!

a) Passt das wirklich in den Thread?
b) WELCHEN Fehler?

Ciao Frederic