<< Odesílání mailů přes SMPT za pomocí Synapse | Android a FreePascal >>

Direktiva Message

vložil Radek Červinka 20. prosince 2010 00:22

Někdy je vhodné do zdrojáku vložit informaci, která se zobrazí při kompilaci. Delphi pro tuto funkcionalitu má direktivu $Message, která má dokonce i parametry.

Syntaxe: {$MESSAGE HINT|WARN|ERROR|FATAL 'řetězec' }

    1program Project1;
    2
    3{$APPTYPE CONSOLE}
    4
    5uses
    6  SysUtils;
    7
    8begin
    9  {$Message 'Informace'}
   10  {$Message Hint 'Informační poznámka'}
   11  {$Message Warn 'Textové varování'}
   12  {$Message Error 'Chybová hláška - ale kompilace pokračuje'}
   13  {$Message Fatal 'Totální problém - zastav překlad'}
   14{$IFNDEF KONF}
   15  {$Message Error 'Není korektně nastavena konfigurace'}
   16{$ENDIF}
   17
   18end.

Výstupem je při kompilaci následující text.

Checking project dependencies…
Compiling Project1.dproj (Debug, Win32)
dcc command line for "Project1.dpr"
[DCC Hint] Project1.dpr(9): H1054 Informace
[DCC Hint] Project1.dpr(11): H1054 Informační poznámka
[DCC Warning] Project1.dpr(13): W1054 Textové varování
[DCC Error] Project1.dpr(15): E1054 Chybová hláška - ale kompilace pokračuje
[DCC Fatal Error] Project1.dpr(17): F1054 Totální problém - zastav překlad
Failed
Elapsed time: 00:00:00.2

Řádek s Error je vyhodnocen jako chyba, ale kompilace pokračuje. Řádek s Fatal ukončuje kompilaci okamžitě.

b31015dc-099a-49ad-9bd0-d394eb1f7c9f|4|5.0

Tagy: kompilátor