Section One BBS

Welcome, Guest.


Subject: I have a question about FreePascal.. Date: Sun Mar 19 2017 12:31 pm
From: Toto@toto.net To: All

From: Ramine <toto@toto.net>
Subject: I have a question about FreePascal..
 
Hello,
 
I want to port this function from Delphi to FreePascal,
the {$IfOpt O+} doen't seem to work in FreePascal:
 
 
function CompilerOptimizationS: String;
  begin
   Result:= 'Compiler optimization is ' +
   {$IfOpt O+}
   'enabled'
   {$Else}
   'disabled'
   {$EndIf}
  end;
 
 
Thank you,
Amine Moulay Ramdane.

--- ViaMAIL!/WC v2.00
 * Origin: Neptune's Lair II ■ Olive Branch MS ■ winserver.org:232  (1:261/20)

Previous Message       Next Message