{$RESOURCE 'res\movie.res'}  
...  
type  
TMainForm = class(TForm)  
     FlashPlayerControl1: TFlashPlayerControl;  
...  
  end;  
...
procedure TMainForm.FormCreate(Sender: TObject);  
var  
   ResourceStream: TResourceStream;  
begin  
  ResourceStream := TResourceStream.Create(0, 'EmbeddedMovie', 'FLASH');  
   FlashPlayerControl1.PutMovieFromStream(ResourceStream);  
   ResourceStream.Free;  
end;