Registriert seit: 28. Dez 2010
7 Beiträge
Delphi 2010 Professional
|
AW: Delphi 2010 mp4 starten
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
|
|
Zitat
|