Quick tricks to know the screen resolution being used by Delphi

Use this command to determine W Screen.Width Screen.Height screen and screen to determine H
Example of implementation:
TForm1.FormCreate procedure (Sender: TObject);
begin
   Label2.Caption: = IntToStr (Screen.Width) + 'x' + IntToStr (Screen.Height);
end;