object Form1: TForm1 Left = 296 Top = 250 BorderStyle = bsSingle Caption = 'ktMultiBevel Demo' ClientHeight = 362 ClientWidth = 533 Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Icon.Data = {} PixelsPerInch = 96 ShowHint = True OnCreate = FormCreate OnDestroy = FormDestroy OnPaint = FormPaint TextHeight = 13 object ktMultiBevel2: TktMultiBevel Left = 0 Top = 0 Width = 533 Height = 362 Align = alClient BevelInner = bstLowered BevelOuter = bstRaised BorderWidth = 3 Color = 33023 ColorHighlight = 11261439 ColorShadow = 21672 ColorDensity = 100 EdgeSize = 10 ShadowDensity = 60 ShadowStyle = ssMask Shape = bspPortrait end object Exit: TLabel Left = 325 Top = 318 Width = 17 Height = 13 Caption = 'Exit' Transparent = True end object ktMultiBevel1: TktMultiBevel Left = 15 Top = 10 Width = 251 Height = 341 BevelInner = bstLowered BevelOuter = bstRaised BevelWidth = 3 BorderWidth = 8 Color = 16744576 ColorHighlight = 16766421 ColorShadow = 11031636 ColorDensity = 100 EdgeSize = 40 ShadowDensity = 60 Shadowed = True ShadowOffsetX = 8 ShadowOffsetY = 8 end object Label1: TLabel Left = 285 Top = 250 Width = 55 Height = 13 Caption = 'BevelWidth' Transparent = True end object Label2: TLabel Left = 285 Top = 280 Width = 59 Height = 13 Caption = 'BorderWidth' Transparent = True end object Label3: TLabel Left = 410 Top = 230 Width = 24 Height = 13 Caption = 'Color' Transparent = True end object Label5: TLabel Left = 410 Top = 260 Width = 65 Height = 13 Caption = 'ColorHighlight' Transparent = True end object Label6: TLabel Left = 410 Top = 290 Width = 63 Height = 13 Caption = 'ColorShadow' Transparent = True end object Label7: TLabel Left = 55 Top = 125 Width = 51 Height = 13 Caption = 'Shadowed' Transparent = True end object Label8: TLabel Left = 55 Top = 150 Width = 74 Height = 13 Caption = 'ShadowOffsetX' Transparent = True end object Label9: TLabel Left = 55 Top = 180 Width = 74 Height = 13 Caption = 'ShadowOffsetY' Transparent = True end object Label10: TLabel Left = 55 Top = 70 Width = 63 Height = 13 Caption = 'ShadowColor' Transparent = True end object Label11: TLabel Left = 55 Top = 219 Width = 62 Height = 13 Caption = 'ShadowStyle' Transparent = True end object Label4: TLabel Left = 55 Top = 40 Width = 45 Height = 13 Caption = 'EdgeSize' Transparent = True end object ktBevelButton1: TktBevelButton Left = 291 Top = 307 Width = 85 Height = 35 Hint = 'This is a ktBevelButton' BevelInner = bstLowered BevelOuter = bstNone BevelWidth = 2 BorderWidth = 4 Color = 33023 ColorHighlight = 11261439 ColorShadow = 21672 ColorDensity = 100 EdgeSize = 10 ShadowDensity = 60 Shadowed = True ShadowOffsetX = 4 ShadowOffsetY = 4 OnClick = ktBevelButton1Click OnEnter = ktBevelButton1Enter OnExit = ktBevelButton1Exit OnMouseDown = ktBevelButton1MouseDown end object Label12: TLabel Left = 55 Top = 100 Width = 74 Height = 13 Caption = 'ShadowDensity' Transparent = True end object Label13: TLabel Left = 410 Top = 320 Width = 59 Height = 13 Caption = 'ColorDensity' Transparent = True end object SpinEdit1: TSpinEdit Left = 350 Top = 245 Width = 41 Height = 22 EditorEnabled = False MaxValue = 1000 MinValue = 1 TabOrder = 1 Value = 3 OnChange = SpinEdit1Change end object SpinEdit2: TSpinEdit Left = 350 Top = 275 Width = 41 Height = 22 EditorEnabled = False MaxValue = 0 MinValue = 0 TabOrder = 2 Value = 8 OnChange = SpinEdit2Change end object Panel1: TPanel Left = 480 Top = 225 Width = 41 Height = 22 BorderStyle = bsSingle Color = 16744576 TabOrder = 5 OnClick = Panel1Click end object Panel2: TPanel Left = 480 Top = 255 Width = 41 Height = 22 BorderStyle = bsSingle Color = 16766421 TabOrder = 6 OnClick = Panel2Click end object Panel3: TPanel Left = 480 Top = 285 Width = 41 Height = 22 BorderStyle = bsSingle Color = 11031636 TabOrder = 7 OnClick = Panel3Click end object RadioGroup1: TRadioGroup Left = 400 Top = 7 Width = 121 Height = 136 Caption = 'Shape' ItemIndex = 3 Items.Strings = ( 'BottomLine' 'LeftLine' 'Portrait' 'Rect' 'RightLine' 'TopLine') TabOrder = 0 OnClick = RadioGroup1Click end object RadioGroup2: TRadioGroup Left = 275 Top = 92 Width = 116 Height = 77 Caption = 'BevelOuter' ItemIndex = 2 Items.Strings = ( 'Lowered' 'None' 'Raised') TabOrder = 3 OnClick = RadioGroup2Click end object RadioGroup3: TRadioGroup Left = 275 Top = 7 Width = 116 Height = 77 Caption = 'BevelInner' ItemIndex = 0 Items.Strings = ( 'Lowered' 'None' 'Raised') TabOrder = 4 OnClick = RadioGroup3Click end object RadioGroup4: TRadioGroup Left = 400 Top = 150 Width = 121 Height = 61 Caption = 'ColorFixed' ItemIndex = 0 Items.Strings = ( 'True' 'False') TabOrder = 8 OnClick = RadioGroup4Click end object CheckBox1: TCheckBox Left = 149 Top = 125 Width = 13 Height = 13 Alignment = taLeftJustify Caption = 'CheckBox1' State = cbChecked TabOrder = 9 OnClick = CheckBox1Click end object SpinEdit3: TSpinEdit Left = 135 Top = 145 Width = 41 Height = 22 EditorEnabled = False MaxValue = 0 MinValue = 0 TabOrder = 10 Value = 8 OnChange = SpinEdit3Change end object SpinEdit4: TSpinEdit Left = 135 Top = 175 Width = 41 Height = 22 EditorEnabled = False MaxValue = 0 MinValue = 0 TabOrder = 11 Value = 8 OnChange = SpinEdit4Change end object Panel4: TPanel Left = 135 Top = 65 Width = 41 Height = 22 BorderStyle = bsSingle Color = clGray TabOrder = 12 OnClick = Panel4Click end object ComboBox1: TComboBox Left = 135 Top = 215 Width = 91 Height = 21 Style = csDropDownList DropDownCount = 6 ItemHeight = 13 Items.Strings = ( 'ssBlack' 'ssCopy' 'ssDithered' 'ssMask' 'ssMaskNotPen' 'ssMerge' 'ssMergeNotPen' 'ssNot' 'ssNotAND' 'ssNotCopy' 'ssNotMask' 'ssNotMerge' 'ssNotOR' 'ssNotXor' 'ssTransparent' 'ssWhite' 'ssXor') TabOrder = 13 OnChange = ComboBox1Change end object RadioGroup5: TRadioGroup Left = 55 Top = 242 Width = 116 Height = 77 Caption = 'Transparence' ItemIndex = 0 Items.Strings = ( 'None' 'Semi' 'Transparent') TabOrder = 14 OnClick = RadioGroup5Click end object SpinEdit5: TSpinEdit Left = 135 Top = 35 Width = 41 Height = 22 EditorEnabled = False Increment = 5 MaxValue = 0 MinValue = 0 TabOrder = 15 Value = 40 OnChange = SpinEdit5Change end object SpinEdit6: TSpinEdit Left = 135 Top = 95 Width = 41 Height = 22 Increment = 5 MaxValue = 100 MinValue = 0 TabOrder = 16 Value = 60 OnChange = SpinEdit6Change end object SpinEdit7: TSpinEdit Left = 480 Top = 315 Width = 41 Height = 22 Increment = 5 MaxValue = 100 MinValue = 0 TabOrder = 17 Value = 100 OnChange = SpinEdit7Change end object RadioGroup6: TRadioGroup Left = 275 Top = 175 Width = 121 Height = 61 Caption = 'DensityDepended' ItemIndex = 0 Items.Strings = ( 'True' 'False') TabOrder = 18 OnClick = RadioGroup6Click end object ColorDialog1: TColorDialog Ctl3D = True Color = 16760286 Options = [cdFullOpen] Left = 445 Top = 225 end end