⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 uformmain.dfm

📁 支持版本:Delphi 5-2009, C++Builder 5-2009 ATViewer特性: Text, Binary, Hex, Unicode:所有文件
💻 DFM
字号:
object FormMain: TFormMain
  Left = 204
  Top = 126
  ActiveControl = btnLoad
  AutoScroll = False
  Caption = 'ATImageBox Demo'
  ClientHeight = 383
  ClientWidth = 532
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnCreate = FormCreate
  OnResize = FormResize
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 532
    Height = 165
    Align = alTop
    BevelOuter = bvNone
    TabOrder = 0
    object GroupBox1: TGroupBox
      Left = 8
      Top = 32
      Width = 241
      Height = 125
      Caption = ' Options '
      TabOrder = 1
      object Bevel1: TBevel
        Left = 8
        Top = 68
        Width = 225
        Height = 9
        Shape = bsTopLine
      end
      object chkFit: TCheckBox
        Left = 8
        Top = 16
        Width = 225
        Height = 17
        Caption = 'Fit image to window'
        TabOrder = 0
        OnClick = chkFitClick
      end
      object chkCenter: TCheckBox
        Left = 8
        Top = 48
        Width = 225
        Height = 17
        Caption = 'Center image in window'
        Checked = True
        State = cbChecked
        TabOrder = 2
        OnClick = chkCenterClick
      end
      object chkFitOnlyBig: TCheckBox
        Left = 8
        Top = 32
        Width = 225
        Height = 17
        Caption = 'Fit only images larger than window'
        Checked = True
        State = cbChecked
        TabOrder = 1
        OnClick = chkFitOnlyBigClick
      end
      object chkBorder: TCheckBox
        Left = 8
        Top = 72
        Width = 225
        Height = 17
        Caption = 'Show border'
        Checked = True
        State = cbChecked
        TabOrder = 3
        OnClick = chkBorderClick
      end
      object chkLabel: TCheckBox
        Left = 8
        Top = 88
        Width = 225
        Height = 17
        Caption = 'Show info label'
        Checked = True
        State = cbChecked
        TabOrder = 4
        OnClick = chkLabelClick
      end
      object chkDrag: TCheckBox
        Left = 8
        Top = 104
        Width = 225
        Height = 17
        Caption = 'Enable image dragging'
        Checked = True
        State = cbChecked
        TabOrder = 5
        OnClick = chkDragClick
      end
    end
    object GroupBox2: TGroupBox
      Left = 256
      Top = 32
      Width = 268
      Height = 125
      Caption = ' Image scaling '
      TabOrder = 2
      object Label1: TLabel
        Left = 8
        Top = 16
        Width = 29
        Height = 13
        Caption = 'Scale:'
      end
      object LabelScale: TLabel
        Left = 8
        Top = 28
        Width = 29
        Height = 13
        Caption = '100%'
      end
      object labResampleDelay: TLabel
        Left = 26
        Top = 86
        Width = 51
        Height = 13
        Caption = 'Delay, ms:'
      end
      object TrackBar1: TTrackBar
        Left = 48
        Top = 16
        Width = 217
        Height = 25
        Max = 500
        Min = 1
        PageSize = 10
        Frequency = 50
        Position = 100
        TabOrder = 0
        ThumbLength = 16
        OnChange = TrackBar1Change
      end
      object chkKeepPos: TCheckBox
        Left = 8
        Top = 48
        Width = 250
        Height = 17
        Caption = 'Keep image position during scaling'
        TabOrder = 1
        OnClick = chkKeepPosClick
      end
      object chkResample: TCheckBox
        Left = 8
        Top = 68
        Width = 129
        Height = 17
        Caption = 'Resample on scaling'
        Checked = True
        State = cbChecked
        TabOrder = 2
        OnClick = chkCenterClick
      end
      object edResampleDelay: TEdit
        Left = 88
        Top = 84
        Width = 33
        Height = 19
        AutoSize = False
        TabOrder = 3
        Text = '300'
        OnChange = chkCenterClick
      end
    end
    object btnLoad: TButton
      Left = 8
      Top = 6
      Width = 241
      Height = 23
      Caption = 'Load image...'
      TabOrder = 0
      OnClick = btnLoadClick
    end
  end
  object Box: TATImageBox
    Left = 0
    Top = 165
    Width = 532
    Height = 218
    HorzScrollBar.Tracking = True
    VertScrollBar.Tracking = True
    Align = alClient
    Color = clGray
    ParentColor = False
    TabOrder = 1
    TabStop = True
  end
  object OpenPictureDialog1: TOpenPictureDialog
    Left = 256
  end
end

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -