Erkennen Sie, dass Wetter eine Anwendung Dubugged oder nicht wird.

Erkennen Sie, dass Wetter eine Anwendung Dubugged oder nicht wird.

Erkennen Sie, dass Wetter eine Anwendung Dubugged oder nicht wird. : Mehreren tausend Tipps, um Ihr Leben einfacher machen.

Die folgende Funktion erkennt, wenn die Anwendung oder nicht gedebuggt wird. Diese Funktion funktioniert nicht unter Windows 95.
Verhalten einer Anwendung könnte geändert werden, wenn innerhalb eines Debuggers ausgeführt, z. B. Komponente Autoren sollten ihre unregistrierten Komponenten im Debugger nur ausgeführt werden.
Antwort:

Funktion DebuggerPresent: boolean;
Typ
TDebugProc = Funktion: boolean; Stdcall;
var
Kernel32: HMODULE;
DebugProc: TDebugProc;
beginnen
Ergebnis: = False;
Kernel32: = GetModuleHandle('kernel32.dll');
Wenn Kernel32 <> 0 dann
beginnen
@DebugProc: = GetProcAddress (Kernel32, 'IsDebuggerPresent');
Wenn Assigned(DebugProc) dann
Ergebnis: = DebugProc;
Ende;
Ende;
ein einfaches zu verwenden, wenn der Test verwendet werden kann
Wenn DebuggerPresent dann
ShowMessage('debugging')
sonst
ShowMessage ('nicht Debuggen');