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.
Nenhum comentário:
Postar um comentário