Delphi - Reproducir Archivos de vídeo

Hola a todos
Alguien sabe como reproducir archivos de vídeo con Delphi 7?
gracias

// tu error se da porque pones "activate:=true" antes que se ejecute la linea "filename". en modo de codigo, obvio.

procedure TForm1.Button1Click(Sender: TObject);
begin
//antes que nada hay que ubicar el archivo
animate1.FileName:= 'c:\archivo.avi';
animate1.Active:=true;

// animate1.Open:=true; opcional para manejar en memoria las posiciones de las cajas startframe..Stopframe
end;

Hola
Gracias por contestar...pero he avanzado un poco (solo un poco) y me sigue dando el mismo error.
He conseguido reproducir un fichero muy pequeño (unas letras que giran sobre si mismas) y eso si que funciona, pero en cuanto que intento seleccionar otro fichero me da el mismo error. He leído que este componente no soporta ficheros con sonido. ¿sabeis si hay algún otro componente para reproducir vídeo o si este tiene algún otro requisito más?
Gracias otra vez

http://community.borland.com/article/0,1410,16918,00.html

Un paquete de componentes que he probado y es muy bueno es el VideoLab.
http://www.delphi32.com/vcl/5551/