EAD</b></span> FMaxTraceCount <span style="color:navy"><b>WRITE</b></span> SetMaxTraceCount;
        
         <span style="color:navy"><b>PROPERTY</b></span> OnTrace: TZTraceEvent <span style="color:navy"><b>READ</b></span> FOnTrace <span style="color:navy"><b>WRITE</b></span> FOnTrace;
         <span style="color:navy"><b>PROPERTY</b></span> OnLogTrace: TZTraceLogEvent <span style="color:navy"><b>READ</b></span> FOnLogTrace <span style="color:navy"><b>WRITE</b></span> FOnLogTrace;
    END;
</pre>//-------