Christian Studer 2005-04-08 03:38
The best way to do this is to move and size the form during the load event so that the form covers the secondary monitor.
You could use UltraMon to get the position and size of the secondary monitor.
Here is a sample implementation of a form load event handler:
Private Sub Form_Load()
Dim sys As New UltraMonSystem
Dim mon As ULTRAMONLib.IUltraMonMonitor
Set mon = sys.Monitors("2")
Form1.Left = mon.Left * Screen.TwipsPerPixelX
Form1.Top = mon.Top * Screen.TwipsPerPixelY
Form1.Width = mon.Width * Screen.TwipsPerPixelX
Form1.Height = mon.Height * Screen.TwipsPerPixelY
End Sub
You'll need to add a reference to the UltraMon 2.0 type library to your project for the sample code to work.
Christian Studer - www.realtimesoft.com
|