object morfshapeform: Tmorfshapeform Left = 263 Top = 232 Width = 566 Height = 139 Caption = 'Morf Shape s' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] FormStyle = fsStayOnTop OnCreate = FormCreate OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Label3d1: TLabel3d Left = 472 Top = 16 Width = 47 Height = 20 Caption = 'Width' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentColor = False ParentFont = False Transparent = True AStyle3D = Raised3d AShadeLTSet = False end object Label3d2: TLabel3d Left = 472 Top = 48 Width = 47 Height = 20 Caption = 'Paste' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentColor = False ParentFont = False Transparent = True AStyle3D = Raised3d AShadeLTSet = False end object Image1: TImage Left = 136 Top = 42 Width = 89 Height = 71 AutoSize = True Visible = False end object Panel1: TPanel Left = 8 Top = 16 Width = 377 Height = 81 Caption = ' ' TabOrder = 0 object Shape1: TShape Left = 8 Top = 8 Width = 65 Height = 65 Brush.Color = clMaroon OnMouseUp = Shape1MouseUp end object Shape2: TShape Left = 88 Top = 8 Width = 65 Height = 65 Shape = stRoundRect OnMouseUp = Shape2MouseUp end object Shape3: TShape Left = 168 Top = 8 Width = 65 Height = 65 Shape = stCircle OnMouseUp = Shape3MouseUp end object Shape4: TShape Left = 256 Top = 8 Width = 89 Height = 65 Shape = stEllipse OnMouseUp = Shape4MouseUp end end object SpinEdit1: TSpinEdit Left = 400 Top = 16 Width = 65 Height = 22 MaxValue = 1000 MinValue = 10 TabOrder = 1 Value = 100 end object SpinEdit2: TSpinEdit Left = 400 Top = 48 Width = 65 Height = 22 MaxValue = 1000 MinValue = 10 TabOrder = 2 Value = 100 end object BitBtn1: TBitBtn Left = 400 Top = 80 Width = 75 Height = 25 TabOrder = 3 OnClick = BitBtn1Click Kind = bkOK end object BitBtn2: TBitBtn Left = 480 Top = 80 Width = 75 Height = 25 TabOrder = 4 OnClick = BitBtn2Click Kind = bkCancel end end