Source code yeşil renkli yazılar

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Forum kuralları
Forum kurallarını okuyup, uyunuz!
Cevapla
kahraman1285
Üye
Mesajlar: 360
Kayıt: 10 Nis 2006 09:07

Source code yeşil renkli yazılar

Mesaj gönderen kahraman1285 »

Programımdaki formlardan birinin source kod kısmının en üstünde daha önce hiç görmediğim ve benim eklemediğim garip terimler var (yeşil renkli) bunlar hakkında bilgisi olan var mı acaba?

Kod: Tümünü seç

{$A8,B-,C+,D+,E-,F-,G+,H+,I+,J-,K-,L+,M-,N+,O+,P+,Q-,R-,S-,T-,U-,V+,W-,X+,Y+,Z1}
{$MINSTACKSIZE $00004000}
{$MAXSTACKSIZE $00100000}
{$IMAGEBASE $00400000}
{$APPTYPE GUI}
{$WARN SYMBOL_DEPRECATED ON}
{$WARN SYMBOL_LIBRARY ON}
{$WARN SYMBOL_PLATFORM ON}
{$WARN UNIT_LIBRARY ON}
{$WARN UNIT_PLATFORM ON}
{$WARN UNIT_DEPRECATED ON}
{$WARN HRESULT_COMPAT ON}
{$WARN HIDING_MEMBER ON}
{$WARN HIDDEN_VIRTUAL ON}
{$WARN GARBAGE ON}
{$WARN BOUNDS_ERROR ON}
{$WARN ZERO_NIL_COMPAT ON}
{$WARN STRING_CONST_TRUNCED ON}
{$WARN FOR_LOOP_VAR_VARPAR ON}
{$WARN TYPED_CONST_VARPAR ON}
{$WARN ASG_TO_TYPED_CONST ON}
{$WARN CASE_LABEL_RANGE ON}
{$WARN FOR_VARIABLE ON}
{$WARN CONSTRUCTING_ABSTRACT ON}
{$WARN COMPARISON_FALSE ON}
{$WARN COMPARISON_TRUE ON}
{$WARN COMPARING_SIGNED_UNSIGNED ON}
{$WARN COMBINING_SIGNED_UNSIGNED ON}
{$WARN UNSUPPORTED_CONSTRUCT ON}
{$WARN FILE_OPEN ON}
{$WARN FILE_OPEN_UNITSRC ON}
{$WARN BAD_GLOBAL_SYMBOL ON}
{$WARN DUPLICATE_CTOR_DTOR ON}
{$WARN INVALID_DIRECTIVE ON}
{$WARN PACKAGE_NO_LINK ON}
{$WARN PACKAGED_THREADVAR ON}
{$WARN IMPLICIT_IMPORT ON}
{$WARN HPPEMIT_IGNORED ON}
{$WARN NO_RETVAL ON}
{$WARN USE_BEFORE_DEF ON}
{$WARN FOR_LOOP_VAR_UNDEF ON}
{$WARN UNIT_NAME_MISMATCH ON}
{$WARN NO_CFG_FILE_FOUND ON}
{$WARN MESSAGE_DIRECTIVE ON}
{$WARN IMPLICIT_VARIANTS ON}
{$WARN UNICODE_TO_LOCALE ON}
{$WARN LOCALE_TO_UNICODE ON}
{$WARN IMAGEBASE_MULTIPLE ON}
{$WARN SUSPICIOUS_TYPECAST ON}
{$WARN PRIVATE_PROPACCESSOR ON}
{$WARN UNSAFE_TYPE OFF}
{$WARN UNSAFE_CODE OFF}
{$WARN UNSAFE_CAST OFF}
{$A8,B-,C+,D+,E-,F-,G+,H+,I+,J-,K-,L+,M-,N+,O+,P+,Q-,R-,S-,T-,U-,V+,W-,X+,Y+,Z1}
{$MINSTACKSIZE $00004000}
{$MAXSTACKSIZE $00100000}
{$IMAGEBASE $00400000}
{$APPTYPE GUI}
{$WARN SYMBOL_DEPRECATED ON}
{$WARN SYMBOL_LIBRARY ON}
{$WARN SYMBOL_PLATFORM ON}
{$WARN UNIT_LIBRARY ON}
{$WARN UNIT_PLATFORM ON}
{$WARN UNIT_DEPRECATED ON}
{$WARN HRESULT_COMPAT ON}
{$WARN HIDING_MEMBER ON}
{$WARN HIDDEN_VIRTUAL ON}
{$WARN GARBAGE ON}
{$WARN BOUNDS_ERROR ON}
{$WARN ZERO_NIL_COMPAT ON}
{$WARN STRING_CONST_TRUNCED ON}
{$WARN FOR_LOOP_VAR_VARPAR ON}
{$WARN TYPED_CONST_VARPAR ON}
{$WARN ASG_TO_TYPED_CONST ON}
{$WARN CASE_LABEL_RANGE ON}
{$WARN FOR_VARIABLE ON}
{$WARN CONSTRUCTING_ABSTRACT ON}
{$WARN COMPARISON_FALSE ON}
{$WARN COMPARISON_TRUE ON}
{$WARN COMPARING_SIGNED_UNSIGNED ON}
{$WARN COMBINING_SIGNED_UNSIGNED ON}
{$WARN UNSUPPORTED_CONSTRUCT ON}
{$WARN FILE_OPEN ON}
{$WARN FILE_OPEN_UNITSRC ON}
{$WARN BAD_GLOBAL_SYMBOL ON}
{$WARN DUPLICATE_CTOR_DTOR ON}
{$WARN INVALID_DIRECTIVE ON}
{$WARN PACKAGE_NO_LINK ON}
{$WARN PACKAGED_THREADVAR ON}
{$WARN IMPLICIT_IMPORT ON}
{$WARN HPPEMIT_IGNORED ON}
{$WARN NO_RETVAL ON}
{$WARN USE_BEFORE_DEF ON}
{$WARN FOR_LOOP_VAR_UNDEF ON}
{$WARN UNIT_NAME_MISMATCH ON}
{$WARN NO_CFG_FILE_FOUND ON}
{$WARN MESSAGE_DIRECTIVE ON}
{$WARN IMPLICIT_VARIANTS ON}
{$WARN UNICODE_TO_LOCALE ON}
{$WARN LOCALE_TO_UNICODE ON}
{$WARN IMAGEBASE_MULTIPLE ON}
{$WARN SUSPICIOUS_TYPECAST ON}
{$WARN PRIVATE_PROPACCESSOR ON}
{$WARN UNSAFE_TYPE OFF}
{$WARN UNSAFE_CODE OFF}
{$WARN UNSAFE_CAST OFF}
unit Fontayar;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, ExtCtrls, RzPanel, cxTextEdit, cxMaskEdit, cxDropDownEdit,
  cxFontNameComboBox, cxGroupBox, cxRadioGroup, cxContainer, cxEdit,
  cxControls, cxCheckGroup,cxcheckbox, ImgList, StdCtrls,cxColorComboBox,
  cxLabel, cxButtons,clipbrd, cxButtonEdit, RzCmboBx, RzRadGrp,
  RzLabel, cxLookupEdit, cxDBLookupEdit, cxImageComboBox,rzcommon, cxSpinEdit, SUIImagePanel, SUIGroupBox, cxPC,
  cxLookAndFeelPainters;

type
  TFontForm = class(TForm)

    RzPanel1: TRzPanel;
    cxGroupBox1: TcxGroupBox;
    ImageList1: TImageList;
    cxLabel1: TcxLabel;
    Ozellik: TcxPageControl;
    cxTabSheet3: TcxTabSheet;
    cxTabSheet4: TcxTabSheet;
    cxGroupBox4: TcxGroupBox;
    KenarRenk: TcxColorComboBox;
    cxTabSheet5: TcxTabSheet;
    Gorunum: TcxRadioGroup;
    cxTabSheet6: TcxTabSheet;
    Efektler: TcxRadioGroup;
    cxGroupBox8: TcxGroupBox;
    Boyut: TcxComboBox;
    cxGroupBox2: TcxGroupBox;
    cxLabel2: TcxLabel;
    cxLabel3: TcxLabel;
    ArkaRenk: TcxColorComboBox;
    FontRenk: TcxColorComboBox;
    Kenarlar: TcxCheckGroup;
    Yazi: TEdit;
    Tamam: TcxButton;
    Saydam: TcxCheckBox;
    Varsayilan: TcxButton;
    FontTipi: TRzRadioGroup;
    GrpFontDevice: TRzRadioGroup;
    GrpShowStyle: TRzRadioGroup;
    SecilenFont: TRzFontComboBox;
    Kose: TImageList;
    cxGroupBox3: TcxGroupBox;
    ic: TcxComboBox;
    RzLabel2: TRzLabel;
    RzLabel3: TRzLabel;
    Dis: TcxComboBox;
    Hizalama: TcxRadioGroup;
    LightText: TcxCheckBox;
    cxGroupBox5: TcxGroupBox;
    RzLabel4: TRzLabel;
    KoseGenislik: TcxComboBox;
    YatayHizalama: TcxRadioGroup;
    cxGroupBox9: TcxGroupBox;
    Aci: TcxComboBox;
    cxGroupBox6: TcxGroupBox;
    cxLabel4: TcxLabel;
    cxLabel5: TcxLabel;
    GolgeRengi: TcxColorComboBox;
    DerinGolge: TcxComboBox;
    FlashYap: TcxCheckBox;
    suiGroupBox1: TsuiGroupBox;
    OffSure: TcxSpinEdit;
    RzLabel5: TRzLabel;
    RzLabel7: TRzLabel;
    OnSure: TcxSpinEdit;
    suiGroupBox2: TsuiGroupBox;
    FlashColor: TcxColorComboBox;
    cxTabSheet1: TcxTabSheet;
    StilEfekt: TcxCheckGroup;
    YaziStil: TcxRadioGroup;
    procedure FormShow(Sender: TObject);
    procedure TipPropertiesChange(Sender: TObject);
    procedure ArkaRenkPropertiesChange(Sender: TObject);
    procedure FontRenkPropertiesChange(Sender: TObject);
    procedure KenarRenkPropertiesChange(Sender: TObject);
    procedure SecilenFontPropertiesFontPreviewButtonClick(Sender: TObject;
      ButtonType: TcxFontButtonType);
    procedure KenarlarPropertiesChange(Sender: TObject);
    procedure TamamClick(Sender: TObject);
    procedure YaziChange(Sender: TObject);
    procedure BoyutPropertiesCloseUp(Sender: TObject);
    procedure FormClose(Sender: TObject; var Action: TCloseAction);
    procedure AciPropertiesCloseUp(Sender: TObject);
    procedure GolgeRenkPropertiesChange(Sender: TObject);
    procedure cxCheckBox1PropertiesChange(Sender: TObject);
    procedure VarsayilanClick(Sender: TObject);
    procedure GorunumClick(Sender: TObject);
    procedure FontTipiChanging(Sender: TObject; NewIndex: Integer;
      var AllowChange: Boolean);
    procedure GrpFontDeviceChanging(Sender: TObject; NewIndex: Integer;
      var AllowChange: Boolean);
    procedure GrpShowStyleChanging(Sender: TObject; NewIndex: Integer;
      var AllowChange: Boolean);
    procedure icPropertiesCloseUp(Sender: TObject);
    procedure DisPropertiesCloseUp(Sender: TObject);
    procedure HizalamaPropertiesChange(Sender: TObject);
    procedure LightTextPropertiesChange(Sender: TObject);
    procedure KoseGenislikPropertiesCloseUp(Sender: TObject);
    procedure YatayHizalamaPropertiesChange(Sender: TObject);
    procedure DerinGolgePropertiesCloseUp(Sender: TObject);
    procedure GolgeRengiPropertiesChange(Sender: TObject);
    procedure SecilenFontChange(Sender: TObject);
    procedure EfektlerPropertiesChange(Sender: TObject);
    procedure FlashYapClick(Sender: TObject);
    procedure OffSurePropertiesChange(Sender: TObject);
    procedure OnSurePropertiesChange(Sender: TObject);
    procedure YaziStilPropertiesChange(Sender: TObject);
    procedure StilEfektPropertiesChange(Sender: TObject);

    private

    Etiket:TRzLabel;
    MetinComponentNo:integer;
    { Private declarations }
  public
    { Public declarations }
  end;

var
  FontForm: TFontForm;

implementation

uses Ana;
Başa dön
ikut

Re: Source code yeşil renkli yazılar

Mesaj gönderen ikut »

bunlar derleme seçenekleri.... ama hepsini bir arada hiç görmedim...
Başa dön
kahraman1285
Üye
Mesajlar: 360
Kayıt: 10 Nis 2006 09:07

Mesaj gönderen kahraman1285 »

bu yazıları silip tekrar programı çalıştırdım.Çalıştı ama ileride bi sıkıntıyla karşılaşır mıyım? Endişeliyim!
Başa dön
Kullanıcı avatarı
sabanakman
Kıdemli Üye
Mesajlar: 3081
Kayıt: 17 Nis 2006 08:11
Konum: Ah bi Antalya olaydı keşke (Ankara)

Mesaj gönderen sabanakman »

Hiç endişelenmene gerek yok, bunlara benzer şeyler başıma dos altındaki pascalda da başıma gelirdi şimdi de gelir. Hiç görmezden gelirim veya silerim başım ağrımadı. Ayrıca çoğu {$WARN bilmem ne uyarısını ver-verme gibi projeni etkilemeyen seçenekler. Etkisi varsa ilk 4 satırın vardır o da pek mühim değil. Bu daha çok Project veya Environment Options gibi bölümlere girip derleyici ayarlarını kurcalarsan başına geliyor galiba :D . Kolay gele.
Şaban Şahin AKMAN
_________________
Derin olan kuyu değil kısa olan iptir. - .
Başa dön
kahraman1285
Üye
Mesajlar: 360
Kayıt: 10 Nis 2006 09:07

Mesaj gönderen kahraman1285 »

Evet o ayarlarda bazı değişiklikler yapmıştım.galiba o yüzden oldu.

Böylelikle bunuda öğrenmiş oldum.

Cevabınız için teşekkürler...
Başa dön
t-hex
Kıdemli Üye
Mesajlar: 531
Kayıt: 18 Mar 2005 02:45
Konum: İstanbul/Antalya
İletişim:
İletişim t-hex

Mesaj gönderen t-hex »

Bu ayarlar Ctrl+O+O tuşlarına bastığınızda çıkar. Proje ayarlarını koda gömmek ya da üniteleri projeden farklı seçeneklerle derlemek için kullanırsınız.
Başa dön
Kullanıcı avatarı
rsimsek
Admin
Mesajlar: 4482
Kayıt: 10 Haz 2003 01:48
Konum: İstanbul

Mesaj gönderen rsimsek »

Projenin baş tarafına eklenen bu kodlara compile directive leri deniyor. Belli kabullerle derleme ve derlenen exe ye çalışma anında belli şekilde davranmaya zorlama işine yarar.
Bilgiyi paylaşarak artıralım! Hayatı kolaylaştıralım!!
Başa dön
Cevapla

“Programlama” sayfasına dön