Einzelnen Beitrag anzeigen

Davee

Registriert seit: 28. Dez 2010
7 Beiträge
 
Delphi 2010 Professional
 
#9

AW: Delphi 2010 mp4 starten

  Alt 29. Dez 2010, 12:59
Delphi-Quellcode:
function kplay (titel: string):String;
var
  hwndWinamp : THandle;
  status :integer;
  hilfs : PChar ;

begin
//ShellExecute(0, nil, 'C:\Program Files (x86)\VideoLAN\VLC\vlc.exe', '--started-from-file --fullscreen --playlist-enqueue "C:\Users\Christian\Desktop\00_00.mp4"', nil, sw_Normal) ;
 hwndWinamp:= FindWindow('Winamp v1.x',nil);
 status := SendMessage(hwndWinamp,WM_USER,WM_USER,104);
 SendMessage(hwndWinamp,WM_COMMAND, WINAMP_PAUSE, 0);
// Count:=1;
hilfs := '--started-from-file --fullscreen --playlist-enqueue "'+titel+'"';
 ShellExecute(0, nil, 'C:\Program Files (x86)\VideoLAN\VLC\vlc.exe', +hilfs+ , nil, sw_Normal);

 //SendMessage(hwndWinamp,WM_COMMAND, WINAMP_PAUSE, 0);
end;
ist das so gemeint ?
das funktioniert auch nicht
ich bin einfach nur zu doof ....
Dave
  Mit Zitat antworten Zitat