Examples Delphi

  1. Home
  2. Delphi
  3. Examples
  4. Detect if delphi is running
If you plan to deploy a component or application for demo purposes, you may want to have it run only if the Delphi IDE is loaded.
The following piece of code checks this:

if (FindWindow('TApplication', nil) = 0) or
(FindWindow('TAlignPalette', nil) = 0) or
(FindWindow('TPropertyInspector', nil) = 0) or
(FindWindow('TAppBuilder', nil) = 0) then
begin
ShowMessage('Delphi is not running!');
end