Différences

Ci-dessous, les différences entre deux révisions de la page.

--- prog:lazarus:debug:lazlogger [07/04/2020 11:53]
thierry [Interception d'un DebugLn]
+++ prog:lazarus:debug:lazlogger [07/04/2020 12:35] (Version actuelle)
thierry [DebugLn / DebugLnEnter / DebugLnExit]
@@ Ligne 3: / Ligne 3: @@
 ===== Les procedures =====
 ==== DebugLn / DebugLnEnter / DebugLnExit ====
+<code delphi>
+DebugLn(String);
+DebugLn(String, Args);
+</code>
 ==== DbgOut ====
 ===== Interception d'un DebugLn =====
 Il peut être utile d'intercepter la procédure ''DebugLn'' pour l'afficher au sein de l'application
-  - On déclare une procedure de type ''TLazLoggerWriteEvent = procedure(Sender: TObject; S: string; var Handled: Boolean) of object;''
+  - Ligne 10 : On déclare une procedure de type ''TLazLoggerWriteEvent = procedure(Sender: TObject; S: string; var Handled: Boolean) of object;'' (''ReceptDebugLn'' dans l'exemple ci-dessous)
-  - On defini la property ''DebugLogger.OnDebugLn:=@MaProcedure;''
+  - Ligne 20 : On defini la property ''DebugLogger.OnDebugLn'' vers la procédure créé ci-dessus
-  - On a accés au log contenu dans la variable ''S''
+  - Ligne 25 : On a accés au log contenu dans la variable ''S''
-<code delphi>
+<code delphi [enable_line_numbers="true"]>
 uses
    ..., lazlogger,  ...