![]() |
Re: ShellExecute problem mit winamp
Hallo,
nun hab ich ein komisches ergebnis:
Delphi-Quellcode:
dann fügt er mir in winamp folgende einträge hinzu:
track_path:='Z:\Lieder\linkin-park.mp3';
ShellExecute(Application.Handle,'open', PChar(winamp_path),PChar('/add '+track_path), Nil, SW_Show); Zitat:
MfG - Ghost007 |
Re: ShellExecute problem mit winamp
Delphi-Quellcode:
Ähm - so wie es hier steht gibt es nur einen Parameter, und der heißt "/ADD x:\track.mp3" - Ich würde sagen, dass es zwei Parameter sein müssen: "/ADD" und "x:\track.mp3". Also müsste der Aufruf so ausehen:
ShellExecute(Application.Handle,'open', PChar(winamp_path),PChar('"/ADD '+track_path+'"'), Nil, SW_Show);
Delphi-Quellcode:
Ungetestet und nur eine Vermutung.
ShellExecute(Application.Handle,'open', PChar(winamp_path),PChar('"/ADD" "'+track_path+'"'), Nil, SW_Show);
By the way: Ich mache das für Winamp über eine Message die ich an das Fenster schicke. Der Aufruf geht wesentlich schneller und ist irgendwie professioneller finde ich. Aber auch nur meine Meinung :) |
Re: ShellExecute problem mit winamp
Hi,
ich hab nu mal deinen aufruf getestet Ergebnis: Zitat:
MfG - Ghost007 P.S.: Hiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiilfe |
Re: ShellExecute problem mit winamp
Delphi-Quellcode:
Am einfachsten Schritt für Schritt und dann klappt das auch mit dem Winamp... :zwinker:
procedure TForm1.btnAddToWmpListClick(Sender: TObject);
var WinampPathAndExec, WinampExecParam, SongFilePathAndName: String; begin WinampPathAndExec := 'C:\Programme\Winamp\winamp.exe'; SongFilePathAndName := 'C:\Nuppsi\Eigene Musik\The 411 - Dumb.mp3'; WinampExecParam := '/ADD "' + SongFilePathAndName + '"'; if ShellExecute(Application.Handle, 'open', PChar(WinampPathAndExec), PChar(WinampExecParam), Nil, SW_SHOWNORMAL) <= 32 then RaiseLastWin32Error; end; |
Re: ShellExecute problem mit winamp
Hallo,
sehr schön, nun funktionierts ... wobei ich dachte das ich das gleiche gmacht han. Aber egal danke =) MfG - Ghost007 |
Alle Zeitangaben in WEZ +1. Es ist jetzt 01:42 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz