Merlin’s Delphi Forge

The standard MkDir() function can create only one directory, it can not create subdirectories at one time. This function allows you to create multiple directories (directories inside directories). Delphi 4+ have the ForceDirectories() routine which does the same thing. It is declared in the FileCtrl unit.

uses
SysUtils, FileCtrl;
…
procedure MkDirMulti(sPath: string);
begin
if sPath[Length(sPath)] = [...]

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 [...]