object CodeGenFrm: TCodeGenFrm ActiveControl = GenerateBtn Caption = 'Example Code Generator' ClientHeight = 85 ClientWidth = 273 Font.Color = clText Font.Height = 11 Font.Name = 'MS Sans Serif' Font.Pitch = fpVariable PixelsPerInch = 96 Position = poScreenCenter ShowHint = True TextHeight = 18 HorzScrollBar.Page = 272 HorzScrollBar.Range = 267 VertScrollBar.Page = 84 VertScrollBar.Range = 76 Left = 315 Height = 85 Top = 230 Width = 273 object CopySb: TSpeedButton Color = clBtnFace Glyph.Data = { 42010000424D4201000000000000760000002800000011000000110000000100 040000000000CC00000000000000000000000000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8888800000008888888888888888800000008888888444444444800000008888 8884FFFFFFF48000000088888884F00000F48000000080000004FFFFFFF48000 000080FFFFF4F00000F48000000080F00004FFFFFFF48000000080FFFFF4F00F 44448000000080F00004FFFF4F488000000080FFFFF4FFFF44888000000080F0 0F04444448888000000080FFFF0F088888888000000080FFFF00888888888000 0000800000088888888880000000888888888888888880000000888888888888 888880000000 } NumGlyphs = 0 OnClick = CopySbClick Left = 244 Height = 22 Hint = 'Copy code to clipboard' Top = 21 Width = 23 end object Label2: TLabel Caption = 'Code' Color = clNone FocusControl = CodeEd ParentColor = False Left = 8 Height = 14 Top = 3 Width = 26 end object GenerateBtn: TButton BorderSpacing.InnerBorder = 4 Caption = 'Generate Code' OnClick = GenerateBtnClick TabOrder = 0 Left = 8 Height = 25 Hint = 'Display code generation dialog' Top = 51 Width = 105 end object CodeEd: TEdit ReadOnly = True TabOrder = 1 Left = 8 Height = 24 Top = 19 Width = 233 end object CloseBtn: TBitBtn Kind = bkClose NumGlyphs = 0 TabOrder = 2 Left = 192 Height = 25 Top = 51 Width = 75 end object OgMakeCodes1: TOgMakeCodes KeyFileName = 'ONGUARD.INI' ShowHints = True left = 56 top = 152 end end