object frmSrwAddItem: TfrmSrwAddItem Left = 112 Top = 139 BorderStyle = bsDialog Caption = ' Add Object Wizard' ClientHeight = 268 ClientWidth = 424 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] PixelsPerInch = 96 Position = poScreenCenter OnShow = FormShow TextHeight = 13 object bevLayout: TBevel Left = 58 Top = 234 Width = 362 Height = 2 end object cmdHelp: TBitBtn Left = 58 Top = 240 Width = 88 Height = 25 Caption = '&Help' Enabled = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 Style = bsNew end object cmdBack: TBitBtn Left = 150 Top = 240 Width = 88 Height = 25 Caption = '< &Back' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 1 OnClick = cmdBackClick Style = bsNew end object cmdNext: TBitBtn Left = 241 Top = 240 Width = 88 Height = 25 Caption = '&Next >' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 2 OnClick = cmdNextClick Style = bsNew end object cmdCancel: TBitBtn Left = 332 Top = 240 Width = 88 Height = 25 Caption = '&Cancel' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 3 OnClick = cmdCancelClick Style = bsNew end object GroupBox1: TGroupBox Left = 4 Top = 0 Width = 49 Height = 265 TabOrder = 4 object imgIcon: TImage Left = 8 Top = 12 Width = 32 Height = 32 AutoSize = True Picture.Data = {} end object pntIcon: TPaintBox Left = 8 Top = 48 Width = 33 Height = 209 Font.Color = clNavy Font.Height = -27 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False OnPaint = pntIconPaint end end object nbkPages: TNotebook Left = 58 Top = 4 Width = 359 Height = 227 TabOrder = 5 OnPageChanged = nbkPagesPageChanged object TPage Left = 0 Top = 0 Caption = 'Select Type' object Label8: TLabel Left = 1 Top = 0 Width = 110 Height = 13 Caption = 'Select Object Type' Font.Color = clNavy Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label1: TLabel Left = 16 Top = 24 Width = 189 Height = 61 AutoSize = False Caption = 'Program Explorer organizes a variety of objects for easy access.' + ' ' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False WordWrap = True end object Label3: TLabel Left = 16 Top = 120 Width = 189 Height = 33 AutoSize = False Caption = 'Select the Type of object to add, and press Next.' Font.Color = clMaroon Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False WordWrap = True end object Label2: TLabel Left = 16 Top = 64 Width = 177 Height = 45 AutoSize = False Caption = 'These objects may reside in a database, inside a program or on a' + ' local or network drive.' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False WordWrap = True end object labAdmin: TLabel Left = 16 Top = 176 Width = 189 Height = 41 AutoSize = False Caption = 'Note: Administrator'#39's Mode provides more object types and action' + 's than normal user mode.' WordWrap = True end object grdType: TStringGrid Left = 214 Top = 1 Width = 145 Height = 225 ColCount = 2 DefaultRowHeight = 17 FixedCols = 0 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False RowCount = 20 ScrollBars = ssVertical TabOrder = 0 OnDrawCell = grdTypeDrawCell ColWidths = ( 125 64) end end object TPage Left = 0 Top = 0 Caption = 'Select Event' object labDetail1: TLabel Left = 1 Top = 0 Width = 77 Height = 13 Caption = 'Select Action' Font.Color = clNavy Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object labSelectAction: TLabel Left = 16 Top = 24 Width = 189 Height = 49 AutoSize = False Caption = 'You have selected to add a "Report" object to Program Explorer.' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False WordWrap = True end object Label7: TLabel Left = 16 Top = 64 Width = 189 Height = 45 AutoSize = False Caption = 'When this object is selected from Program Explorer, an action wi' + 'll be performed.' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False WordWrap = True end object Label9: TLabel Left = 16 Top = 120 Width = 189 Height = 49 AutoSize = False Caption = 'Select the Action to be performed, and press Next.' Font.Color = clMaroon Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False WordWrap = True end object grdAction: TStringGrid Left = 214 Top = 1 Width = 145 Height = 225 ColCount = 2 DefaultRowHeight = 17 FixedCols = 0 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False RowCount = 20 ScrollBars = ssVertical TabOrder = 0 OnDrawCell = grdTypeDrawCell ColWidths = ( 125 64) end end object TPage Left = 0 Top = 0 Caption = 'Enter Command' object labCommand1: TLabel Left = 1 Top = 0 Width = 83 Height = 13 Caption = 'Command Line' Font.Color = clNavy Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object labCommand2: TLabel Left = 16 Top = 24 Width = 337 Height = 41 AutoSize = False Caption = 'The "Open Report" action requires a command line to execute when' + ' your "Report" object is selected.' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False WordWrap = True end object labCommand3: TLabel Left = 32 Top = 64 Width = 297 Height = 17 AutoSize = False Caption = 'Command Line for "Report"' Font.Color = clMaroon Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False WordWrap = True end object labCommand4: TLabel Left = 24 Top = 112 Width = 313 Height = 17 AutoSize = False Caption = 'Use the combo box to select commonly used command lines.' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False WordWrap = True end object cmdOpen: TSpeedButton Left = 334 Top = 80 Width = 20 Height = 21 Caption = '...' OnClick = cmdOpenClick end object Label11: TLabel Left = 24 Top = 136 Width = 313 Height = 17 AutoSize = False Caption = 'Press the file button to select a file.' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False WordWrap = True end object cmbCommand: TComboBox Left = 32 Top = 80 Width = 297 Height = 21 ItemHeight = 13 TabOrder = 0 end end object TPage Left = 0 Top = 0 Caption = 'Security' object Label10: TLabel Left = 1 Top = 0 Width = 47 Height = 13 Caption = 'Security' Font.Color = clNavy Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object labSecurity: TLabel Left = 16 Top = 24 Width = 337 Height = 41 AutoSize = False Caption = 'As the creator of a new "Report" object, you control what other ' + 'users can do with this item.' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False WordWrap = True end object Label12: TLabel Left = 16 Top = 64 Width = 297 Height = 17 AutoSize = False Caption = 'Other users are permitted to:' Font.Color = clMaroon Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False WordWrap = True end object chkOpen: TCheckBox Left = 40 Top = 88 Width = 209 Height = 17 Caption = 'Open this item' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False State = cbChecked TabOrder = 0 end object chkSave: TCheckBox Left = 40 Top = 112 Width = 265 Height = 17 Caption = 'Save changes or rename this item' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False State = cbChecked TabOrder = 1 end object chkCopy: TCheckBox Left = 40 Top = 138 Width = 257 Height = 17 Caption = 'Copy this item as a new object' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False State = cbChecked TabOrder = 2 end object chkMove: TCheckBox Left = 40 Top = 162 Width = 265 Height = 17 Caption = 'Move this item to a different folder' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False State = cbChecked TabOrder = 3 end object chkDelete: TCheckBox Left = 40 Top = 186 Width = 265 Height = 17 Caption = 'Delete this item' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False State = cbChecked TabOrder = 4 end end object TPage Left = 0 Top = 0 Caption = 'Finish' object Label15: TLabel Left = 1 Top = 0 Width = 136 Height = 13 Caption = 'Name Object and Finish' Font.Color = clNavy Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object labFinish: TLabel Left = 16 Top = 24 Width = 345 Height = 41 AutoSize = False Caption = 'You have requested to add a "Report" object to Program Explorer.' + ' All objects require a unique name within the current folder.' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False WordWrap = True end object labFinish2: TLabel Left = 32 Top = 64 Width = 193 Height = 21 AutoSize = False Caption = 'Enter a Name' Font.Color = clMaroon Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False WordWrap = True end object Label4: TLabel Left = 16 Top = 160 Width = 297 Height = 21 AutoSize = False Caption = 'Press Cancel to abort this process.' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False WordWrap = True end object Label5: TLabel Left = 16 Top = 112 Width = 297 Height = 17 AutoSize = False Caption = 'Press Finish to add your new object to Program Explorer.' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False WordWrap = True end object Label6: TLabel Left = 16 Top = 136 Width = 297 Height = 17 AutoSize = False Caption = 'Press Back to change your selections.' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False WordWrap = True end object txtName: TEdit Left = 32 Top = 80 Width = 313 Height = 20 TabOrder = 0 end end end object dlgOpen: TOpenDialog Left = 378 Top = 188 end end