object MainForm: TMainForm Left = 200 Top = 116 Caption = 'Histogram - www.ImageEn.com' ClientHeight = 688 ClientWidth = 936 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] OldCreateOrder = True Position = poScreenCenter OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object Panel1: TPanel Left = 576 Top = 41 Width = 360 Height = 647 Align = alRight BevelOuter = bvNone TabOrder = 0 object Label1: TLabel Left = 8 Top = 0 Width = 27 Height = 13 Caption = 'Gray' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] ParentFont = False end object Label2: TLabel Left = 8 Top = 120 Width = 22 Height = 13 Caption = 'Red' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] ParentFont = False end object Label3: TLabel Left = 8 Top = 240 Width = 34 Height = 13 Caption = 'Green' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] ParentFont = False end object Label4: TLabel Left = 8 Top = 360 Width = 24 Height = 13 Caption = 'Blue' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] ParentFont = False end object lblHue: TLabel Left = 8 Top = 480 Width = 22 Height = 13 Caption = 'Hue' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] ParentFont = False end object HistogramBoxGray: THistogramBox Left = 14 Top = 16 Width = 337 Height = 97 end object HistogramBoxRed: THistogramBox Left = 14 Top = 136 Width = 337 Height = 97 HistogramKind = [hkRed] end object HistogramBoxGreen: THistogramBox Left = 14 Top = 256 Width = 337 Height = 97 HistogramKind = [hkGreen] end object HistogramBoxBlue: THistogramBox Left = 14 Top = 376 Width = 337 Height = 97 HistogramKind = [hkBlue] end object Button1: TButton Left = 14 Top = 608 Width = 75 Height = 25 Caption = 'Show Values' TabOrder = 4 OnClick = Button1Click end object HistogramBoxHue: THistogramBox Left = 14 Top = 496 Width = 337 Height = 97 HistogramKind = [hkHue] end end object ImageEnView1: TImageEnView Left = 0 Top = 41 Width = 576 Height = 647 Background = clBtnFace ParentCtl3D = False LegacyBitmap = True MouseInteract = [miSelect] OnSelectionChange = ImageEnView1SelectionChange EnableInteractionHints = True Align = alClient TabOrder = 1 end object Panel2: TPanel Left = 0 Top = 0 Width = 936 Height = 41 Align = alTop BevelOuter = bvNone TabOrder = 2 object SpeedButton1: TSpeedButton Left = 304 Top = 8 Width = 73 Height = 25 GroupIndex = 1 Down = True Caption = 'Rectangle' OnClick = SpeedButton1Click end object SpeedButton2: TSpeedButton Left = 384 Top = 8 Width = 73 Height = 25 GroupIndex = 1 Caption = 'Ellipse' OnClick = SpeedButton2Click end object SpeedButton3: TSpeedButton Left = 464 Top = 8 Width = 73 Height = 25 GroupIndex = 1 Caption = 'Polygon' OnClick = SpeedButton3Click end object Button2: TButton Left = 8 Top = 8 Width = 75 Height = 25 Caption = 'Open Image' TabOrder = 0 OnClick = Button2Click end end end