settingswindow.lfm

Переключить прокрутку окна
Загрузить этот исходный код

object SettingsForm: TSettingsForm
  Left = 0
  Height = 360
  Top = 0
  Width = 480
  BorderIcons = [biSystemMenu]
  BorderStyle = bsDialog
  Caption = 'Настройки'
  ClientHeight = 360
  ClientWidth = 480
  Font.CharSet = RUSSIAN_CHARSET
  Font.Height = -11
  Font.Name = 'Microsoft Sans Serif'
  Font.Pitch = fpVariable
  Font.Quality = fqDraft
  OnShow = FormShow
  LCLVersion = '1.2.2.0'
  object settingsTabs: TPageControl
    Left = 8
    Height = 312
    Top = 8
    Width = 464
    ActivePage = emulatorTab
    TabIndex = 0
    TabOrder = 0
    object emulatorTab: TTabSheet
      Caption = 'Эмулятор'
      ClientHeight = 286
      ClientWidth = 456
      object behavior: TGroupBox
        Left = 8
        Height = 60
        Top = 8
        Width = 440
        Caption = 'Поведение'
        ClientHeight = 42
        ClientWidth = 436
        TabOrder = 0
        object fullscreenOnLaunch: TCheckBox
          Left = 8
          Height = 17
          Top = 0
          Width = 420
          AutoSize = False
          Caption = 'Автоматически разворачивать на весь &экран окно программы при её запуске'
          TabOrder = 0
        end
        object closeOnTerminate: TCheckBox
          Left = 8
          Height = 17
          Top = 20
          Width = 420
          AutoSize = False
          Caption = 'Автоматически &закрывать окно программы при завершении её работы'
          TabOrder = 1
        end
      end
      object graphicScalingAlgorithm: TGroupBox
        Left = 8
        Height = 152
        Top = 72
        Width = 440
        Caption = 'Алгоритм масштабирования изображений'
        ClientHeight = 134
        ClientWidth = 436
        TabOrder = 1
        object graphicScalingWhyAlgorithm: TLabel
          Left = 8
          Height = 26
          Top = 4
          Width = 420
          AutoSize = False
          Caption = 'Какой алгоритм увеличения растра будет применяться при увеличении изображения в 2, 3 и 4 раза?'
          ParentColor = False
          WordWrap = True
        end
        object graphicScalingSystem: TRadioButton
          Left = 8
          Height = 17
          Top = 32
          Width = 420
          AutoSize = False
          Caption = 'Определяется &системой'
          OnEnter = radioButtonEnter
          TabOrder = 0
        end
        object graphicScalingNearest: TRadioButton
          Left = 8
          Height = 17
          Top = 52
          Width = 420
          AutoSize = False
          Caption = '&Ближайший сосед (как есть, 32-битный цвет)'
          OnEnter = radioButtonEnter
          TabOrder = 1
        end
        object graphicScalingScaleNx: TRadioButton
          Left = 8
          Height = 17
          Top = 72
          Width = 420
          AutoSize = False
          Caption = '&Простое масштабирование (scaleNx, 16-битный цвет)'
          OnEnter = radioButtonEnter
          TabOrder = 2
        end
        object graphicScalingHqNx: TRadioButton
          Left = 8
          Height = 17
          Top = 92
          Width = 420
          AutoSize = False
          Caption = '&Высококачественное масштабирование (hqNx, 32-битный цвет)'
          OnEnter = radioButtonEnter
          TabOrder = 3
        end
        object graphicScalingStandard: TRadioButton
          Left = 8
          Height = 17
          Top = 112
          Width = 420
          AutoSize = False
          Caption = 'Билинейная &интерполяция (стандартный алгоритм, 32-битный цвет)'
          OnEnter = radioButtonEnter
          TabOrder = 4
        end
      end
      object maximumFrames: TGroupBox
        Left = 8
        Height = 50
        Top = 228
        Width = 440
        Caption = 'Максимум кадров в секунду'
        ClientHeight = 32
        ClientWidth = 436
        TabOrder = 2
        object maximumFramesValue: TTrackBar
          Left = 8
          Height = 28
          Top = 0
          Width = 400
          Max = 100
          Min = 1
          OnChange = maximumFramesValueChange
          PageSize = 5
          Position = 1
          ShowSelRange = False
          TabOrder = 0
        end
        object maximumFramesLabel: TLabel
          Left = 408
          Height = 13
          Top = 4
          Width = 20
          Alignment = taRightJustify
          AutoSize = False
          Caption = '00'
          ParentColor = False
        end
      end
    end
    object themeTab: TTabSheet
      Caption = 'Тема'
      ClientHeight = 286
      ClientWidth = 456
      object themeSelectorLabel: TLabel
        Left = 8
        Height = 13
        Top = 8
        Width = 221
        Caption = 'Выберите &тему оформления интерфейса * :'
        FocusControl = themeSelector
        ParentColor = False
      end
      object themeSelector: TComboBox
        Left = 8
        Height = 21
        Top = 24
        Width = 440
        ItemHeight = 13
        OnChange = themeSelectorChange
        Style = csDropDownList
        TabOrder = 0
      end
      object themePreviewLabel: TLabel
        Left = 8
        Height = 13
        Top = 56
        Width = 148
        Caption = 'Предварительный просмотр:'
        ParentColor = False
      end
      object themePreview: TPaintBox
        Left = 8
        Height = 180
        Top = 72
        Width = 440
        OnPaint = themePreviewPaint
      end
      object themeComment: TLabel
        Left = 8
        Height = 13
        Top = 264
        Width = 386
        Caption = '* Чтобы добавить или изменить темы, необходим доступ к исходному коду.'
        ParentColor = False
      end
    end
    object disasmTab: TTabSheet
      Caption = 'Дизассемблер'
      ClientHeight = 286
      ClientWidth = 456
      object disasmSelectorLabel: TLabel
        Left = 8
        Height = 13
        Top = 8
        Width = 209
        Caption = 'Выберите &элемент окна дизассемблера:'
        FocusControl = disasmSelector
        ParentColor = False
      end
      object disasmSelector: TComboBox
        Left = 8
        Height = 21
        Top = 24
        Width = 348
        ItemHeight = 13
        ItemIndex = 0
        Items.Strings = (
          'Отсутствие данных (<пусто>)'
          'Значения атомарного типа'
          'Значения объектного типа'
          'Данные для обработки исключений (except)'
          'Значения для регистра EBP (oldebp)'
          'Адреса возврата из функций/методов (return)'
          'Адреса возврата из прерываний (ireturn)'
          'Атомарные типы'
          'Объектные типы'
          'Ключевое слово "except"'
          'Ключевое слово "oldebp"'
          'Ключевое слово "return"'
          'Ключевое слово "ireturn"'
          'Ключевое слово "overflow"'
          'Заголовки функций/методов'
          'Строки исходного кода'
          'Заголовки унаследованных данных'
        )
        OnChange = disasmSelectorChange
        Style = csDropDownList
        TabOrder = 0
        Text = 'Отсутствие данных (<пусто>)'
      end
      object disasmColorLabel: TLabel
        Left = 364
        Height = 13
        Top = 8
        Width = 80
        Caption = 'Цвет элемента:'
        ParentColor = False
      end
      object disasmColor: TColorButton
        Left = 364
        Height = 21
        Top = 24
        Width = 84
        BorderWidth = 2
        ButtonColorSize = 16
        ButtonColor = clBlack
        OnColorChanged = disasmColorChange
      end
      object disasmPreviewLabel: TLabel
        Left = 8
        Height = 13
        Top = 56
        Width = 148
        Caption = 'Предварительный просмотр:'
        ParentColor = False
      end
      object disasmPreview: TPaintBox
        Left = 8
        Height = 206
        Top = 72
        Width = 440
        Font.CharSet = RUSSIAN_CHARSET
        Font.Height = -11
        Font.Name = 'Courier New'
        Font.Pitch = fpFixed
        Font.Quality = fqDraft
        ParentFont = False
        OnPaint = disasmPreviewPaint
      end
    end
    object recompilerTab: TTabSheet
      Caption = 'Статический рекомпилятор'
      ClientHeight = 286
      ClientWidth = 456
      object recompilerSelectorLabel: TLabel
        Left = 8
        Height = 13
        Top = 8
        Width = 189
        Caption = 'Выберите &платформу для настройки:'
        FocusControl = recompilerSelector
        ParentColor = False
      end
      object recompilerSelector: TComboBox
        Left = 8
        Height = 21
        Top = 24
        Width = 440
        ItemHeight = 13
        OnChange = recompilerSelectorChange
        Style = csDropDownList
        TabOrder = 0
      end
      object recompilerBevel: TBevel
        Left = 8
        Height = 2
        Top = 52
        Width = 440
        Shape = bsTopLine
      end
      object recompilerAlignment: TCheckBox
        Left = 8
        Height = 17
        Top = 60
        Width = 440
        AutoSize = False
        Caption = '&Выравнивать поля объектов по границе в 4 байта (рекомендуется)'
        OnChange = recompilerAlignmentChange
        TabOrder = 1
      end
      object recompilerCompression: TGroupBox
        Left = 8
        Height = 80
        Top = 84
        Width = 216
        Caption = 'Сжатие исполняемого файла'
        ClientHeight = 62
        ClientWidth = 212
        TabOrder = 2
        object recompilerCompressionSelector: TTrackBar
          Left = 4
          Height = 32
          Top = 0
          Width = 204
          Max = 9
          OnChange = recompilerCompressionSelectorChange
          Position = 0
          ShowSelRange = False
          TabOrder = 0
        end
        object recompilerCompressionLabel1: TLabel
          Left = 4
          Height = 26
          Top = 32
          Width = 37
          Caption = 'Без'#13#10'сжатия'
          ParentColor = False
        end
        object recompilerCompressionLabel2: TLabel
          Left = 169
          Height = 26
          Top = 32
          Width = 38
          Alignment = taRightJustify
          Caption = 'Лучшее'#13#10'сжатие'
          ParentColor = False
        end
      end
      object recompilerStack: TGroupBox
        Left = 232
        Height = 80
        Top = 84
        Width = 216
        Caption = 'Стак главного потока'
        ClientHeight = 62
        ClientWidth = 212
        TabOrder = 3
        object recompilerStackSelector: TTrackBar
          Left = 4
          Height = 32
          Top = 0
          Width = 204
          Max = 16
          Min = 1
          OnChange = recompilerStackSelectorChange
          Position = 1
          ShowSelRange = False
          TabOrder = 0
        end
        object recompilerStackLabel1: TLabel
          Left = 28
          Height = 13
          Top = 40
          Width = 115
          Caption = 'Выбран размер стака:'
          ParentColor = False
        end
        object recompilerStackLabel2: TLabel
          Left = 142
          Height = 13
          Top = 40
          Width = 24
          Alignment = taRightJustify
          AutoSize = False
          Caption = '1'
          ParentColor = False
        end
        object recompilerStackLabel3: TLabel
          Left = 170
          Height = 13
          Top = 40
          Width = 16
          Caption = 'МБ'
          ParentColor = False
        end
      end
      object recompilerHeap: TGroupBox
        Left = 8
        Height = 80
        Top = 168
        Width = 440
        Caption = 'Динамическая память (куча)'
        ClientHeight = 62
        ClientWidth = 436
        TabOrder = 4
        object recompilerHeapSelector: TTrackBar
          Left = 4
          Height = 32
          Top = 0
          Width = 428
          Frequency = 4
          Max = 256
          Min = 4
          OnChange = recompilerHeapSelectorChange
          PageSize = 4
          Position = 4
          ShowSelRange = False
          TabOrder = 0
        end
        object recompilerHeapLabel1: TLabel
          Left = 140
          Height = 13
          Top = 40
          Width = 108
          Caption = 'Выбран размер кучи:'
          ParentColor = False
        end
        object recompilerHeapLabel2: TLabel
          Left = 254
          Height = 13
          Top = 40
          Width = 24
          Alignment = taRightJustify
          AutoSize = False
          Caption = '4'
          ParentColor = False
        end
        object recompilerHeapLabel3: TLabel
          Left = 282
          Height = 13
          Top = 40
          Width = 16
          Caption = 'МБ'
          ParentColor = False
        end
      end
      object recompilerExecFileNameLabel: TLabel
        Left = 8
        Height = 13
        Top = 260
        Width = 136
        Caption = '&Имя исполняемого файла:'
        FocusControl = recompilerExecFileName
        ParentColor = False
      end
      object recompilerExecFileName: TEdit
        Left = 148
        Height = 21
        Top = 256
        Width = 276
        MaxLength = 100
        OnChange = recompilerExecFileNameChange
        TabOrder = 5
      end
      object recompilerExecFileExt: TLabel
        Left = 428
        Height = 13
        Top = 260
        Width = 19
        Caption = '.mal'
        ParentColor = False
      end
    end
  end
  object closeButton: TButton
    Left = 397
    Height = 25
    Top = 327
    Width = 75
    Cancel = True
    Caption = 'Закрыть'
    ModalResult = 11
    TabOrder = 1
  end
end