Kommu wrote:Why FlashPlayerControl doesn't have Pause method? How do I suspend the movie?
Code: Select all
ResourceStream := TResourceStream.Create(0, 'FLVPlayer', 'FLASH');
try
FlashPlayerControl1.FlashVars := 'FLVPath=' + OpenDialog1.Filename;
FlashPlayerControl1.PutMovieFromStream(ResourceStream);
FlashPlayerControl1.Play;
finally
ResourceStream.Free;
end;
Code: Select all
if FlashPlayerControl1.IsPlaying then
FlashPlayerControl1.Stop;
Kommu wrote:Thank you for your reply.
Stop works on my PC when TFlashPlayerControl is playing swf file. But when it's playing any flv file, Stop (or StopPlay, what's the difference by the way?) does nothing. How do I suspend the movie?
Code: Select all
ResourceStream := TResourceStream.Create(0, 'FLVPlayer', 'FLASH');
try
FlashPlayerControl1.SetVariable('FLVPath', OpenDialog1.Filename);
FlashPlayerControl1.SetVariable('FLVPlay', '0');
finally
ResourceStream.Free;
end;
Kommu wrote:Can you type the full code here?
Return to “Delphi / Builder / VCL Edition”
Users browsing this forum: No registered users and 17 guests