unitmain.dfm

来自「绿色衡器称重系统(串口）」· DFM 代码 · 共 1,003 行 · 第 1/3 页

          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
          333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
          0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
          07333337F33333337F333330FFFFFFFF07333337F33333337F333330FFFFFFFF
          07333FF7F33333337FFFBBB0FFFFFFFF0BB37777F3333333777F3BB0FFFFFFFF
          0BBB3777F3333FFF77773330FFFF000003333337F333777773333330FFFF0FF0
          33333337F3337F37F3333330FFFF0F0B33333337F3337F77FF333330FFFF003B
          B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
          3BB33773333773333773B333333B3333333B7333333733333337}
        Layout = blGlyphTop
        NumGlyphs = 2
      end
      object BitBtn2: TBitBtn
        Left = 66
        Top = 461
        Width = 47
        Height = 39
        Caption = #21024#38500
        TabOrder = 4
        OnClick = BitBtn2Click
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000130B0000130B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          333333333333333333FF33333333333330003333333333333777333333333333
          300033FFFFFF3333377739999993333333333777777F3333333F399999933333
          3300377777733333337733333333333333003333333333333377333333333333
          3333333333333333333F333333333333330033333F33333333773333C3333333
          330033337F3333333377333CC3333333333333F77FFFFFFF3FF33CCCCCCCCCC3
          993337777777777F77F33CCCCCCCCCC399333777777777737733333CC3333333
          333333377F33333333FF3333C333333330003333733333333777333333333333
          3000333333333333377733333333333333333333333333333333}
        Layout = blGlyphTop
        NumGlyphs = 2
      end
      object BitBtn3: TBitBtn
        Left = 112
        Top = 461
        Width = 47
        Height = 39
        Caption = #20462#25913
        TabOrder = 5
        OnClick = BitBtn3Click
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000120B0000120B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000
          000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F
          00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF
          F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B
          0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F
          FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF
          FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F
          0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF
          00333377737FFFFF773333303300000003333337337777777333}
        Layout = blGlyphTop
        NumGlyphs = 2
      end
      object BitBtn4: TBitBtn
        Left = 158
        Top = 461
        Width = 47
        Height = 39
        Caption = #21462#28040
        TabOrder = 6
        OnClick = BitBtn4Click
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000130B0000130B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
          3333333777333777FF33339993707399933333773337F3777FF3399933000339
          9933377333777F3377F3399333707333993337733337333337FF993333333333
          399377F33333F333377F993333303333399377F33337FF333373993333707333
          333377F333777F333333993333101333333377F333777F3FFFFF993333000399
          999377FF33777F77777F3993330003399993373FF3777F37777F399933000333
          99933773FF777F3F777F339993707399999333773F373F77777F333999999999
          3393333777333777337333333999993333333333377777333333}
        Layout = blGlyphTop
        NumGlyphs = 2
      end
      object BitBtn5: TBitBtn
        Left = 204
        Top = 461
        Width = 47
        Height = 39
        Caption = #20445#23384
        TabOrder = 7
        OnClick = BitBtn5Click
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000130B0000130B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333330070
          7700333333337777777733333333008088003333333377F73377333333330088
          88003333333377FFFF7733333333000000003FFFFFFF77777777000000000000
          000077777777777777770FFFFFFF0FFFFFF07F3333337F3333370FFFFFFF0FFF
          FFF07F3FF3FF7FFFFFF70F00F0080CCC9CC07F773773777777770FFFFFFFF039
          99337F3FFFF3F7F777F30F0000F0F09999937F7777373777777F0FFFFFFFF999
          99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339
          99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999
          93337FFFF7737777733300000033333333337777773333333333}
        Layout = blGlyphTop
        NumGlyphs = 2
      end
    end
  end
  object MainMenu1: TMainMenu
    Left = 432
    Top = 284
    object N1: TMenuItem
      Caption = #31995#32479#31649#29702
      object N2: TMenuItem
        Caption = #23494#30721#20462#25913
        OnClick = N2Click
      end
      object N32: TMenuItem
        Caption = '-'
      end
      object N3: TMenuItem
        Caption = #29992#25143#31649#29702
        OnClick = N3Click
      end
      object N11: TMenuItem
        Caption = '-'
      end
      object N26: TMenuItem
        Caption = #25968#25454#24211#31649#29702
        object N27: TMenuItem
          Caption = #22791#20221
          OnClick = N27Click
        end
        object N28: TMenuItem
          Caption = #24674#22797
          OnClick = N28Click
        end
      end
      object N25: TMenuItem
        Caption = '-'
      end
      object N10: TMenuItem
        Caption = #25509#21475#35774#32622
        OnClick = N10Click
      end
      object N4: TMenuItem
        Caption = '-'
      end
      object N5: TMenuItem
        Caption = #36864#20986#31995#32479
        OnClick = N5Click
      end
    end
    object N6: TMenuItem
      Caption = #22522#26412#20449#24687
      object N33: TMenuItem
        Caption = #20844#21496#21517#31216
        OnClick = N33Click
      end
      object N34: TMenuItem
        Caption = '-'
      end
      object N7: TMenuItem
        Caption = #21333#20301#20449#24687
        OnClick = N7Click
      end
      object N8: TMenuItem
        Caption = #36135#21697#20449#24687
        OnClick = N8Click
      end
      object N9: TMenuItem
        Caption = #36710#29260#21069#32512#20449#24687
        OnClick = N9Click
      end
      object N12: TMenuItem
        Caption = #36710#29260#21495#20449#24687
        OnClick = N12Click
      end
      object N14: TMenuItem
        Caption = '-'
      end
      object N13: TMenuItem
        Caption = #36710#36742#21382#21490#31649#29702
        OnClick = N13Click
      end
    end
    object N15: TMenuItem
      Caption = #25253#34920
      object N17: TMenuItem
        Caption = #27719#24635#25253#34920
        object N16: TMenuItem
          Caption = #31216#37325#27719#24635#25253#34920
          OnClick = N16Click
        end
      end
    end
    object N29: TMenuItem
      Caption = #33258#21160#21551#21160
      object N30: TMenuItem
        AutoCheck = True
        Caption = #24320#21551
        GroupIndex = 2
        RadioItem = True
        OnClick = N30Click
      end
      object N31: TMenuItem
        AutoCheck = True
        Caption = #20851#38381
        GroupIndex = 2
        RadioItem = True
        OnClick = N31Click
      end
    end
    object N18: TMenuItem
      Caption = #24110#21161
      object N19: TMenuItem
        Caption = #20851#20110
        OnClick = N19Click
      end
      object N20: TMenuItem
        Caption = '-'
      end
      object N22: TMenuItem
        Caption = #26174#31034#21161#25163
        OnClick = N22Click
      end
      object N23: TMenuItem
        Caption = #38544#34255#21161#25163
        OnClick = N23Click
      end
      object N35: TMenuItem
        AutoCheck = True
        Caption = #21551#21160#19981#20877#26174#31034#21161#25163
        OnClick = N35Click
      end
      object N24: TMenuItem
        Caption = '-'
      end
      object N21: TMenuItem
        Caption = #31995#32479#20449#24687
        OnClick = N21Click
      end
    end
  end
  object Timer1: TTimer
    Interval = 200
    OnTimer = Timer1Timer
    Left = 404
    Top = 282
  end
  object adoConn: TADOConnection
    KeepConnection = False
    LoginPrompt = False
    Mode = cmShareDenyNone
    Provider = 'Microsoft.Jet.OLEDB.4.0'
    Left = 403
    Top = 203
  end
  object adoNick: TADOQuery
    Connection = adoConn
    Parameters = <>
    Left = 403
    Top = 229
  end
  object DataSource1: TDataSource
    DataSet = ADOTable1
    Left = 457
    Top = 201
  end
  object adoQDict: TADOQuery
    AutoCalcFields = False
    Connection = adoConn
    EnableBCD = False
    Parameters = <>
    Prepared = True
    Left = 431
    Top = 229
  end
  object adoTemp: TADOQuery
    Connection = adoConn
    Parameters = <>
    Left = 459
    Top = 229
  end
  object ADOTable1: TADOTable
    Connection = adoConn
    CursorType = ctStatic
    BeforePost = ADOTable1BeforePost
    AfterPost = ADOTable1AfterPost
    TableName = 'uMaster'
    Left = 431
    Top = 201
  end
  object RvProject1: TRvProject
    Engine = RvSystem1
    ProjectFile = 'DongYaRep.rav'
    Left = 403
    Top = 255
  end
  object RvSystem1: TRvSystem
    TitleSetup = 'Output Options'
    TitleStatus = 'Report Status'
    TitlePreview = 'Report Preview'
    SystemSetups = [ssAllowCopies, ssAllowCollate, ssAllowDuplex, ssAllowDestPreview, ssAllowDestPrinter, ssAllowDestFile, ssAllowPrinterSetup, ssAllowPreviewSetup]
    DefaultDest = rdPrinter
    SystemFiler.StatusFormat = 'Generating page %p'
    SystemPreview.ZoomFactor = 100.000000000000000000
    SystemPrinter.ScaleX = 100.000000000000000000
    SystemPrinter.ScaleY = 100.000000000000000000
    SystemPrinter.StatusFormat = 'Printing page %p'
    SystemPrinter.Title = 'ReportPrinter Report'
    SystemPrinter.UnitsFactor = 1.000000000000000000
    Left = 431
    Top = 255
  end
  object RvDataSetConnection1: TRvDataSetConnection
    RuntimeVisibility = rtDeveloper
    DataSet = ADOTable1
    Left = 459
    Top = 255
  end
  object PopupMenu1: TPopupMenu
    Left = 377
    Top = 205
    object N36: TMenuItem
      Caption = #20462#25913#26174#31034#23383#27573
      OnClick = N36Click
    end
  end
end