Hi, everyone can you support add media auto play while show? Fucntion addMedia: Func _PPT_SlideAddMediaObject(ByRef $obj, $filepath, $left = 0, $top = 0, $width = 100, $height = 100)
If IsObj($obj) <> 1 Then
SetError(1)
Return 0
ElseIf FileExists($filepath) <> 1 Then
SetError(2)
Return 2 ;file does not exist
ElseIf $left = "" Or $top = "" Or $width = "" Or $height = "" Then
SetError(3)
Return 3
ElseIf IsInt($left+$top+$width+$height) <> 1 Then
SetError(4)
Return 4 ;All parameters have to be integer
Else
$obj.Shapes.AddMediaObject($filepath,$left, $top, $width, $height)
Endif
EndFuncThanks all.