inherited frShapeForm: TfrShapeForm Left = 344 Height = 143 Top = 163 Width = 367 HorzScrollBar.Page = 276 VertScrollBar.Page = 93 ActiveControl = ButtonPanel1 BorderStyle = bsDialog Caption = 'Shape' ClientHeight = 143 ClientWidth = 367 OnCreate = FormCreate Position = poScreenCenter object Image1: TImage[0] Left = 32 Height = 16 Top = 64 Width = 16 Picture.Data = { 07544269746D6170F6000000424DF60000000000000076000000280000001000 0000100000000100040000000000800000000000000000000000100000000000 000000000000000080000080000000808000800000008000800080800000C0C0 C000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFF FF007777777700000007777777770FFFFF07777777770FFFFF07770000770FFF FF07702222070FFFFF07022222200FFFFF070222222000000007022222207777 77770222000000000777702220CCCCC07777770000CCCCC077777777770CCC07 77777777770CCC07777777777770C077777777777770C0777777777777770777 7777 } Transparent = True Visible = False end object GroupBox1: TGroupBox[1] AnchorSideLeft.Control = Owner AnchorSideTop.Control = Owner AnchorSideRight.Control = Owner AnchorSideRight.Side = asrBottom Left = 6 Height = 64 Top = 6 Width = 355 Anchors = [akTop, akLeft, akRight] AutoSize = True BorderSpacing.Around = 6 Caption = ' Shape kind ' ClientHeight = 43 ClientWidth = 347 TabOrder = 0 object CB1: TComboBox AnchorSideLeft.Control = GroupBox1 AnchorSideTop.Control = GroupBox1 AnchorSideRight.Control = GroupBox1 AnchorSideRight.Side = asrBottom Left = 6 Height = 31 Top = 6 Width = 335 Anchors = [akTop, akLeft, akRight] BorderSpacing.Around = 6 ItemHeight = 0 Style = csDropDownList TabOrder = 0 end end object ButtonPanel1: TButtonPanel[2] Left = 6 Height = 40 Top = 97 Width = 355 TabOrder = 1 ShowButtons = [pbOK, pbCancel, pbHelp] end end