my $player = Win32::GuiTest::FindWindowLike...
my $SetParent = Win32::API::->new("user32","SetParent","NN","N")
$SetParent->( $player, $frame->GetHandle )