Buonanotte,
sto avendo problemi con SetWindowPos sul secondo schermo. Non riesco a centare nello schermo media player classic.
La risoluzione del primo schermo è 1920x1080
La risoluzione del secondo schermo è 1400x1050
Mi fa sempre una banda nera a dx del secondo schermo !!
Perchè mi succede ?
Il codice che uso è questo:
codice:
Try
ShowApp = FindAssociatedApplication(Player_path_local & "\" & msgReceived.Msg)
myProcess.StartInfo.UseShellExecute = False
myProcess.StartInfo.CreateNoWindow = False
myProcess.StartInfo.FileName = "c:\users\public\mpc\mpc.exe"
myProcess.StartInfo.WindowStyle = ProcessWindowStyle.Maximized
myProcess.StartInfo.Arguments = Chr(34) & Player_path_local + "\" & msgReceived.Msg & Chr(34) & " /play /fullscreen /close"
myProcess.Start()
ShowAppPid = myProcess.Id
Threading.Thread.Sleep(1000)
Dim wndHWND = (GetForegroundWindow())
Do
Application.DoEvents()
Loop Until wndHWND <> 0
hWnd1 = wndHWND.ToString
If Screen.AllScreens.Length > 1 Then
SetWindowPos(hWnd1, HWND_TOPMOST, myScreens(0).WorkingArea.Width + 1, 0, 0, 0, SW_SHOW)
End If
Grazie, Alberto