Ich habe versuchsweise den Winamp Player in ein eigenes Form gepackt. Ich denke der Zweck spielt erstmal keine Rolle. Ich starte den Player und schiebe dann mit SetParent Winamp in ein eigenes Formular:
Delphi-Quellcode:
procedure TF_Musik.Button1Click(Sender: TObject);
var
WndHandle: hWnd;
WndText: array[0..255] of char;
begin
WndHandle := StartProgram('e:\Winamp\Winamp.exe');
if IsWindow(WndHandle)
then
begin
GetWindowText(WndHandle, WndText, 255);
F_Musik.Caption := StrPas(WndText);
end;
Windows.SetParent(WndHandle, F_Musik.Handle);
ShowWindow(WndHandle, SW_MAXIMIZE);
end;
Die Funktion "StartProgram" ist aus
diesem Thread übernommen.
Folgendes Problem tritt nun auf. Wenn ich jetzt über den Explorer eine mp3-Datei starte, wird sie nicht mehr im Winamp abgespielt, sondern es läuft die aktuelle Datei weiter. Nachdem ich das Form schließe, öffnet sich ein Winamp Fenster und spielt den gewünschten Song ab.
Wie kann ich die Message vom Explorer an den Winamp in meinem eigenen Formular weiterleiten?
Bitte helft mir ...
[Push-Beitrag]
Hat denn keiner ne Idee, wie ich das Öffnen der Datei im Explorer abfangen kann und an den Player in meinem Formular weiterleiten kann?
Ich hoffe irgendwer kann mir nen bissl Hilfestellung leisten, denn ich hab im Moment ehrlich gesagt nich den geringsten Ansatz..
.: Greetz xDestiny :.
[edit=Christian Seehase]Pushen frühestens nach 24 Stunden, nicht nach 3 Mfg, Christian Seehase[/edit]