The Best of Windows 95.com 1996 December/WIN95_DEC_1996_4.ISO/pim/krnlstnt.exe/ULTIMATE.EXE/0/RCDATA/THUNT/THUNT.txt

Text File | 1996-12-15 | 14KB | 695 lines

object Hunt: THunt
  Left = -2
  Top = 43
  BorderStyle = bsSingle
  Caption = 'Hunt Gates'
  ClientHeight = 411
  ClientWidth = 633
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'System'
  Font.Style = []
  Menu = MainMenu1
  OnClose = FormClose
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 16
  object MainArea: TImage
    Left = 4
    Top = 26
    Width = 417
    Height = 271
  end
  object ReportTypeBox: TGroupBox
    Left = 10
    Top = 140
    Width = 233
    Height = 47
    Caption = 'Type of Report'
    TabOrder = 3
    object ReportType: TComboBox
      Left = 4
      Top = 18
      Width = 225
      Height = 24
      HelpContext = 601
      DropDownCount = 14
      ItemHeight = 16
      TabOrder = 0
      OnChange = ReportTypeChange
      OnExit = Exit
      OnKeyDown = KeyDown
    end
  end
  object OKbtn: TButton
    Left = 532
    Top = 8
    Width = 91
    Height = 27
    Caption = '&Start Report'
    TabOrder = 0
    OnClick = OKbtnClick
    OnKeyDown = KeyDown
  end
  object CancelBtn: TButton
    Left = 436
    Top = 8
    Width = 91
    Height = 27
    Cancel = True
    Caption = '&Cancel'
    TabOrder = 16
    OnClick = OKbtnClick
    OnKeyDown = KeyDown
  end
  object DescBox: TGroupBox
    Left = 10
    Top = 192
    Width = 147
    Height = 47
    Caption = 'Word in Description'
    TabOrder = 6
    object Event: TMaskEdit
      Left = 4
      Top = 16
      Width = 139
      Height = 24
      HelpContext = 601
      MaxLength = 15
      TabOrder = 0
      Text = ' '
      OnExit = Exit
      OnKeyDown = KeyDown
    end
  end
  object ProjectBox: TGroupBox
    Left = 254
    Top = 140
    Width = 159
    Height = 47
    Caption = 'Project ID'
    TabOrder = 5
    object ProjectList: TComboBox
      Left = 4
      Top = 18
      Width = 151
      Height = 24
      HelpContext = 601
      ItemHeight = 16
      MaxLength = 12
      Sorted = True
      TabOrder = 0
      Visible = False
      OnDropDown = ProjectListDropDown
      OnEnter = Enter
      OnExit = Exit
      OnKeyDown = KeyDown
    end
    object Project: TMaskEdit
      Left = 4
      Top = 18
      Width = 151
      Height = 24
      MaxLength = 0
      TabOrder = 1
      OnEnter = Enter
      OnExit = Exit
      OnKeyDown = KeyDown
    end
  end
  object EmployeeBox: TGroupBox
    Left = 140
    Top = 44
    Width = 275
    Height = 77
    Caption = 'Employee'
    TabOrder = 4
    object EmplyeNameList: TLabel
      Left = 20
      Top = 52
      Width = 53
      Height = 13
      Alignment = taRightJustify
      Caption = 'Name List'
    end
    object Emplye: TMaskEdit
      Left = 4
      Top = 18
      Width = 267
      Height = 24
      HelpContext = 601
      MaxLength = 60
      TabOrder = 0
      OnEnter = Enter
      OnExit = Exit
      OnKeyDown = KeyDown
    end
    object EmplyeList: TComboBox
      Left = 78
      Top = 48
      Width = 193
      Height = 24
      HelpContext = 601
      TabStop = False
      ItemHeight = 16
      TabOrder = 1
      Text = ' '
      OnClick = EmplyeListClick
      OnDblClick = EmplyeListDblClick
      OnEnter = Enter
      OnExit = Exit
      OnKeyDown = KeyDown
    end
  end
  object BeginDateBox: TGroupBox
    Left = 10
    Top = 32
    Width = 121
    Height = 47
    Caption = 'Hunt Begin Date'
    TabOrder = 1
    object BeginDate: TMaskEdit
      Left = 14
      Top = 18
      Width = 93
      Height = 24
      HelpContext = 601
      MaxLength = 20
      TabOrder = 0
      OnEnter = Enter
      OnExit = Exit
      OnKeyDown = KeyDown
    end
  end
  object EndDateBox: TGroupBox
    Left = 10
    Top = 86
    Width = 121
    Height = 47
    Caption = 'Hunt End Date'
    TabOrder = 2
    object EndDate: TMaskEdit
      Left = 14
      Top = 18
      Width = 93
      Height = 24
      HelpContext = 601
      MaxLength = 20
      TabOrder = 0
      OnEnter = Enter
      OnExit = Exit
      OnKeyDown = KeyDown
    end
  end
  object IncludeBox: TGroupBox
    Left = 6
    Top = 298
    Width = 417
    Height = 111
    Caption = 'To Be Included on Report'
    TabOrder = 12
    object IncludeAppt: TCheckBox
      Left = 4
      Top = 16
      Width = 177
      Height = 17
      HelpContext = 601
      Caption = 'Appointments'
      TabOrder = 0
      OnKeyDown = KeyDown
    end
    object IncludeDead: TCheckBox
      Left = 4
      Top = 34
      Width = 177
      Height = 17
      HelpContext = 601
      Caption = 'Deadlines'
      TabOrder = 1
      OnKeyDown = KeyDown
    end
    object IncludeGotc: TCheckBox
      Left = 4
      Top = 52
      Width = 177
      Height = 17
      HelpContext = 601
      Caption = 'Gotchas'
      TabOrder = 2
      OnKeyDown = KeyDown
    end
    object IncludeTrip: TCheckBox
      Left = 4
      Top = 72
      Width = 177
      Height = 15
      HelpContext = 601
      Caption = 'Trips'
      TabOrder = 3
      OnKeyDown = KeyDown
    end
    object IncludeVaca: TCheckBox
      Left = 4
      Top = 90
      Width = 177
      Height = 17
      HelpContext = 601
      Caption = 'Vacations'
      TabOrder = 4
      OnKeyDown = KeyDown
    end
    object IncludeExer: TCheckBox
      Left = 210
      Top = 20
      Width = 177
      Height = 17
      HelpContext = 601
      Caption = 'Exercises'
      TabOrder = 5
      OnKeyDown = KeyDown
    end
    object IncludeMisc: TCheckBox
      Left = 210
      Top = 38
      Width = 177
      Height = 17
      HelpContext = 601
      Caption = 'Miscellaneous'
      TabOrder = 6
      OnKeyDown = KeyDown
    end
    object IncludeRmnd: TCheckBox
      Left = 210
      Top = 56
      Width = 177
      Height = 17
      HelpContext = 601
      Caption = 'Reminders'
      TabOrder = 7
      OnClick = IncludeRmndClick
      OnKeyDown = KeyDown
    end
    object IncludeDeletes: TCheckBox
      Left = 210
      Top = 90
      Width = 191
      Height = 17
      HelpContext = 601
      Caption = 'Items Tagged for Deletion'
      TabOrder = 8
      OnKeyDown = KeyDown
    end
  end
  object ReportDestBox: TGroupBox
    Left = 436
    Top = 44
    Width = 185
    Height = 57
    Caption = 'Report Destination'
    TabOrder = 13
    object ReportToScreen: TRadioButton
      Left = 4
      Top = 18
      Width = 175
      Height = 17
      HelpContext = 603
      Caption = 'Screen'
      TabOrder = 0
      OnClick = ReportDestClick
      OnKeyDown = KeyDown
    end
    object ReportToPrinter: TRadioButton
      Left = 96
      Top = 18
      Width = 87
      Height = 17
      HelpContext = 603
      Caption = 'Printer'
      TabOrder = 1
      OnClick = ReportDestClick
      OnKeyDown = KeyDown
    end
    object ReportToFile: TRadioButton
      Left = 4
      Top = 34
      Width = 81
      Height = 17
      HelpContext = 603
      Caption = 'File'
      TabOrder = 2
      OnClick = ReportDestClick
      OnKeyDown = KeyDown
    end
    object ReportFileName: TMaskEdit
      Left = 90
      Top = 34
      Width = 91
      Height = 20
      HelpContext = 603
      Font.Color = clWindowText
      Font.Height = -9
      Font.Name = 'Arial'
      Font.Style = []
      MaxLength = 30
      ParentFont = False
      TabOrder = 3
      OnKeyDown = KeyDown
    end
  end
  object HuntMethodBox: TGroupBox
    Left = 436
    Top = 334
    Width = 187
    Height = 75
    Caption = 'Hunt Method'
    TabOrder = 15
    object NormalHunt: TRadioButton
      Left = 4
      Top = 18
      Width = 177
      Height = 17
      HelpContext = 601
      Caption = 'Normal'
      TabOrder = 0
      OnClick = MethodClicked
      OnKeyDown = KeyDown
    end
    object HuntByEmp: TRadioButton
      Left = 4
      Top = 36
      Width = 179
      Height = 17
      HelpContext = 601
      Caption = 'By Employee'
      TabOrder = 1
      OnClick = MethodClicked
      OnKeyDown = KeyDown
    end
    object HuntByPrjct: TRadioButton
      Left = 4
      Top = 54
      Width = 179
      Height = 17
      HelpContext = 601
      Caption = 'By Project'
      TabOrder = 2
      OnClick = MethodClicked
      OnKeyDown = KeyDown
    end
  end
  object CategoryBox: TGroupBox
    Left = 10
    Top = 244
    Width = 147
    Height = 47
    Caption = 'Category'
    TabOrder = 7
    object Category: TComboBox
      Left = 4
      Top = 20
      Width = 139
      Height = 22
      HelpContext = 608
      DropDownCount = 22
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Pitch = fpVariable
      Font.Style = []
      ItemHeight = 14
      ParentFont = False
      TabOrder = 0
      OnDropDown = CategoryDropDown
      OnEnter = Enter
      OnExit = Exit
      OnKeyDown = KeyDown
    end
  end
  object PrintedReportInfoBox: TGroupBox
    Left = 436
    Top = 106
    Width = 187
    Height = 223
    Caption = 'PrintedReportInfoBox'
    TabOrder = 14
    object RprtTitleBox: TGroupBox
      Left = 6
      Top = 174
      Width = 175
      Height = 47
      Caption = 'RprtTitleBox'
      TabOrder = 3
      object RprtTitle: TMaskEdit
        Left = 4
        Top = 20
        Width = 167
        Height = 24
        HelpContext = 605
        MaxLength = 80
        TabOrder = 0
        OnEnter = Enter
        OnExit = Exit
        OnKeyDown = KeyDown
      end
    end
    object PageLengthBox: TGroupBox
      Left = 6
      Top = 68
      Width = 175
      Height = 51
      Caption = 'PageLengthBox'
      TabOrder = 1
      object StandardLengthBtn: TRadioButton
        Left = 4
        Top = 16
        Width = 165
        Height = 17
        HelpContext = 601
        Caption = 'StandardLengthBtn'
        TabOrder = 0
        OnClick = PageLenBtnClick
        OnDblClick = StandardLengthBtnDblClick
        OnKeyDown = KeyDown
      end
      object ShortLengthBtn: TRadioButton
        Left = 4
        Top = 32
        Width = 163
        Height = 17
        HelpContext = 601
        Caption = 'ShortLengthBtn'
        TabOrder = 1
        OnClick = PageLenBtnClick
        OnKeyDown = KeyDown
      end
    end
    object OrientationBox: TGroupBox
      Left = 6
      Top = 18
      Width = 175
      Height = 51
      Caption = 'Orientation'
      TabOrder = 0
      object PortraitBtn: TRadioButton
        Left = 4
        Top = 16
        Width = 163
        Height = 17
        HelpContext = 601
        Caption = 'PortraitBtn'
        TabOrder = 0
        OnClick = OrientationBtnClick
        OnKeyDown = KeyDown
      end
      object LandscapeBtn: TRadioButton
        Left = 4
        Top = 32
        Width = 163
        Height = 17
        HelpContext = 601
        Caption = 'LandscapeBtn'
        TabOrder = 1
        OnClick = OrientationBtnClick
        OnKeyDown = KeyDown
      end
    end
    object PrintSizeBox: TGroupBox
      Left = 6
      Top = 120
      Width = 175
      Height = 51
      Caption = 'PrintSizeBox'
      TabOrder = 2
      object StdPrintSize: TRadioButton
        Left = 4
        Top = 16
        Width = 165
        Height = 17
        HelpContext = 601
        Caption = 'StdPrintSize'
        TabOrder = 0
        OnKeyDown = KeyDown
      end
      object SmPrintSize: TRadioButton
        Left = 4
        Top = 32
        Width = 165
        Height = 17
        HelpContext = 601
        Caption = 'SmPrintSize'
        TabOrder = 1
        OnKeyDown = KeyDown
      end
    end
  end
  object PayeeBox: TGroupBox
    Left = 164
    Top = 244
    Width = 141
    Height = 47
    Caption = 'Payee'
    TabOrder = 9
    object Payee: TMaskEdit
      Left = 6
      Top = 18
      Width = 129
      Height = 24
      HelpContext = 601
      MaxLength = 15
      TabOrder = 0
      OnEnter = Enter
      OnExit = Exit
      OnKeyDown = KeyDown
    end
  end
  object HighAmtBox: TGroupBox
    Left = 316
    Top = 244
    Width = 99
    Height = 47
    Caption = 'High Amount'
    TabOrder = 11
    object HighAmt: TMaskEdit
      Left = 4
      Top = 18
      Width = 89
      Height = 24
      HelpContext = 601
      MaxLength = 0
      TabOrder = 0
      OnEnter = Enter
      OnExit = Exit
      OnKeyDown = KeyDown
    end
  end
  object LowAmtBox: TGroupBox
    Left = 314
    Top = 192
    Width = 99
    Height = 47
    Caption = 'Low Amount'
    TabOrder = 10
    object LowAmt: TMaskEdit
      Left = 4
      Top = 18
      Width = 91
      Height = 24
      HelpContext = 601
      MaxLength = 0
      TabOrder = 0
      OnEnter = Enter
      OnExit = Exit
      OnKeyDown = KeyDown
    end
  end
  object AccountBox: TGroupBox
    Left = 164
    Top = 192
    Width = 141
    Height = 47
    Caption = 'Account'
    TabOrder = 8
    Visible = False
    object Account: TMaskEdit
      Left = 4
      Top = 18
      Width = 131
      Height = 24
      HelpContext = 611
      MaxLength = 0
      TabOrder = 0
      Visible = False
      OnEnter = Enter
      OnExit = Exit
      OnKeyDown = KeyDown
    end
  end
  object SmClndrBox: TGroupBox
    Left = 410
    Top = 104
    Width = 201
    Height = 185
    Caption = 'Date'
    Color = clYellow
    ParentColor = False
    TabOrder = 17
    object SmClndr: TImage
      Left = 4
      Top = 18
      Width = 192
      Height = 163
      Picture.Data = {<image000.bmp>}
      OnMouseDown = SmClndrMouseDown
    end
  end
  object LetterList: TFileListBox
    Left = 254
    Top = 6
    Width = 31
    Height = 23
    ItemHeight = 16
    TabOrder = 18
  end
  object MainMenu1: TMainMenu
    Left = 290
    Top = 4
    object MenuPrint: TMenuItem
      Caption = '&Print'
      ShortCut = 0
      object MenuPrintSetup: TMenuItem
        Caption = 'Printer &Setup'
        ShortCut = 0
        OnClick = MenuPrintSetupClick
      end
      object MenuPrintReport: TMenuItem
        Caption = 'Print &Report'
        ShortCut = 0
        OnClick = MenuPrintReportClick
      end
    end
    object MenuReset: TMenuItem
      Caption = '&Reset'
      ShortCut = 0
      object menuResetParameters: TMenuItem
        Caption = '&Reset Hunt Parameters'
        ShortCut = 0
        OnClick = menuResetParametersClick
      end
    end
    object ReportHelp: TMenuItem
      Caption = '&Help'
      ShortCut = 112
      OnClick = ReportHelpClick
    end
  end
  object PrintDialog1: TPrintDialog
    Options = [poPageNums, poWarning]
    Left = 324
    Top = 4
  end
  object PrinterSetupDialog1: TPrinterSetupDialog
    Left = 374
    Top = 4
  end
end