Source position: debugger.pp line 1962
type TDBGEventRec = packed record
case Boolean of
False: (
Category: Word;
EventType: Word;
);
True: (
Ptr: Pointer;
end;