Merlin's Delphi Forge

Borland Delphi 3 Splash Screen

Borland Delphi 4 Field Test 3 “Allegro” Splash Screen

Borland Delphi 4 RC 2 Splash Screen

Borland Delphi 4 Splash Screen

Borland Delphi 5 Splash Screen (thanks to Michael Byrne & Joachim Schonart)

Borland Delphi 6 Splash Screen

Borland Delphi 7.0 Personal Splash Screen

Borland Delphi 2005 Splash Screen

Embarcadero Code Gear Delphi C++ Builder 2009 IDE Splash Screen

There are two ways to determine the screen’s height and width.

1) Use the global Screen variable.

uses
  Forms;
...
  Screen.Height { Screen height in pixels }
  Screen.Width  { Screen width in pixels  }
...

2) Use the Windows API GetSystemMetrics() function. This function can be useful in applications that don’t use the VCL like console applications.

uses
  Windows;
...
  GetSystemMetric(SM_CXSCREEN) { Screen height in pixels }
  GetSystemMetric(SM_CYSCREEN) { Screen width in pixels  }
...