procedure TsnbxUnimCustomApp001MainForm.Run_PLAY(Sender: TObject);
begin
var oForm:= TMainmForm(Form);
oForm.Image1.Visible:= False;
var oFrame:= oForm.UnimHTMLFrame1;
oFrame.HTML.Text:=
'<!DOCTYPE html> '+
' <html>'+
' <body>'+
// ' <video id="video01" width= "100%" height="100%" controls muted loop autoplay>'+
' <video id="video01" width= "100%" height="100%" muted loop autoplay>'+
' <source src="files/video01.mp4" type="video/mp4">'+
' </video>'+
' </body>'+
' </html>
While Video Playing..if user Click on HTLMFrame (Video),
How to Stop Playing? or How to Stop Playing with Code?