GLScene/Externals/Graphics32/Examples/Layers/ImgView_Layers/RGBALoaderUnit.lfm

object RGBALoaderForm: TRGBALoaderForm
  Left = 200
  Height = 367
  Top = 138
  Width = 412
  BorderStyle = bsDialog
  Caption = 'New Bitmap Layer with Alpha Channel'
  ClientHeight = 367
  ClientWidth = 412
  Color = clBtnFace
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Position = poScreenCenter
  LCLVersion = '1.0.1.3'
  object Bevel1: TBevel
    Left = 0
    Height = 2
    Top = 0
    Width = 412
    Align = alTop
    Shape = bsTopLine
  end
  object LblRGBImage: TLabel
    Left = 24
    Height = 14
    Top = 83
    Width = 58
    Caption = 'RGB Image:'
    ParentColor = False
  end
  object LblAlphaImage: TLabel
    Left = 216
    Height = 14
    Top = 83
    Width = 65
    Caption = 'Alpha Image:'
    ParentColor = False
  end
  object LblNote: TLabel
    Left = 24
    Height = 14
    Top = 294
    Width = 324
    Caption = 'If the images have different sizes, the alpha image will be rescaled.'
    ParentColor = False
  end
  object BtnZoomInImage: TSpeedButton
    Left = 148
    Height = 21
    Top = 80
    Width = 21
    Caption = '+'
    Flat = True
    Font.Color = clWindowText
    Font.Height = -21
    Font.Name = 'MS Sans Serif'
    Layout = blGlyphBottom
    NumGlyphs = 0
    OnClick = BtnZoomInImageClick
    ParentFont = False
  end
  object BtnZoomOutImage: TSpeedButton
    Left = 170
    Height = 21
    Top = 80
    Width = 21
    Caption = '-'
    Flat = True
    Font.Color = clWindowText
    Font.Height = -27
    Font.Name = 'MS Sans Serif'
    Layout = blGlyphBottom
    NumGlyphs = 0
    OnClick = BtnZoomOutImageClick
    ParentFont = False
  end
  object BtnZoomInAlpha: TSpeedButton
    Left = 340
    Height = 21
    Top = 80
    Width = 21
    Caption = '+'
    Flat = True
    Font.Color = clWindowText
    Font.Height = -21
    Font.Name = 'MS Sans Serif'
    Layout = blGlyphBottom
    NumGlyphs = 0
    OnClick = BtnZoomInAlphaClick
    ParentFont = False
  end
  object BtnZoomOutAlpha: TSpeedButton
    Left = 362
    Height = 21
    Top = 80
    Width = 21
    Caption = '-'
    Flat = True
    Font.Color = clWindowText
    Font.Height = -27
    Font.Name = 'MS Sans Serif'
    Layout = blGlyphBottom
    NumGlyphs = 0
    OnClick = BtnZoomOutAlphaClick
    ParentFont = False
  end
  object PnlInfo: TPanel
    Left = 0
    Height = 55
    Top = 2
    Width = 412
    Align = alTop
    BevelOuter = bvNone
    ClientHeight = 55
    ClientWidth = 412
    Color = clWindow
    ParentColor = False
    TabOrder = 0
    object LblInfo: TLabel
      Left = 16
      Height = 40
      Top = 6
      Width = 383
      Caption = 'Load two images, one of them will be used to fill RGB components '#13#10'of the layer, another will be converted to a grayscale image and '#13#10'used as alpha channel'
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Verdana'
      ParentColor = False
      ParentFont = False
    end
  end
  object ImgRGB: TImgView32
    Left = 24
    Height = 169
    Top = 112
    Width = 169
    Bitmap.ResamplerClassName = 'TNearestResampler'
    BitmapAlign = baCustom
    Color = clAppWorkspace
    ParentColor = False
    Scale = 1
    ScaleMode = smScale
    ScrollBars.Color = clBtnShadow
    ScrollBars.ShowHandleGrip = True
    ScrollBars.Style = rbsDefault
    ScrollBars.Size = 16
    OverSize = 0
    TabOrder = 1
  end
  object BtnLoadImage: TButton
    Left = 96
    Height = 21
    Top = 80
    Width = 49
    Caption = 'Load...'
    OnClick = BtnLoadImageClick
    TabOrder = 2
  end
  object ImgAlpha: TImgView32
    Left = 216
    Height = 169
    Top = 112
    Width = 169
    Bitmap.ResamplerClassName = 'TNearestResampler'
    BitmapAlign = baCustom
    Color = clAppWorkspace
    ParentColor = False
    Scale = 1
    ScaleMode = smScale
    ScrollBars.Color = clBtnShadow
    ScrollBars.ShowHandleGrip = True
    ScrollBars.Style = rbsDefault
    ScrollBars.Size = 16
    OverSize = 0
    TabOrder = 3
  end
  object BtnLoadAlpha: TButton
    Left = 288
    Height = 21
    Top = 80
    Width = 49
    Caption = 'Load...'
    OnClick = BtnLoadAlphaClick
    TabOrder = 4
  end
  object BtnOK: TButton
    Left = 232
    Height = 21
    Top = 328
    Width = 75
    Caption = 'OK'
    Default = True
    ModalResult = 1
    TabOrder = 5
  end
  object BtnCancel: TButton
    Left = 312
    Height = 21
    Top = 328
    Width = 75
    Cancel = True
    Caption = 'Cancel'
    ModalResult = 2
    TabOrder = 6
  end
  object BtnResetScales: TButton
    Left = 24
    Height = 21
    Top = 328
    Width = 75
    Caption = 'Reset Scales'
    OnClick = BtnResetScalesClick
    TabOrder = 7
  end
  object OpenPictureDialog: TOpenPictureDialog
    left = 192
    top = 56
  end
end