topic-13307

Board index FiveWin for Harbour/xHarbour MediaPlayer and vista Problem

Posts: 67

Joined: Thu Jan 05, 2006 10:35 PM

MediaPlayer and vista Problem
Posted: Mon Oct 27, 2008 11:22 PM

When I execute this cosde on xp it works fine.

But on vista home I do not get the 1/2 size screen setting and the media player is displayed with controls in the top left corner of the window audio plays but just a black box for video.

Anyone have a fix for this problem?
Thanks in advance Mike.

Code: Select all Collapse

	   DEFINE WINDOW  owndvid  FROM 0,0  TO     400,550  pixel  style nOr(WS_POPUP ) 	   
activevid = TActiveX():New( owndvid, "MediaPlayer.MediaPlayer.1" ) 
	   activevid:TransparentAtStart:=.t.
	   activevid:FileName ="fivewin.avi"
	   activevid:ShowControls :=.f. 
	   activevid:PlayCount :=0
	   activevid:SendMouseClickEvents :=.f.
	   activevid:ClickToPlay:=.f.
	   activevid:DisplaySize:=7
	   activevid:VideoBorder3D:=.t.
	   owndvid:oClient := activevid
	   ACTIVATE WINDOW    owndvid  on init (SetWindowPos( owndvid:HWND, -1, 0, 0, 0, 0, 3 ) )

Antonio Linares

Posts: 44158