About TScreen

				
!**************************************
! Name: About TScreen
! Description:The TScreen represents the screen. If you are writing code in Delphi, there is a variable Screen which is an instance of TScreen already initiated. 
Using TScreen you can find out what forms and data modules have been instantiated by the application, the active form and the active control within that form, the size of the screen and the cursors and fonts available to use. 
! By: Emiel Hollander
!
!This code is copyrighted and has! limited warranties.Please see http://www.Planet-Source-Code.com/vb/scripts/ShowCode.asp?txtCodeId=55&lngWId=7!for details.!**************************************

<p>Using the property Screen.Forms you can find out what forms have been
created. The property returns an item of type TForm, and you can get all its
properties using it. If you want to know the caption of a form you can e.g. try
Screen.Forms[0].Caption;
<p>You can get the active form using Screen.ActiveForm. If there is no form
active, Screen.ActiveForm will return the form that will be active once the
application gets focus. To know what control has the focus, use
Screen.ActiveControl. This returns an item of type TWinControl.
<p>Using Screen.Height and Screen.Width you can learn the size of the screen.
For a multi-monitor system you can use Screen.DesktopHeight and
Screen.DesktopWidth to get the height of the entire desktop relative to the
upper-left corner of the primary monitor Screen.Monitors[0]. To determine the
number of monitors connected to the system use Screen.MonitorCount;
<p>To know all the fonts installed on the system, read out Screen.Fonts. It
returns a stringlist of type TStrings.
<p>To see when the active control or the active form changes, you can set events
to Screen.OnActiveControlChange or Screen.OnActiveFormChange.</p>