Windows Media Player mit ShellExecute

[Crazy-MF]

Morgen alle zusammen,

ich habe ein Problem. Ich bin am proggen und möchte gerne den Windows Media Player 9 über die ShellExecute öffnen aber dabei festlegen, dass er im Vollbild starten {Alt+ENTER}.

Mein Code sieht im Moment so aus:

Code:

begin
  if OpenDialog1.Execute then
  begin
    ShellExecute(Handle, nil, PChar(OpenDialog1.FileName), nil, nil, SW_SHOW);
  end;

end;

Danke

Crazy-MF