lazarus-ccr/components/fpspreadsheet/examples/visual/shared/snumformatform.lfm

object NumFormatForm: TNumFormatForm
  Left = 336
  Height = 394
  Top = 173
  Width = 559
  BorderStyle = bsDialog
  Caption = 'Number format'
  ClientHeight = 394
  ClientWidth = 559
  ShowHint = True
  LCLVersion = '1.7'
  object ButtonPanel1: TButtonPanel
    Left = 6
    Height = 34
    Top = 354
    Width = 547
    OKButton.Name = 'OKButton'
    OKButton.Hint = 'Accept changes and close'
    OKButton.DefaultCaption = True
    HelpButton.Name = 'HelpButton'
    HelpButton.DefaultCaption = True
    CloseButton.Name = 'CloseButton'
    CloseButton.DefaultCaption = True
    CancelButton.Name = 'CancelButton'
    CancelButton.Hint = 'Discard changes and close'
    CancelButton.DefaultCaption = True
    TabOrder = 2
    ShowButtons = [pbOK, pbCancel]
  end
  object Panel1: TPanel
    Left = 0
    Height = 297
    Top = 0
    Width = 122
    Align = alLeft
    BevelOuter = bvNone
    ClientHeight = 297
    ClientWidth = 122
    TabOrder = 0
    object Label1: TLabel
      Left = 6
      Height = 15
      Top = 6
      Width = 112
      Align = alTop
      BorderSpacing.Left = 2
      BorderSpacing.Top = 2
      BorderSpacing.Bottom = 2
      BorderSpacing.Around = 4
      Caption = 'Category'
      Font.Style = [fsBold]
      ParentColor = False
      ParentFont = False
    end
    object LbCategory: TListBox
      Left = 6
      Height = 270
      Top = 27
      Width = 116
      Align = alClient
      BorderSpacing.Left = 6
      Items.Strings = (
        'Number'
        'Percent'
        'Scientific'
        'Fraction'
        'Currency'
        'Date'
        'Time'
        'Text'
      )
      ItemHeight = 15
      OnClick = LbCategoryClick
      TabOrder = 0
    end
  end
  object Panel2: TPanel
    Left = 122
    Height = 297
    Top = 0
    Width = 230
    Align = alLeft
    BevelOuter = bvNone
    ClientHeight = 297
    ClientWidth = 230
    TabOrder = 1
    object Label2: TLabel
      Left = 6
      Height = 15
      Top = 6
      Width = 220
      Align = alTop
      BorderSpacing.Left = 2
      BorderSpacing.Top = 2
      BorderSpacing.Bottom = 2
      BorderSpacing.Around = 4
      Caption = 'Format'
      Font.Style = [fsBold]
      ParentColor = False
      ParentFont = False
    end
    object LbFormat: TListBox
      Left = 6
      Height = 225
      Top = 27
      Width = 224
      Align = alClient
      BorderSpacing.Left = 6
      ItemHeight = 0
      OnClick = LbFormatClick
      OnDrawItem = LbFormatDrawItem
      Style = lbOwnerDrawFixed
      TabOrder = 0
    end
    object CurrSymbolPanel: TPanel
      Left = 6
      Height = 41
      Top = 256
      Width = 224
      Align = alBottom
      BorderSpacing.Left = 6
      BorderSpacing.Top = 4
      BevelOuter = bvNone
      ClientHeight = 41
      ClientWidth = 224
      TabOrder = 1
      Visible = False
      object Label5: TLabel
        Left = 0
        Height = 15
        Top = 0
        Width = 224
        Align = alTop
        BorderSpacing.Bottom = 2
        Caption = 'Currency string'
        Font.Style = [fsBold]
        ParentColor = False
        ParentFont = False
      end
      object CbCurrSymbol: TComboBox
        Left = 0
        Height = 23
        Hint = 'List of registered currency symbols'
        Top = 16
        Width = 200
        Anchors = [akTop, akLeft, akRight]
        ItemHeight = 15
        OnSelect = CbCurrSymbolSelect
        Style = csDropDownList
        TabOrder = 0
      end
      object BtnAddCurrSymbol: TSpeedButton
        Left = 201
        Height = 23
        Hint = 'Add new currency symbol'
        Top = 16
        Width = 23
        Anchors = [akTop, akRight]
        Caption = '...'
        OnClick = BtnAddCurrSymbolClick
      end
    end
  end
  object DetailsPanel: TPanel
    Left = 352
    Height = 297
    Top = 0
    Width = 207
    Align = alClient
    BevelOuter = bvNone
    ClientHeight = 297
    ClientWidth = 207
    TabOrder = 3
    object GbOptions: TGroupBox
      Left = 8
      Height = 121
      Top = 7
      Width = 187
      Anchors = [akTop, akLeft, akRight]
      Caption = 'Options'
      ClientHeight = 101
      ClientWidth = 183
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 0
      object Label3: TLabel
        Left = 15
        Height = 15
        Top = 11
        Width = 79
        Caption = 'Decimal places'
        ParentColor = False
        ParentFont = False
      end
      object EdDecimals: TSpinEdit
        Left = 121
        Height = 23
        Top = 7
        Width = 50
        Anchors = [akTop, akRight]
        MaxValue = 16
        OnChange = EdDecimalsChange
        ParentFont = False
        TabOrder = 0
      end
      object CbThousandSep: TCheckBox
        Left = 15
        Height = 19
        Top = 40
        Width = 125
        Caption = 'Thousand separator'
        OnClick = CbThousandSepClick
        ParentFont = False
        TabOrder = 1
      end
      object CbNegRed: TCheckBox
        Left = 15
        Height = 19
        Top = 67
        Width = 100
        Caption = 'Negative in red'
        OnClick = CbNegRedClick
        ParentFont = False
        TabOrder = 2
      end
    end
    object GroupBox3: TGroupBox
      Left = 8
      Height = 62
      Top = 136
      Width = 187
      Anchors = [akTop, akLeft, akRight]
      Caption = 'Sample'
      ClientHeight = 42
      ClientWidth = 183
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 1
      object Shape1: TShape
        Left = 8
        Height = 34
        Top = 0
        Width = 167
        Align = alClient
        BorderSpacing.Left = 8
        BorderSpacing.Right = 8
        BorderSpacing.Bottom = 8
      end
      object Sample: TLabel
        Left = 9
        Height = 32
        Top = 1
        Width = 165
        Align = alClient
        Alignment = taCenter
        AutoSize = False
        BorderSpacing.Left = 8
        BorderSpacing.Right = 8
        BorderSpacing.Bottom = 8
        BorderSpacing.Around = 1
        Caption = 'Sample'
        Color = clWhite
        Layout = tlCenter
        ParentColor = False
        ParentFont = False
        Transparent = False
      end
    end
  end
  object GbFormatString: TGroupBox
    Left = 6
    Height = 47
    Top = 301
    Width = 547
    Align = alBottom
    BorderSpacing.Left = 6
    BorderSpacing.Top = 4
    BorderSpacing.Right = 6
    Caption = 'Format string'
    ClientHeight = 27
    ClientWidth = 543
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 4
    object EdNumFormatStr: TEdit
      Left = 8
      Height = 23
      Hint = 'Number format string'
      Top = 0
      Width = 483
      Anchors = [akTop, akLeft, akRight]
      OnChange = EdNumFormatStrChange
      ParentFont = False
      TabOrder = 0
    end
    object BtnAddFormat: TSpeedButton
      Left = 493
      Height = 23
      Hint = 'Add this format string to list'
      Top = 0
      Width = 23
      Anchors = [akTop, akRight]
      Glyph.Data = {
        36040000424D3604000000000000360000002800000010000000100000000100
        2000000000000004000064000000640000000000000000000000FFFFFF00FFFF
        FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
        FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
        FF00FFFFFF00FFFFFF0041924E233D8F497D3A8C44DB368940F332873CF32F84
        37DB2C81337D287F3023FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
        FF00FFFFFF0049995853459653E6419950FF7DC28FFF96D0A6FF96CFA6FF78BE
        89FF368D42FF2C8134E6297F3053FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
        FF00519F61534D9C5DF464B478FFA8DBB5FF87CC98FF66BC7DFF64BA7CFF86CB
        98FFA5D9B4FF58AA6BFF2C8134F4297F3053FFFFFF00FFFFFF00FFFFFF0059A6
        6B2256A366E56AB97DFFA8DBB2FF60BC77FF5CBA73FF59B870FF59B56FFF58B5
        6FFF5BB774FFA5D9B3FF5AAA6CFF2C8234E5297F3022FFFFFF00FFFFFF005DA9
        707E53AB68FFAADDB4FF64C179FF5FBE71FF60BC77FFFFFFFFFFFFFFFFFF59B8
        70FF58B56EFF5CB774FFA6DAB4FF388F43FF2C82347EFFFFFF00FFFFFF0061AC
        75DB8ACC98FF89D396FF6BC67AFF63C170FF55AB65FFFFFFFFFFFFFFFFFF59B8
        70FF59B870FF5BB972FF85CC97FF7BBE8DFF308539DBFFFFFF00FFFFFF0065AF
        7AF6A9DDB3FF7DCF8AFF75CC81FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFF59B870FF67BE7DFF9CD4ABFF34883DF6FFFFFF00FFFFFF0069B2
        7EF6B6E2BEFF8BD597FF7AC986FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFF59B870FF69C17EFF9DD4AAFF388B42F6FFFFFF00FFFFFF006DB5
        83DBACDDB6FFA6DFAFFF81CB8CFF7CC986FF6EBD79FFFFFFFFFFFFFFFFFF5BAC
        6AFF60BC77FF5CBA73FF8BD199FF80C592FF3C8E47DBFFFFFF00FFFFFF0070B8
        877E85C797FFD2EED7FF95D9A0FF8AD394FF7FC889FFFFFFFFFFFFFFFFFF79CD
        85FF6BC37CFF6FC77EFFACDFB5FF459E57FF40914C7EFFFFFF00FFFFFF0073BA
        8A2270B887E5AADAB7FFD8F1DCFF92D89DFF88CD93FF84CC8EFF8BD496FF8AD4
        95FF83D28EFFAFE0B7FF6BB97DFF489856E544945122FFFFFF00FFFFFF00FFFF
        FF0073BB8B5370B887F4AFDCBBFFDCF2E0FFB6E4BDFF9BDBA5FF96D9A0FFA5DF
        AFFFC0E8C5FF79C28AFF509E5FF44C9B5B53FFFFFF00FFFFFF00FFFFFF00FFFF
        FF00FFFFFF0073BB8B5371B887E694CEA4FFC3E6CBFFCFEBD4FFC9E9CEFFAFDD
        B8FF6DB97FFF58A569E654A16553FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
        FF00FFFFFF00FFFFFF0074BB8B2371B9887D6EB684DB6AB380F367B17CF363AE
        77DB60AB737D5CA86E23FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
        FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
        FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00
      }
      OnClick = BtnAddFormatClick
    end
    object BtnDeleteFormat: TSpeedButton
      Left = 516
      Height = 23
      Hint = 'Remove this format string from list'
      Top = 0
      Width = 23
      Anchors = [akTop, akRight]
      Glyph.Data = {
        36040000424D3604000000000000360000002800000010000000100000000100
        2000000000000004000064000000640000000000000000000000FFFFFF00FFFF
        FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
        FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
        FF00FFFFFF00FFFFFF003F54C3233A50C27D3853BEDB3551BDF3304BBCF32E4E
        B8DB2B4CB77D2748B523FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
        FF00FFFFFF004658C8534255C6E63C52CCFF757AE8FF8F92EEFF8F92EEFF7178
        E4FF334DC1FF2B4AB7E6294BB553FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
        FF004D5ACD534959CBF45C65E0FFA1A6F5FF7E86EFFF5B63E9FF595DE7FF7D84
        EEFF9EA0F4FF515DD7FF2B4AB7F4294BB553FFFFFF00FFFFFF00FFFFFF00545F
        D2225361CFE5616BE3FFA1ACF5FF545FECFF505CEAFF4D59E9FF4E59E6FF4C56
        E6FF5056E6FF9EA2F4FF5460D6FF2A4AB8E5294BB522FFFFFF00FFFFFF005860
        D47E4B56DBFFA2ABF6FF5664F0FF5266EEFF4D59E9FF4D59E9FF4D59E9FF4D59
        E9FF4C58E6FF525AE6FF9FA3F5FF3450C4FF2A4AB87EFFFFFF00FFFFFF005C62
        D7DB818CEEFF7E91F7FF5D73F3FF4D59E9FF4D59E9FF4D59E9FF4D59E9FF4D59
        E9FF4D59E9FF4F5BE9FF7B83F0FF757BE2FF2E4BBADBFFFFFF00FFFFFF005F63
        DAF6A1ABF7FF7086F8FF6882F6FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFF4D59E9FF5C66EAFF969CF1FF3250BCF6FFFFFF00FFFFFF006469
        DBF6AFB9F9FF7F93FAFF7085F0FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFF4D59E9FF5E6AEEFF969DF1FF364FBEF6FFFFFF00FFFFFF00676A
        DEDBA5AFF5FF9DABFAFF778CF0FF545FECFF545FECFF545FECFF545FECFF545F
        ECFF545FECFF6377F2FF818EF4FF787FE9FF3A53C0DBFFFFFF00FFFFFF006A69
        E07E7D83EAFFCDD4FCFF8B9DFAFF7E93F7FF758AEEFF6C84F6FF6C84F6FF6C84
        F6FF6C84F6FF6379F3FFA4AFF8FF3E4FD0FF3E54C27EFFFFFF00FFFFFF006C6C
        E1226A69E0E5A3A7F3FFD4DBFDFF879AFAFF7F91F0FF7A8EF1FF7F94F8FF7E92
        F9FF768CF8FFA8B6F8FF636EE3FF4557C7E54156C522FFFFFF00FFFFFF00FFFF
        FF006D6CE3536A69E0F4AAADF2FFD8DCFDFFAEBAFAFF91A3FAFF8B9DFAFF9CA9
        FBFFBAC7FCFF707BE9FF4C5BCCF44858CA53FFFFFF00FFFFFF00FFFFFF00FFFF
        FF00FFFFFF006D6CE3536A6ADFE68E93EDFFBEC3F8FFCCD3F9FFC4CBF9FFAAB4
        F4FF6670E2FF535ED1E6505DCE53FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
        FF00FFFFFF00FFFFFF006D6DE2236B6AE17D686ADDDB6364DCF36164DAF35D63
        D9DB5B63D67D5862D423FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
        FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
        FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00
      }
      OnClick = BtnDeleteFormatClick
    end
  end
end