Fórum Media Player??? #137814
17/02/2003
0
Quais os parametros que devo passar, pelo Delphi, para executar o Media Player, através do WinExec?
Tentei este:
WinExec(PCHAR(´C:\Arquivos de programas\Windows Media Player\WMPLAYER.EXE ´+nome),SW_SHOWNORMAL);
Ele carrega o programa, porém, não abre a música designada pela variável NOME.
Desde já agradeço a ajuda
Até +
Jairo Norenberg
Tentei este:
WinExec(PCHAR(´C:\Arquivos de programas\Windows Media Player\WMPLAYER.EXE ´+nome),SW_SHOWNORMAL);
Ele carrega o programa, porém, não abre a música designada pela variável NOME.
Desde já agradeço a ajuda
Até +
Jairo Norenberg
Anonymous
Curtir tópico
+ 0
Responder
Posts
17/02/2003
Navoid
qdo existe espaço em branco no path uses aspas duplas assim
****
WinExec(PCHAR(´´C:\Arquivos de programas\Windows Media Player\WMPLAYER.EXE´ ´´+nome+´´´),SW_SHOWNORMAL);
****
até
****
WinExec(PCHAR(´´C:\Arquivos de programas\Windows Media Player\WMPLAYER.EXE´ ´´+nome+´´´),SW_SHOWNORMAL);
****
até
Responder
Gostei + 0
17/02/2003
Anonymous
Navoid
Sua dica funcionou.
Grato
Até +
Sua dica funcionou.
Grato
Até +
Responder
Gostei + 0
23/10/2003
Joefferson
[quote:4f13d833f0=´Jairo Norenberg´]Navoid
Sua dica funcionou.
Grato
Até +[/quote:4f13d833f0]
vc tb poderia ter utilizado o seguinte:
procedure TForm1.Button1Click(Sender: TObject);
var
FileName: String;
begin
ShellExecute(Self.Handle,´Open´,PChar(FileName),nil,nil,SW_SHOWNORMAL)
end;
Nao esquecer de declarar em uses ShellApi.
Valew!!!
Sua dica funcionou.
Grato
Até +[/quote:4f13d833f0]
vc tb poderia ter utilizado o seguinte:
procedure TForm1.Button1Click(Sender: TObject);
var
FileName: String;
begin
ShellExecute(Self.Handle,´Open´,PChar(FileName),nil,nil,SW_SHOWNORMAL)
end;
Nao esquecer de declarar em uses ShellApi.
Valew!!!
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)