object frmCCPopup: TfrmCCPopup Left = 231 Top = 81 ActiveControl = lboxVariants AutoSize = True BorderStyle = bsNone ClientHeight = 136 ClientWidth = 306 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] FormStyle = fsStayOnTop OldCreateOrder = False OnActivate = FormActivate OnClose = FormClose OnCreate = FormCreate OnDestroy = FormDestroy OnDeactivate = FormDeactivate PixelsPerInch = 96 TextHeight = 13 object lboxVariants: TListBox Left = 0 Top = 0 Width = 306 Height = 136 Style = lbOwnerDrawVariable BorderStyle = bsNone Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] IntegralHeight = True ItemHeight = 13 ParentFont = False TabOrder = 0 OnDblClick = lboxVariantsDblClick OnDrawItem = lboxVariantsDrawItem OnExit = FormDeactivate OnKeyPress = lboxVariantsKeyPress OnMeasureItem = lboxVariantsMeasureItem OnMouseDown = lboxVariantsMouseDown end object appEvents: TApplicationEvents OnDeactivate = FormDeactivate Left = 45 Top = 25 end end