Delphi - Media Palyer

Como Puedo Abrir un Archivo de Video con el Open Dialog...
Y Estoy Utilizando... Media Player, Y que El Video Aparesca en un Panel...

O Tambien Abrirlo desde un TShiellView...
Por fas..

Todo esto viene en la ayuda del TMediaPlayer (¡¡Hay que leer y buscar un poco por uno mismo!!). En fin:

procedure TForm1.Button1Click(Sender: TObject);
begin
if OpenDialog1.Execute then begin
with MediaPlayer1 do begin
Filename := OpenDialog1.FileName;
DeviceType := dtAutoSelect;
Display := OLEContainer1;
Open;
Play;
end;
end;
end;

Yo he puesto un OLEContainer. Si quieres que aparezca en un panel, sólo cambia la propiedad Display.