📄 uczxsd.~dfm

📁 已经投入使用的商业级管理系统：液化气管理系统。附带全部源码
💻 ~DFM
字号:
object FCZXSD: TFCZXSD
  Left = 204
  Top = 97
  Width = 725
  Height = 498
  Caption = #26597#25214#38144#21806#21333
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  KeyPreview = True
  OldCreateOrder = False
  Position = poMainFormCenter
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object DBGridEh1: TDBGridEh
    Left = 0
    Top = 97
    Width = 717
    Height = 374
    Hint = #21452#20987#36873#25321#35760#24405#65281
    Align = alClient
    DataSource = DataSource1
    Flat = False
    FooterColor = clInfoBk
    FooterFont.Charset = ANSI_CHARSET
    FooterFont.Color = clWindowText
    FooterFont.Height = -12
    FooterFont.Name = #23435#20307
    FooterFont.Style = []
    FooterRowCount = 1
    OptionsEh = [dghFixed3D, dghHighlightFocus, dghClearSelection, dghRowHighlight, dghDialogFind]
    ReadOnly = True
    SumList.Active = True
    TabOrder = 0
    TitleFont.Charset = ANSI_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -12
    TitleFont.Name = #23435#20307
    TitleFont.Style = []
    OnDblClick = DBGridEh1DblClick
    Columns = <
      item
        EditButtons = <>
        FieldName = #38376#24215#21517#31216
        Footers = <>
        Width = 65
      end
      item
        EditButtons = <>
        FieldName = #22238#21333#26102#38388
        Footers = <>
        Title.Caption = #38144#21806#26102#38388
        Width = 120
      end
      item
        EditButtons = <>
        FieldName = #35746#36135#21333#21495
        Footer.Alignment = taCenter
        Footer.DisplayFormat = #20849'0'#21333
        Footer.ValueType = fvtCount
        Footers = <>
        Width = 99
      end
      item
        EditButtons = <>
        FieldName = #23458#25143#32534#21495
        Footers = <>
        Width = 53
      end
      item
        EditButtons = <>
        FieldName = #23458#25143#21517#31216
        Footers = <>
        Width = 134
      end
      item
        EditButtons = <>
        FieldName = #23458#25143#31867#22411
        Footers = <>
        Width = 52
      end
      item
        EditButtons = <>
        FieldName = #37329#39069
        Footers = <>
        Width = 68
      end
      item
        EditButtons = <>
        FieldName = #36816#36153
        Footers = <>
        Width = 62
      end
      item
        EditButtons = <>
        FieldName = #24212#25910#37329#39069
        Footers = <>
        Width = 61
      end
      item
        EditButtons = <>
        FieldName = #22238#27454#37329#39069
        Footers = <>
        Width = 61
      end
      item
        EditButtons = <>
        FieldName = #23578#27424#37329#39069
        Footers = <>
        Width = 61
      end
      item
        EditButtons = <>
        FieldName = #22238#21333#25805#20316#21592
        Footers = <>
        Title.Caption = #25805#20316#21592
      end
      item
        EditButtons = <>
        FieldName = #35746#21333#31867#22411
        Footers = <>
        Width = 55
      end
      item
        EditButtons = <>
        FieldName = #26159#21542#21024#38500
        Footers = <>
        Width = 52
      end>
  end
  object ToolBar1: TToolBar
    Left = 0
    Top = 0
    Width = 717
    Height = 39
    ButtonHeight = 35
    ButtonWidth = 55
    Caption = 'ToolBar1'
    EdgeOuter = esRaised
    Images = MainForm.ImageList1
    ShowCaptions = True
    TabOrder = 1
    object TBTFIND: TToolButton
      Left = 0
      Top = 2
      Caption = '  '#26597#25214'  '
      ImageIndex = 21
      OnClick = TBTFINDClick
    end
    object ToolButton9: TToolButton
      Left = 55
      Top = 2
      Width = 8
      Caption = 'ToolButton9'
      ImageIndex = 21
      Style = tbsSeparator
    end
    object TBTPRINT: TToolButton
      Left = 63
      Top = 2
      Caption = #30830#23450
      ImageIndex = 22
      OnClick = TBTPRINTClick
    end
    object TBTEXIT: TToolButton
      Left = 118
      Top = 2
      Caption = #21462#28040
      ImageIndex = 3
      OnClick = TBTEXITClick
    end
  end
  object Panel1: TPanel
    Left = 0
    Top = 39
    Width = 717
    Height = 58
    Align = alTop
    BevelOuter = bvNone
    Color = clInfoBk
    TabOrder = 2
    object GroupBox1: TGroupBox
      Left = 0
      Top = 0
      Width = 717
      Height = 58
      Align = alClient
      Caption = #26597#25214#26465#20214
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 0
      object Label1: TLabel
        Left = 11
        Top = 16
        Width = 60
        Height = 12
        Caption = #38144#21806#26085#26399#65306
      end
      object Label2: TLabel
        Left = 273
        Top = 13
        Width = 60
        Height = 12
        Caption = #38144#21806#38376#24215#65306
      end
      object Label3: TLabel
        Left = 456
        Top = 14
        Width = 48
        Height = 12
        Caption = #25805#20316#21592#65306
      end
      object Label4: TLabel
        Left = 11
        Top = 37
        Width = 60
        Height = 12
        Caption = #23458#25143#32534#21495#65306
      end
      object Label5: TLabel
        Left = 273
        Top = 36
        Width = 60
        Height = 12
        Caption = #23458#25143#21517#31216#65306
      end
      object Label6: TLabel
        Left = 165
        Top = 14
        Width = 12
        Height = 12
        Caption = #33267
      end
      object DtTbegin: TDateTimePicker
        Left = 73
        Top = 10
        Width = 90
        Height = 20
        Date = 39158.702673981480000000
        Time = 39158.702673981480000000
        TabOrder = 0
      end
      object DtTend: TDateTimePicker
        Left = 180
        Top = 10
        Width = 90
        Height = 20
        Date = 39158.703139004630000000
        Time = 39158.703139004630000000
        TabOrder = 1
      end
      object CobMD: TComboBox
        Left = 331
        Top = 10
        Width = 124
        Height = 20
        Style = csDropDownList
        ItemHeight = 12
        TabOrder = 2
      end
      object CobCZY: TComboBox
        Left = 502
        Top = 10
        Width = 100
        Height = 20
        Style = csDropDownList
        ItemHeight = 12
        TabOrder = 3
      end
      object EdtKHBH: TEdit
        Left = 73
        Top = 33
        Width = 196
        Height = 20
        TabOrder = 4
        OnKeyDown = EdtKHBHKeyDown
      end
      object EdtKHMC: TEdit
        Left = 331
        Top = 33
        Width = 269
        Height = 20
        TabOrder = 5
        OnKeyDown = EdtKHMCKeyDown
      end
    end
  end
  object DataSource1: TDataSource
    DataSet = DM.ADOQ_CZXSD
    Left = 560
    Top = 8
  end
  object frxReport1: TfrxReport
    DataSet = frxDBDataset1
    DataSetName = 'frxDBDataset1'
    DotMatrixReport = False
    EngineOptions.MaxMemSize = 10000000
    IniFile = '\Software\Fast Reports'
    PreviewOptions.Buttons = [pbPrint, pbLoad, pbSave, pbExport, pbZoom, pbFind, pbOutline, pbPageSetup, pbTools, pbEdit, pbNavigator]
    PreviewOptions.Zoom = 1.000000000000000000
    PrintOptions.Printer = #32570#30465
    ReportOptions.CreateDate = 39089.534824490700000000
    ReportOptions.LastChange = 39089.534824490700000000
    ScriptLanguage = 'PascalScript'
    ScriptText.Strings = (
      'begin'
      ''
      'end.')
    Left = 504
    Top = 8
    Datasets = <
      item
        DataSet = frxDBDataset1
        DataSetName = 'frxDBDataset1'
      end>
    Variables = <>
    Style = <>
    object Page1: TfrxReportPage
      PaperWidth = 210.000000000000000000
      PaperHeight = 297.000000000000000000
      PaperSize = 9
      LeftMargin = 10.000000000000000000
      RightMargin = 10.000000000000000000
      TopMargin = 10.000000000000000000
      BottomMargin = 10.000000000000000000
      object ReportTitle1: TfrxReportTitle
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = []
        Height = 86.929190000000000000
        ParentFont = False
        Top = 18.897650000000000000
        Width = 718.110700000000000000
        object Memo1: TfrxMemoView
          Align = baCenter
          Left = 250.708823335000000000
          Top = 2.519686670000000000
          Width = 216.693053330000000000
          Height = 40.314986670000000000
          GroupIndex = 0
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -19
          Font.Name = #23435#20307
          Font.Style = [fsBold]
          HAlign = haCenter
          Memo.Strings = (
            #38376#24215#20449#24687)
          ParentFont = False
          VAlign = vaCenter
        end
      end
      object MasterData1: TfrxMasterData
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Arial'
        Font.Style = []
        Height = 18.897650000000000000
        ParentFont = False
        Top = 166.299320000000000000
        Width = 718.110700000000000000
        DataSet = frxDBDataset1
        DataSetName = 'frxDBDataset1'
        RowCount = 0
        object Memo2: TfrxMemoView
          Left = 3.779530000000000000
          Width = 58.582677170000000000
          Height = 18.897650000000000000
          GroupIndex = 0
          DataField = #38376#24215#32534#21495
          DataSet = frxDBDataset1
          DataSetName = 'frxDBDataset1'
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          Memo.Strings = (
            '[frxDBDataset1."'#38376#24215#32534#21495'"]')
        end
        object Memo3: TfrxMemoView
          Left = 62.252010000000000000
          Width = 162.519790000000000000
          Height = 18.897650000000000000
          GroupIndex = 0
          DataField = #38376#24215#21517#31216
          DataSet = frxDBDataset1
          DataSetName = 'frxDBDataset1'
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          Memo.Strings = (
            '[frxDBDataset1."'#38376#24215#21517#31216'"]')
        end
        object Memo4: TfrxMemoView
          Left = 225.551330000000000000
          Width = 185.196970000000000000
          Height = 18.897650000000000000
          GroupIndex = 0
          DataField = #22320#22336
          DataSet = frxDBDataset1
          DataSetName = 'frxDBDataset1'
          Frame.Typ = [ftLeft, ftRight, ftTop, ftBottom]
          Memo.Strings = (
            '[frxDBDataset1."'#22320#22336'"]')
        end
      end
      object PageFooter1: TfrxPageFooter
        Height = 71.811070000000000000
        Top = 385.512060000000000000
        Width = 718.110700000000000000
        object Memo5: TfrxMemoView
          Left = 105.826840000000000000
          Top = 21.417336670000000000
          Width = 206.614306670000000000
          Height = 30.236240000000000000
          GroupIndex = 0
          Memo.Strings = (
            '[COUNT(MasterData1)]')
        end
      end
      object Footer1: TfrxFooter
        Height = 117.165430000000000000
        Top = 207.874150000000000000
        Width = 718.110700000000000000
        object Memo6: TfrxMemoView
          Left = 204.094620000000000000
          Top = 37.795300000000000000
          Width = 206.614306670000000000
          Height = 30.236240000000000000
          GroupIndex = 0
          Memo.Strings = (
            '[COUNT(MasterData1)]')
        end
      end
    end
  end
  object frxDBDataset1: TfrxDBDataset
    UserName = 'frxDBDataset1'
    DataSource = DataSource1
    Left = 528
    Top = 8
  end
end
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -