terça-feira, 10 de novembro de 2015

Identificar se o programa esta sendo executado dentro do Delphi

Para saber se o programa esta sendo executado dentro da IDE do Delphi, verifique se o valor da variavel DebugHook esta diferente de zero.


Ex:

Program P1;

uses
  Vcl.Forms;

begin
  Application.Initialize;
  ReportMemoryLeaksOnShutdown := DebugHook <> 0;
  Application.CreateForm(TFrm_Menu, Frm_Menu);
  Application.Run;
end.