PC World 2003 February/PCWorld_2003-02_cd.bin/Software/Topware/devpascal/devpas.exe/0/RCDATA/TCOMPFORM/TCOMPFORM.txt

Text File | 2002-07-15 | 15.3 KB | 549 lines

object CompForm: TCompForm
  Left = 278
  Top = 146
  BorderIcons = [biSystemMenu]
  BorderStyle = bsDialog
  Caption = 'Compiler options'
  ClientHeight = 427
  ClientWidth = 523
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -14
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = True
  Position = poScreenCenter
  OnActivate = FormActivate
  OnCreate = FormCreate
  PixelsPerInch = 120
  TextHeight = 16
  object BitBtn1: TBitBtn
    Left = 10
    Top = 389
    Width = 92
    Height = 31
    Caption = '&OK'
    ModalResult = 1
    TabOrder = 0
    OnClick = BitBtn1Click
    Glyph.Data = {
      DE010000424DDE01000000000000760000002800000024000000120000000100
      0400000000006801000000000000000000001000000010000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333333333333333333330000333333333333333333333333F33333333333
      00003333344333333333333333388F3333333333000033334224333333333333
      338338F3333333330000333422224333333333333833338F3333333300003342
      222224333333333383333338F3333333000034222A22224333333338F338F333
      8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
      33333338F83338F338F33333000033A33333A222433333338333338F338F3333
      0000333333333A222433333333333338F338F33300003333333333A222433333
      333333338F338F33000033333333333A222433333333333338F338F300003333
      33333333A222433333333333338F338F00003333333333333A22433333333333
      3338F38F000033333333333333A223333333333333338F830000333333333333
      333A333333333333333338330000333333333333333333333333333333333333
      0000}
    NumGlyphs = 2
  end
  object BitBtn2: TBitBtn
    Left = 108
    Top = 389
    Width = 93
    Height = 31
    Cancel = True
    Caption = '&Cancel'
    ModalResult = 2
    TabOrder = 1
    OnClick = BitBtn2Click
    Glyph.Data = {
      DE010000424DDE01000000000000760000002800000024000000120000000100
      0400000000006801000000000000000000001000000010000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      333333333333333333333333000033338833333333333333333F333333333333
      0000333911833333983333333388F333333F3333000033391118333911833333
      38F38F333F88F33300003339111183911118333338F338F3F8338F3300003333
      911118111118333338F3338F833338F3000033333911111111833333338F3338
      3333F8330000333333911111183333333338F333333F83330000333333311111
      8333333333338F3333383333000033333339111183333333333338F333833333
      00003333339111118333333333333833338F3333000033333911181118333333
      33338333338F333300003333911183911183333333383338F338F33300003333
      9118333911183333338F33838F338F33000033333913333391113333338FF833
      38F338F300003333333333333919333333388333338FFF830000333333333333
      3333333333333333333888330000333333333333333333333333333333333333
      0000}
    NumGlyphs = 2
  end
  object BitBtn3: TBitBtn
    Left = 418
    Top = 389
    Width = 95
    Height = 31
    Caption = '&Default'
    TabOrder = 2
    OnClick = BitBtn3Click
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      0400000000000001000000000000000000001000000010000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333333333333333333333333333333333333333333333333333333333333
      3333333333333FF3333333333333003333333333333F77F33333333333009033
      333333333F7737F333333333009990333333333F773337FFFFFF330099999000
      00003F773333377777770099999999999990773FF33333FFFFF7330099999000
      000033773FF33777777733330099903333333333773FF7F33333333333009033
      33333333337737F3333333333333003333333333333377333333333333333333
      3333333333333333333333333333333333333333333333333333333333333333
      3333333333333333333333333333333333333333333333333333}
    NumGlyphs = 2
  end
  object PageControl: TPageControl
    Left = 10
    Top = 10
    Width = 503
    Height = 365
    ActivePage = PasTab
    TabOrder = 3
    object DirTab: TTabSheet
      Caption = 'Directories'
      object Panel6: TPanel
        Left = 0
        Top = 0
        Width = 495
        Height = 334
        Align = alClient
        BevelInner = bvRaised
        BevelOuter = bvLowered
        TabOrder = 0
        object Label1: TLabel
          Left = 10
          Top = 191
          Width = 77
          Height = 16
          Caption = 'Bin directory:'
        end
        object Label2: TLabel
          Left = 10
          Top = 228
          Width = 102
          Height = 16
          Caption = 'Pascal units files:'
        end
        object Label4: TLabel
          Left = 10
          Top = 265
          Width = 110
          Height = 16
          Caption = 'Libraries directory:'
        end
        object Label7: TLabel
          Left = 10
          Top = 138
          Width = 396
          Height = 48
          Caption =
            'You can change the directory paths of your Free Pascal compiler ' +
            'system  You can add multiple directories by separating them with' +
            ' a semi-colon (;) .'
          WordWrap = True
        end
        object AddDir: TCheckBox
          Left = 10
          Top = 10
          Width = 367
          Height = 21
          Caption = 'Add the directory below to be searched for include files:'
          TabOrder = 0
        end
        object AddDirEdit: TEdit
          Left = 30
          Top = 36
          Width = 316
          Height = 24
          TabOrder = 1
        end
        object ComCheck: TCheckBox
          Left = 10
          Top = 71
          Width = 346
          Height = 21
          Caption = 'Add the following commands when calling compiler:'
          TabOrder = 2
        end
        object Commands: TEdit
          Left = 30
          Top = 95
          Width = 316
          Height = 24
          TabOrder = 3
        end
        object eBinDir: TEdit
          Left = 128
          Top = 187
          Width = 346
          Height = 24
          TabOrder = 4
        end
        object ePasdir: TEdit
          Left = 128
          Top = 222
          Width = 346
          Height = 24
          TabOrder = 5
        end
        object eLibDir: TEdit
          Left = 128
          Top = 261
          Width = 346
          Height = 24
          TabOrder = 6
        end
      end
    end
    object PasTab: TTabSheet
      Caption = 'Pascal compiler'
      object Panel1: TPanel
        Left = 0
        Top = 0
        Width = 495
        Height = 334
        Align = alClient
        BevelInner = bvRaised
        BevelOuter = bvLowered
        TabOrder = 0
        object GroupBox1: TGroupBox
          Left = 10
          Top = 10
          Width = 474
          Height = 139
          Caption = 'Syntax options :'
          TabOrder = 0
          object DelphiExt: TCheckBox
            Left = 10
            Top = 30
            Width = 218
            Height = 20
            Caption = 'Switch some &Delphi extension on'
            TabOrder = 0
          end
          object COp: TCheckBox
            Left = 10
            Top = 108
            Width = 228
            Height = 21
            Caption = '&Support operators like C (*=, +=, ...)'
            TabOrder = 1
          end
          object LabelGoto: TCheckBox
            Left = 246
            Top = 30
            Width = 169
            Height = 20
            Caption = '&Allow Label and Goto'
            TabOrder = 2
          end
          object Assert: TCheckBox
            Left = 10
            Top = 49
            Width = 178
            Height = 21
            Caption = '&Include Assertion code'
            TabOrder = 3
          end
          object DelphiComp: TCheckBox
            Left = 246
            Top = 49
            Width = 185
            Height = 21
            Caption = '&Try to be Delphi compatible'
            TabOrder = 4
          end
          object Ansi: TCheckBox
            Left = 10
            Top = 69
            Width = 223
            Height = 21
            Caption = '&Use ansistrings'
            TabOrder = 5
          end
          object CInline: TCheckBox
            Left = 246
            Top = 69
            Width = 188
            Height = 21
            Caption = 'Support C&++ styled INLINE'
            TabOrder = 6
          end
          object TP7: TCheckBox
            Left = 10
            Top = 89
            Width = 228
            Height = 21
            Caption = 'Try to be TP/BP &7 compatible'
            TabOrder = 7
          end
          object Macros: TCheckBox
            Left = 246
            Top = 89
            Width = 218
            Height = 21
            Caption = 'Support ¯os  like C (global)'
            TabOrder = 8
          end
          object NoCheckUnit: TCheckBox
            Left = 246
            Top = 108
            Width = 208
            Height = 21
            Caption = 'Don'#39't chec&k the unit name'
            TabOrder = 9
          end
        end
        object GroupBox5: TGroupBox
          Left = 10
          Top = 158
          Width = 474
          Height = 91
          Caption = 'Executable :'
          TabOrder = 1
          object LinkDyn: TCheckBox
            Left = 10
            Top = 27
            Width = 188
            Height = 21
            Caption = 'Try to &link dynamically'
            TabOrder = 0
          end
          object LinkSmart: TCheckBox
            Left = 246
            Top = 24
            Width = 208
            Height = 33
            Caption = 'Try to link &smart'
            TabOrder = 1
          end
          object StripSymbols: TCheckBox
            Left = 10
            Top = 49
            Width = 228
            Height = 21
            Caption = 'Strip all symbols from e&xecutable'
            TabOrder = 2
          end
        end
        object ThisCompilerRadioGroup: TRadioGroup
          Left = 10
          Top = 256
          Width = 471
          Height = 65
          Caption = 'Current compiler : '
          Columns = 2
          ItemIndex = 0
          Items.Strings = (
            'Freepascal'
            'GNU Pascal')
          TabOrder = 2
          OnClick = ThisCompilerRadioGroupClick
        end
      end
    end
    object CodeGenTab: TTabSheet
      Caption = 'Code generation / Optimization'
      object Panel3: TPanel
        Left = 0
        Top = 0
        Width = 495
        Height = 334
        Align = alClient
        BevelInner = bvRaised
        BevelOuter = bvLowered
        TabOrder = 0
        object GroupBox4: TGroupBox
          Left = 10
          Top = 10
          Width = 474
          Height = 119
          Caption = 'Code generation: '
          TabOrder = 0
          object IOCheck: TCheckBox
            Left = 10
            Top = 22
            Width = 188
            Height = 20
            Caption = '&IO checking'
            TabOrder = 0
          end
          object StackCheck: TCheckBox
            Left = 10
            Top = 43
            Width = 198
            Height = 21
            Caption = '&Stack checking'
            TabOrder = 1
          end
          object Overflow: TCheckBox
            Left = 10
            Top = 60
            Width = 257
            Height = 30
            Caption = '&Check overflow of integer operations'
            TabOrder = 2
          end
          object GUIApp: TCheckBox
            Left = 10
            Top = 88
            Width = 297
            Height = 17
            Caption = 'Create &GUI application'
            TabOrder = 3
          end
        end
        object CPURadioGroup: TRadioGroup
          Left = 10
          Top = 240
          Width = 473
          Height = 81
          Caption = ' Target CPU: '
          Columns = 2
          ItemIndex = 0
          Items.Strings = (
            'i386'
            'i486'
            'Pentium and above'
            'Pentium II and above')
          TabOrder = 1
        end
        object GroupBox2: TGroupBox
          Left = 10
          Top = 136
          Width = 473
          Height = 97
          Caption = ' Optimization: '
          TabOrder = 2
          object SmallCode: TRadioButton
            Left = 10
            Top = 24
            Width = 209
            Height = 17
            Caption = 'SmallCode'
            TabOrder = 0
          end
          object QuickOpt: TRadioButton
            Left = 10
            Top = 48
            Width = 113
            Height = 17
            Caption = 'QuickOpt'
            Checked = True
            TabOrder = 1
            TabStop = True
          end
          object Best: TRadioButton
            Left = 10
            Top = 72
            Width = 113
            Height = 17
            Caption = 'Best'
            TabOrder = 2
          end
        end
      end
    end
    object LinkerTab: TTabSheet
      Caption = 'Linker'
      object Panel4: TPanel
        Left = 0
        Top = 0
        Width = 495
        Height = 334
        Align = alClient
        BevelInner = bvRaised
        BevelOuter = bvLowered
        TabOrder = 0
        object Label5: TLabel
          Left = 10
          Top = 108
          Width = 36
          Height = 16
          Caption = 'Hint !'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlue
          Font.Height = -15
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object DebugInfo: TCheckBox
          Left = 10
          Top = 30
          Width = 237
          Height = 20
          Caption = '&Generate debugging information'
          TabOrder = 0
        end
        object Panel2: TPanel
          Left = 10
          Top = 128
          Width = 296
          Height = 70
          BevelOuter = bvLowered
          Color = 14811135
          TabOrder = 1
          object Label6: TLabel
            Left = 15
            Top = 2
            Width = 272
            Height = 66
            AutoSize = False
            Caption =
              'If you want the compiler to generate debug information in your e' +
              'xecutable (to be able to DEBUG it), check "Generate debugging  i' +
              'nformation".'
            WordWrap = True
          end
        end
        object NoReloc: TCheckBox
          Left = 10
          Top = 59
          Width = 395
          Height = 21
          Caption = '&Do not generate relocation code (necessary when debugging)'
          TabOrder = 2
        end
      end
    end
  end
  object HelpBtn: TBitBtn
    Left = 209
    Top = 389
    Width = 93
    Height = 31
    TabOrder = 4
    OnClick = HelpBtnClick
    Kind = bkHelp
  end
  object MarsCaption1: TMarsCaption
    ActiveBeginColor = clBlack
    ActiveEndColor = clBlue
    ActiveFontColor = clWhite
    InactiveBeginColor = clBlack
    InactiveEndColor = clSilver
    InactiveFontColor = clSilver
    ApplicationNameFont.Charset = DEFAULT_CHARSET
    ApplicationNameFont.Color = clWindowText
    ApplicationNameFont.Height = -11
    ApplicationNameFont.Name = 'MS Sans Serif'
    ApplicationNameFont.Style = [fsBold]
    CaptionFont.Charset = DEFAULT_CHARSET
    CaptionFont.Color = clWindowText
    CaptionFont.Height = -11
    CaptionFont.Name = 'MS Sans Serif'
    CaptionFont.Style = []
    NumColors = 64
    AutoSize = False
    Left = 376
    Top = 376
  end
end