home *** CD-ROM | disk | FTP | other *** search
/ Chip 1999 September / CHIPCD_9_99.iso / software / shareware / irvinst / IVB32.EXE / 0 / RCDATA / TFRMMAIN / TFRMMAIN.txt < prev   
Encoding:
Text File  |  1999-07-11  |  12.7 KB  |  424 lines
  1. object frmMain: TfrmMain
  2.   Left = 311
  3.   Top = 84
  4.   Width = 481
  5.   Height = 421
  6.   HelpContext = 11100
  7.   BorderIcons = [biSystemMenu, biMinimize, biMaximize, biHelp]
  8.   Caption = 'Audit and Integrity Expert System'
  9.   Font.Charset = DEFAULT_CHARSET
  10.   Font.Color = clWindowText
  11.   Font.Height = -11
  12.   Font.Name = 'MS Sans Serif'
  13.   Font.Style = []
  14.   KeyPreview = True
  15.   Menu = mnuMain
  16.   Position = poScreenCenter
  17.   OnActivate = FormActivate
  18.   OnCloseQuery = FormCloseQuery
  19.   OnCreate = FormCreate
  20.   OnDestroy = FormDestroy
  21.   OnKeyPress = FormKeyPress
  22.   OnResize = FormResize
  23.   OnShow = FormShow
  24.   PixelsPerInch = 96
  25.   TextHeight = 13
  26.   object grpReport: TGroupBox
  27.     Left = 8
  28.     Top = 136
  29.     Width = 457
  30.     Height = 177
  31.     Caption = 'Report'
  32.     TabOrder = 1
  33.     object stgFiles: TStringGrid
  34.       Left = 16
  35.       Top = 24
  36.       Width = 425
  37.       Height = 137
  38.       ColCount = 3
  39.       DefaultColWidth = 90
  40.       DefaultRowHeight = 15
  41.       FixedCols = 0
  42.       RowCount = 2
  43.       GridLineWidth = 0
  44.       Options = [goFixedVertLine, goFixedHorzLine, goRowSelect]
  45.       PopupMenu = mnuReport
  46.       ScrollBars = ssVertical
  47.       TabOrder = 0
  48.       OnMouseUp = stgFilesMouseUp
  49.       ColWidths = (
  50.         98
  51.         190
  52.         85)
  53.     end
  54.   end
  55.   object btnStart: TBitBtn
  56.     Left = 8
  57.     Top = 328
  58.     Width = 75
  59.     Height = 25
  60.     Hint = 'Start scanning'
  61.     Caption = '&Start'
  62.     Default = True
  63.     TabOrder = 2
  64.     OnClick = btnStartStopClick
  65.     Glyph.Data = {
  66.       76010000424D7601000000000000760000002800000020000000100000000100
  67.       04000000000000010000130B0000130B00001000000000000000000000000000
  68.       800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  69.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  70.       33333333333333333333EEEEEEEEEEEEEEE333FFFFFFFFFFFFF3E00000000000
  71.       00E337777777777777F3E0F77777777770E337F33333333337F3E0F333333333
  72.       70E337F3333F333337F3E0F33303333370E337F3337FF33337F3E0F333003333
  73.       70E337F33377FF3337F3E0F33300033370E337F333777FF337F3E0F333000033
  74.       70E337F33377773337F3E0F33300033370E337F33377733337F3E0F333003333
  75.       70E337F33377333337F3E0F33303333370E337F33373333337F3E0F333333333
  76.       70E337F33333333337F3E0FFFFFFFFFFF0E337FFFFFFFFFFF7F3E00000000000
  77.       00E33777777777777733EEEEEEEEEEEEEEE33333333333333333}
  78.     NumGlyphs = 2
  79.   end
  80.   object btnPause: TBitBtn
  81.     Left = 96
  82.     Top = 328
  83.     Width = 75
  84.     Height = 25
  85.     Hint = 'Pause scanning'
  86.     Caption = '&Pause'
  87.     Enabled = False
  88.     TabOrder = 3
  89.     OnClick = btnPauseClick
  90.     Glyph.Data = {
  91.       76010000424D7601000000000000760000002800000020000000100000000100
  92.       04000000000000010000130B0000130B00001000000000000000000000000000
  93.       800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  94.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  95.       33333333333333333333EEEEEEEEEEEEEEE333FFFFFFFFFFFFF3E00000000000
  96.       00E337777777777777F3E0F77777777770E337F33333333337F3E0F333333333
  97.       70E337F33333333337F3E0F33333333370E337F333FF3FF337F3E0F330030033
  98.       70E337F3377F77F337F3E0F33003003370E337F3377F77F337F3E0F330030033
  99.       70E337F3377F77F337F3E0F33003003370E337F3377F77F337F3E0F330030033
  100.       70E337F33773773337F3E0F33333333370E337F33333333337F3E0F333333333
  101.       70E337F33333333337F3E0FFFFFFFFFFF0E337FFFFFFFFFFF7F3E00000000000
  102.       00E33777777777777733EEEEEEEEEEEEEEE33333333333333333}
  103.     NumGlyphs = 2
  104.   end
  105.   object btnOptions: TBitBtn
  106.     Left = 184
  107.     Top = 328
  108.     Width = 75
  109.     Height = 25
  110.     Hint = 'Open options dialog'
  111.     Caption = '&Options...'
  112.     TabOrder = 4
  113.     OnClick = btnOptionsClick
  114.     Glyph.Data = {
  115.       76010000424D7601000000000000760000002800000020000000100000000100
  116.       04000000000000010000120B0000120B00001000000000000000000000000000
  117.       800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  118.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555550FF0559
  119.       1950555FF75F7557F7F757000FF055591903557775F75557F77570FFFF055559
  120.       1933575FF57F5557F7FF0F00FF05555919337F775F7F5557F7F700550F055559
  121.       193577557F7F55F7577F07550F0555999995755575755F7FFF7F5570F0755011
  122.       11155557F755F777777555000755033305555577755F75F77F55555555503335
  123.       0555555FF5F75F757F5555005503335505555577FF75F7557F55505050333555
  124.       05555757F75F75557F5505000333555505557F777FF755557F55000000355557
  125.       07557777777F55557F5555000005555707555577777FF5557F55553000075557
  126.       0755557F7777FFF5755555335000005555555577577777555555}
  127.     NumGlyphs = 2
  128.   end
  129.   object btnHelp: TBitBtn
  130.     Left = 272
  131.     Top = 328
  132.     Width = 75
  133.     Height = 25
  134.     Hint = 'Help me!'
  135.     Caption = 'Help...'
  136.     TabOrder = 5
  137.     OnClick = btnHelpClick
  138.     Glyph.Data = {
  139.       76010000424D7601000000000000760000002800000020000000100000000100
  140.       04000000000000010000120B0000120B00001000000000000000000000000000
  141.       800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  142.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  143.       3333333333FFFFF3333333333F797F3333333333F737373FF333333BFB999BFB
  144.       33333337737773773F3333BFBF797FBFB33333733337333373F33BFBFBFBFBFB
  145.       FB3337F33333F33337F33FBFBFB9BFBFBF3337333337F333373FFBFBFBF97BFB
  146.       FBF37F333337FF33337FBFBFBFB99FBFBFB37F3333377FF3337FFBFBFBFB99FB
  147.       FBF37F33333377FF337FBFBF77BF799FBFB37F333FF3377F337FFBFB99FB799B
  148.       FBF373F377F3377F33733FBF997F799FBF3337F377FFF77337F33BFBF99999FB
  149.       FB33373F37777733373333BFBF999FBFB3333373FF77733F7333333BFBFBFBFB
  150.       3333333773FFFF77333333333FBFBF3333333333377777333333}
  151.     NumGlyphs = 2
  152.   end
  153.   object btnStop: TBitBtn
  154.     Left = 24
  155.     Top = 320
  156.     Width = 75
  157.     Height = 25
  158.     Hint = 'Stop scanning'
  159.     Caption = '&Stop'
  160.     TabOrder = 6
  161.     Visible = False
  162.     OnClick = btnStartStopClick
  163.     Glyph.Data = {
  164.       76010000424D7601000000000000760000002800000020000000100000000100
  165.       04000000000000010000130B0000130B00001000000000000000000000000000
  166.       800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  167.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  168.       33333333333333333333EEEEEEEEEEEEEEE333FFFFFFFFFFFFF3E00000000000
  169.       00E337777777777777F3E0F77777777770E337F33333333337F3E0F333333333
  170.       70E337F33333333337F3E0F33333333370E337F333FFFFF337F3E0F330000033
  171.       70E337F3377777F337F3E0F33000003370E337F3377777F337F3E0F330000033
  172.       70E337F3377777F337F3E0F33000003370E337F3377777F337F3E0F330000033
  173.       70E337F33777773337F3E0F33333333370E337F33333333337F3E0F333333333
  174.       70E337F33333333337F3E0FFFFFFFFFFF0E337FFFFFFFFFFF7F3E00000000000
  175.       00E33777777777777733EEEEEEEEEEEEEEE33333333333333333}
  176.     NumGlyphs = 2
  177.   end
  178.   object barMain: TStatusBar
  179.     Left = 0
  180.     Top = 356
  181.     Width = 473
  182.     Height = 19
  183.     Panels = <>
  184.     SimplePanel = True
  185.   end
  186.   object grpDirectory: TGroupBox
  187.     Left = 8
  188.     Top = 56
  189.     Width = 457
  190.     Height = 65
  191.     Caption = 'What to scan?'
  192.     TabOrder = 8
  193.     object radAllLocal: TRadioButton
  194.       Left = 8
  195.       Top = 14
  196.       Width = 121
  197.       Height = 17
  198.       Hint = 'Scan all local hard drives'
  199.       Caption = 'All &Local Hard Drives'
  200.       Checked = True
  201.       TabOrder = 0
  202.       TabStop = True
  203.       OnClick = radAllLocalClick
  204.     end
  205.     object radDirectory: TRadioButton
  206.       Left = 8
  207.       Top = 40
  208.       Width = 89
  209.       Height = 17
  210.       Hint = 'Start scanning from directory'
  211.       Caption = 'From &Directory:'
  212.       TabOrder = 1
  213.       OnClick = radAllLocalClick
  214.     end
  215.     object cbxDirectory: TComboBox
  216.       Left = 104
  217.       Top = 34
  218.       Width = 313
  219.       Height = 21
  220.       Hint = 'Directory to start from'
  221.       ItemHeight = 13
  222.       TabOrder = 2
  223.       Text = 'cbxDirectory'
  224.       OnExit = cbxDirectoryExit
  225.     end
  226.     object btnDirectory: TBitBtn
  227.       Left = 424
  228.       Top = 34
  229.       Width = 24
  230.       Height = 21
  231.       Hint = 'Browse for directory'
  232.       TabOrder = 3
  233.       OnClick = btnDirectoryClick
  234.       Glyph.Data = {
  235.         76010000424D7601000000000000760000002800000020000000100000000100
  236.         04000000000000010000120B0000120B00001000000000000000000000000000
  237.         800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  238.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
  239.         55555555FFFFFFFFFF55555000000000055555577777777775F55500B8B8B8B8
  240.         B05555775F555555575F550F0B8B8B8B8B05557F75F555555575550BF0B8B8B8
  241.         B8B0557F575FFFFFFFF7550FBF0000000000557F557777777777500BFBFBFBFB
  242.         0555577F555555557F550B0FBFBFBFBF05557F7F555555FF75550F0BFBFBF000
  243.         55557F75F555577755550BF0BFBF0B0555557F575FFF757F55550FB700007F05
  244.         55557F557777557F55550BFBFBFBFB0555557F555555557F55550FBFBFBFBF05
  245.         55557FFFFFFFFF7555550000000000555555777777777755555550FBFB055555
  246.         5555575FFF755555555557000075555555555577775555555555}
  247.       NumGlyphs = 2
  248.       Spacing = 0
  249.     end
  250.   end
  251.   object grpProgress: TGroupBox
  252.     Left = 40
  253.     Top = 200
  254.     Width = 457
  255.     Height = 65
  256.     Caption = 'Progress'
  257.     TabOrder = 0
  258.     Visible = False
  259.     object barProgress: TGauge
  260.       Left = 8
  261.       Top = 18
  262.       Width = 425
  263.       Height = 21
  264.       Color = clBlack
  265.       Font.Charset = DEFAULT_CHARSET
  266.       Font.Color = clBlack
  267.       Font.Height = -16
  268.       Font.Name = 'MS Sans Serif'
  269.       Font.Style = [fsBold]
  270.       ForeColor = clBlue
  271.       BackColor = clGrayText
  272.       ParentColor = False
  273.       ParentFont = False
  274.       Progress = 80
  275.     end
  276.     object lblCurFile: TLabel
  277.       Left = 8
  278.       Top = 43
  279.       Width = 425
  280.       Height = 13
  281.       AutoSize = False
  282.       Caption = 'lblCurFile'
  283.       Font.Charset = DEFAULT_CHARSET
  284.       Font.Color = clBlack
  285.       Font.Height = -12
  286.       Font.Name = 'MS Sans Serif'
  287.       Font.Style = []
  288.       ParentFont = False
  289.     end
  290.   end
  291.   object pnlLogo: TPanel
  292.     Left = 8
  293.     Top = 0
  294.     Width = 457
  295.     Height = 48
  296.     BevelInner = bvRaised
  297.     BevelOuter = bvLowered
  298.     Color = 11352361
  299.     TabOrder = 9
  300.     object imgLogo: TImage
  301.       Left = 2
  302.       Top = 2
  303.       Width = 453
  304.       Height = 44
  305.       Align = alClient
  306.       AutoSize = True
  307.       Center = True
  308.       Picture.Data = {<image000.bmp>}
  309.     end
  310.   end
  311.   object mnuMain: TMainMenu
  312.     Left = 208
  313.     Top = 72
  314.     object mnuAction: TMenuItem
  315.       Caption = '&Action!'
  316.       Hint = 'Action menu'
  317.       object mnuStartStop: TMenuItem
  318.         Caption = '&Start'
  319.         Hint = 'Start/Stop direcotry scanning'
  320.         ShortCut = 113
  321.         OnClick = btnStartStopClick
  322.       end
  323.       object mnuPause: TMenuItem
  324.         Caption = 'P&ause'
  325.         Enabled = False
  326.         Hint = 'Pause scanning'
  327.         ShortCut = 115
  328.         OnClick = btnPauseClick
  329.       end
  330.       object mnuN3: TMenuItem
  331.         Caption = '-'
  332.       end
  333.       object mnuViewRep: TMenuItem
  334.         Caption = '&View reports...'
  335.         Hint = 'View all saved repors'
  336.         ShortCut = 16466
  337.         OnClick = mnuViewRepClick
  338.       end
  339.       object mnuViewOther: TMenuItem
  340.         Caption = '&View other reports...'
  341.         Hint = 'View all saved repors'
  342.         OnClick = mnuViewOtherClick
  343.       end
  344.       object mnuClearRep: TMenuItem
  345.         Caption = '&Clear reports...'
  346.         Hint = 'Delete the reports file'
  347.         OnClick = mnuClearRepClick
  348.       end
  349.       object mnuPrint: TMenuItem
  350.         Caption = '&Print current report'
  351.         Hint = 'Print the report'
  352.         ShortCut = 16464
  353.         OnClick = mnuPrintClick
  354.       end
  355.       object mnuPrintersetup: TMenuItem
  356.         Caption = 'Printer &setup...'
  357.         Hint = 'Setup the printer'
  358.         OnClick = mnuPrintersetupClick
  359.       end
  360.       object mnuN4: TMenuItem
  361.         Caption = '-'
  362.       end
  363.       object mnuOptions: TMenuItem
  364.         Caption = '&Options...'
  365.         Hint = 'Open options dialog'
  366.         ShortCut = 16463
  367.         OnClick = btnOptionsClick
  368.       end
  369.       object mnuN1: TMenuItem
  370.         Caption = '-'
  371.       end
  372.       object mnuExit: TMenuItem
  373.         Caption = 'E&xit'
  374.         Hint = 'Exit InVircible'
  375.         OnClick = mnuExitClick
  376.       end
  377.     end
  378.     object mnuHelp: TMenuItem
  379.       Caption = '&Help'
  380.       Hint = 'Help menu'
  381.       object mnuTopics: TMenuItem
  382.         Caption = '&Help Topics'
  383.         Hint = 'Show help topics'
  384.         ShortCut = 112
  385.         OnClick = btnHelpClick
  386.       end
  387.       object mnuN2: TMenuItem
  388.         Caption = '-'
  389.       end
  390.       object mnuAbout: TMenuItem
  391.         Caption = '&About...'
  392.         Hint = 'About InVircible'
  393.         OnClick = mnuAboutClick
  394.       end
  395.     end
  396.   end
  397.   object dlgPrint: TPrintDialog
  398.     Left = 240
  399.     Top = 72
  400.   end
  401.   object dlgPrinterSetup: TPrinterSetupDialog
  402.     Left = 272
  403.     Top = 72
  404.   end
  405.   object mnuReport: TPopupMenu
  406.     Alignment = paCenter
  407.     OnPopup = mnuReportPopup
  408.     Left = 304
  409.     Top = 72
  410.     object mnuPopAddExc: TMenuItem
  411.       Caption = '&Add to exceptions list'
  412.       OnClick = mnuPopAddExcClick
  413.     end
  414.   end
  415.   object dlgLocation: TOpenDialog
  416.     DefaultExt = 'rpt'
  417.     Filter = 'Report files|*.rpt|All files|*.*'
  418.     Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist, ofShareAware, ofNoTestFileCreate]
  419.     Title = 'Report File'
  420.     Left = 336
  421.     Top = 72
  422.   end
  423. end
  424.