Question

How to determine if variable name is defined in Pascal

Answer 1

program CheckDefined;

{$DEFINE NUMBER} // Define a symbol

begin
  {$IFDEF NUMBER}
    WriteLn('NUMBER is defined.');
  {$ELSE}
    WriteLn('NUMBER is not defined.');
  {$ENDIF}
  
  {$IFDEF USER}
    WriteLn('USER is defined.');
  {$ELSE}
    WriteLn('USER is not defined.');
  {$ENDIF}
end.

   
     
(*
run:

NUMBER is defined.
USER is not defined.
     
*)

 

70+ SQL courses for beginners and professionals