Difference between revisions of "DebugLn"
From Lazarus wiki
Jump to navigationJump to searchm (mark page as stub) |
|||
| Line 1: | Line 1: | ||
'''DebugLn''' is a [[LazLogger]] procedure that can assist debugging. | '''DebugLn''' is a [[LazLogger]] procedure that can assist debugging. | ||
| − | {{ | + | In your main program use code like: |
| + | <syntaxhighlight lang=pascal> | ||
| + | program main; | ||
| + | uses | ||
| + | {$ifdef DEBUG} | ||
| + | LazLogger; | ||
| + | {$end} | ||
| + | |||
| + | ... | ||
| + | |||
| + | end. | ||
| + | </syntaxhighlight> | ||
| + | |||
| + | In units where you need debugln-style debugging: | ||
| + | <syntaxhighlight lang=pascal> | ||
| + | uses | ||
| + | {$ifdef DEBUG} | ||
| + | LazLoggerBase; | ||
| + | {$else} | ||
| + | LazLoggerDummy; | ||
| + | {$end} | ||
| + | |||
| + | procedure dosomething(); | ||
| + | var | ||
| + | s: string; | ||
| + | begin | ||
| + | ... | ||
| + | debugln( s ); | ||
| + | ... | ||
| + | end; | ||
| + | </syntaxhighlight> | ||
| + | |||
| + | Syntax of <tt>debugln</tt> is comparable to <tt>[[writeln]]</tt> syntax. | ||
| + | |||
[[Category:Debugging]] | [[Category:Debugging]] | ||
Revision as of 16:39, 13 October 2020
DebugLn is a LazLogger procedure that can assist debugging.
In your main program use code like:
program main;
uses
{$ifdef DEBUG}
LazLogger;
{$end}
...
end.
In units where you need debugln-style debugging:
uses
{$ifdef DEBUG}
LazLoggerBase;
{$else}
LazLoggerDummy;
{$end}
procedure dosomething();
var
s: string;
begin
...
debugln( s );
...
end;
Syntax of debugln is comparable to writeln syntax.
