Hallo!
Ich habe ein Problem. Ich versuche ein Quiz zu programmieren, wo eine Hintergrundmusik läuft. Aber, wenn man auf die Frage und die Antworten mit der Maus geht, soll die Hintergrundmusik eine Pause machen und nur Frage/Antwort vorgelesen werden! Ich habe das jetzt so probiert:
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
| procedure TForm1.Panel1MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
begin
mediaplayer3.Pause;
mediaplayer4.open;
mediaplayer4.play;
end;
(Wenn Maus auf Panel ist)
procedure TForm1.Panel1MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
mediaplayer4.Stop;
mediaplayer3.play;
end;
(Wenn Maus vom Panel runter) |
Aber das funktioniert nicht richtig, da Mediaplayer4 nicht mit spielen aufhört!
Habe ich falsche procedures genommen? Oder wie realisiere ich meine Wünsche richtig???
MFG
koller1
Moderiert von 
raziel: Delphi-Tags hinzugefügt.
