Main.fmx

object Form1: TForm1
  Left = 0
  Top = 0
  Caption = 'Gamma Function'
  ClientHeight = 532
  ClientWidth = 722
  Position = ScreenCenter
  FormFactor.Width = 320
  FormFactor.Height = 480
  FormFactor.Devices = [Desktop]
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  DesignerMasterStyle = 0
  inline Viewer1: TViewerFrame
    Align = Client
    Margins.Left = 10.000000000000000000
    Margins.Top = 10.000000000000000000
    Margins.Right = 10.000000000000000000
    Margins.Bottom = 10.000000000000000000
    Size.Width = 512.000000000000000000
    Size.Height = 512.000000000000000000
    Size.PlatformDefault = False
  end
  object Panel1: TPanel
    Align = Right
    Margins.Left = -10.000000000000000000
    Position.X = 522.000000000000000000
    Size.Width = 200.000000000000000000
    Size.Height = 532.000000000000000000
    Size.PlatformDefault = False
    StyleLookup = 'pushpanel'
    TabOrder = 1
    object LabelA: TLabel
      Position.X = 5.000000000000000000
      Position.Y = 15.000000000000000000
      Size.Width = 66.000000000000000000
      Size.Height = 20.000000000000000000
      Size.PlatformDefault = False
      TextSettings.HorzAlign = Trailing
      Text = 'Algorithm :'
      TabOrder = 0
    end
    object ComboBoxA: TComboBox
      Items.Strings = (
        'Lanczos 7'
        'Lanczos 9'
        'Lanczos 11'
        'Lanczos 15'
        'Ooura')
      ItemIndex = 0
      Position.X = 75.000000000000000000
      Position.Y = 15.000000000000000000
      Size.Width = 110.000000000000000000
      Size.Height = 26.000000000000000000
      Size.PlatformDefault = False
      TabOrder = 1
      OnChange = ComboBoxAChange
    end
  end
end