Delphi de global scope da önceden tanımlı derleyici koşulları eklemenin 2 yolu var örnek TRIAL adında bir koşul tanımlayacağız
1) Rad Studyo – Project-Options-Delphi Compiler-Conditional Defines
2)include file yöntemi ile
1. yöntem için
Kodumuz
procedure TForm1.btnTestClick(Sender: TObject);
begin
{$IFDEF TRIAL}
ShowMessage('TRIAL.');
{$ELSE}
ShowMessage('NOT TRIAL.');
{$ENDIF}
end;
2. Yöntemde predefines.inc isimli bir include dosyadan yararlanacağız
predefines.inc
{$DEFINE TRIAL}
daha sonra kullanmak istediğimiz form yada unitlere
unit Unit4;
interface
{$I predefines.inc}
implementation
end.
{$I predefines.inc} //predefines.inc dosyasındaki kodu unitimize ekliyor ve compile ediliyor. bu 2. yöntemde kullanmak istediğimiz her unit veya form’a {$I predefines.inc} satırımızı ekliyoruz.
