object fmEditProdGroup: TfmEditProdGroup Left = 233 Top = 167 Width = 428 Height = 173 HelpContext = 545 Caption = 'Edit Product Group' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] Position = poScreenCenter Scaled = False OnCloseQuery = FormCloseQuery OnCreate = FormCreate OnShow = FormShow PixelsPerInch = 120 TextHeight = 16 object Panel1: TPanel Left = 0 Top = 0 Width = 420 Height = 101 Align = alClient TabOrder = 0 object Bevel1: TBevel Left = 8 Top = 8 Width = 405 Height = 85 Shape = bsFrame end object Label1: TLabel Left = 16 Top = 24 Width = 146 Height = 16 Caption = 'Product Group Reference' end object Label2: TLabel Left = 16 Top = 60 Width = 153 Height = 16 Caption = 'Product Group Description' end object lbNew: TLabel Left = 344 Top = 23 Width = 5 Height = 19 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clBlue Font.Height = -17 Font.Name = 'Arial' Font.Style = [] ParentColor = False ParentFont = False end object wwProdDesc: TwwDBEdit Left = 184 Top = 56 Width = 221 Height = 24 DataField = 'DESC' DataSource = DM1.dsProdGroup TabOrder = 1 UnboundDataType = wwDefault WantReturns = False WordWrap = False end object DBCDlgProdCode: TComboEdit Left = 184 Top = 20 Width = 150 Height = 24 CharCase = ecUpperCase ClickKey = 16467 ButtonWidth = 24 MaxLength = 10 NumGlyphs = 1 TabOrder = 0 OnButtonClick = DBCDlgProdCodeButtonClick OnEnter = DBCDlgProdCodeEnter OnExit = DBCDlgProdCodeExit end end object Panel2: TPanel Left = 0 Top = 101 Width = 420 Height = 45 Align = alBottom TabOrder = 1 object BtnSave: TButton Left = 89 Top = 8 Width = 75 Height = 30 Hint = 'Save product group' Caption = '&Save' Enabled = False ParentShowHint = False ShowHint = True TabOrder = 1 OnClick = BtnSaveClick end object BtnAbandon: TButton Left = 170 Top = 8 Width = 75 Height = 30 Hint = 'Abandon changes to product group' Caption = '&Abandon' Enabled = False ParentShowHint = False ShowHint = True TabOrder = 2 OnClick = BtnAbandonClick end object BtnClose: TButton Left = 251 Top = 8 Width = 75 Height = 30 Caption = '&Close' ParentShowHint = False ShowHint = True TabOrder = 3 OnClick = BtnCloseClick end object BtnNew: TButton Left = 8 Top = 8 Width = 75 Height = 30 Hint = 'Create new product group' Caption = '&New' ParentShowHint = False ShowHint = True TabOrder = 0 OnClick = BtnNewClick end object BtnHelp: TButton Left = 332 Top = 8 Width = 75 Height = 30 Caption = '&Help' ParentShowHint = False ShowHint = True TabOrder = 4 OnClick = BtnHelpClick end end object Sizer1: TSizer Enabled = True ExceptionAction = eaIgnoreControl GridColumnSizing = gcSizeAllColumns GridRowSizing = grSizeByDefaults MinimumSize = True NavigateOnEnter = True OverrideParentFont = True PerformAssertions = True ShowAssertionFailures = False StretchFonts = True StretchImages = True StretchOnResize = True ThreadProcessing = False Left = 376 Top = 11 ScreenWidth = ( 800) ScreenHeight = ( 600) OriginalFormWidth = ( 428) OriginalFormHeight = ( 173) OriginalFormLeft = ( 233) OriginalFormTop = ( 167) OriginalFormPPI = ( 120) OriginalClientWidth = ( 420) OriginalClientHeight = ( 146) end end