📄 report1.~dfm

📁 OPC 源程序示例
💻 ~DFM
📖 第 1 页 / 共 3 页
字号:
12 3 下一页
object frmreprt1: Tfrmreprt1
  Left = 235
  Top = 105
  BorderIcons = [biSystemMenu]
  BorderStyle = bsSingle
  Caption = #31446#28809#25253#34920#26597#35810
  ClientHeight = 724
  ClientWidth = 1239
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  WindowState = wsMaximized
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 480
    Top = 16
    Width = 256
    Height = 33
    Caption = #31446#28809#25253#34920#26597#35810#31995#32479
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -32
    Font.Name = #26999#20307'_GB2312'
    Font.Style = []
    ParentFont = False
  end
  object Label2: TLabel
    Left = 939
    Top = 28
    Width = 119
    Height = 16
    Caption = #26597#35810#26102#38388#36873#25321#65306
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -16
    Font.Name = #26999#20307'_GB2312'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object DBGridEh1: TDBGridEh
    Left = 2
    Top = 64
    Width = 1279
    Height = 449
    Align = alCustom
    DataSource = DataSource1
    EvenRowColor = clScrollBar
    Flat = True
    FooterColor = clWindow
    FooterFont.Charset = DEFAULT_CHARSET
    FooterFont.Color = clWindowText
    FooterFont.Height = -11
    FooterFont.Name = 'MS Sans Serif'
    FooterFont.Style = []
    FooterRowCount = 1
    ReadOnly = True
    STFilter.Local = True
    SumList.Active = True
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    UseMultiTitle = True
    Columns = <
      item
        EditButtons = <>
        FieldName = 'sj'
        Footer.Color = clYellow
        Footer.Value = #24179#22343#20540
        Footer.ValueType = fvtStaticText
        Footers = <>
        Title.Caption = #26102#38388
        Title.Color = clMoneyGreen
        Width = 80
      end
      item
        DisplayFormat = '0'
        EditButtons = <>
        FieldName = 'fdn1'
        Footer.Color = clYellow
        Footer.DisplayFormat = '0'
        Footer.ValueType = fvtAvg
        Footers = <>
        MRUList.Active = True
        MRUList.Items.Strings = (
          '')
        PickList.Strings = (
          'fdn1')
        Title.Caption = #28809#20307#28201#24230#65288#8451#65289'|'#28895#32617
        Title.Color = clMoneyGreen
        Width = 35
      end
      item
        DisplayFormat = '0'
        EditButtons = <>
        FieldName = 'fdn2'
        Footer.Color = clYellow
        Footer.DisplayFormat = '0'
        Footer.ValueType = fvtAvg
        Footers = <>
        MRUList.Active = True
        Title.Caption = #28809#20307#28201#24230#65288#8451#65289'| '#28809#34006' | '#19996
        Title.Color = clMoneyGreen
        Width = 35
      end
      item
        DisplayFormat = '0'
        EditButtons = <>
        FieldName = 'fdn3'
        Footer.Color = clYellow
        Footer.DisplayFormat = '0'
        Footer.ValueType = fvtAvg
        Footers = <>
        MRUList.Active = True
        MRUList.Items.Strings = (
          '')
        Title.Caption = #28809#20307#28201#24230#65288#8451#65289'| '#28809#34006' | '#35199
        Title.Color = clMoneyGreen
        Width = 35
      end
      item
        DisplayFormat = '0'
        EditButtons = <>
        FieldName = 'fdn4'
        Footer.Color = clYellow
        Footer.DisplayFormat = '0'
        Footer.ValueType = fvtAvg
        Footers = <>
        MRUList.Active = True
        MRUList.Items.Strings = (
          '')
        Title.Caption = #28809#20307#28201#24230#65288#8451#65289'| '#28809#36523#19978#37096'|'#19996#21335
        Title.Color = clMoneyGreen
        Width = 35
      end
      item
        DisplayFormat = '0'
        EditButtons = <>
        FieldName = 'fdn5'
        Footer.Color = clYellow
        Footer.DisplayFormat = '0'
        Footer.ValueType = fvtAvg
        Footers = <>
        MRUList.Active = True
        MRUList.Items.Strings = (
          '')
        Title.Caption = #28809#20307#28201#24230#65288#8451#65289'| '#28809#36523#19978#37096'|'#35199#21335
        Title.Color = clMoneyGreen
        Width = 35
      end
      item
        DisplayFormat = '0'
        EditButtons = <>
        FieldName = 'fdn6'
        Footer.Color = clYellow
        Footer.DisplayFormat = '0'
        Footer.ValueType = fvtAvg
        Footers = <>
        Increment = 2.000000000000000000
        MRUList.Active = True
        MRUList.Items.Strings = (
          '')
        Title.Caption = #28809#20307#28201#24230#65288#8451#65289'| '#28809#36523#19978#37096'|'#19996#21271
        Title.Color = clMoneyGreen
        Width = 35
      end
      item
        DisplayFormat = '0'
        EditButtons = <>
        FieldName = 'fdn7'
        Footer.Color = clYellow
        Footer.DisplayFormat = '0'
        Footer.ValueType = fvtAvg
        Footers = <>
        MRUList.Active = True
        MRUList.Items.Strings = (
          '')
        Title.Caption = #28809#20307#28201#24230#65288#8451#65289'| '#28809#36523#19978#37096'| '#35199#21271
        Title.Color = clMoneyGreen
        Width = 35
      end
      item
        DisplayFormat = '0'
        EditButtons = <>
        FieldName = 'fdn8'
        Footer.Color = clYellow
        Footer.ValueType = fvtAvg
        Footers = <>
        Title.Caption = #28809#20307#28201#24230#65288#8451#65289'| '#28809#36523#19979#37096'|'#19996#21335
        Title.Color = clMoneyGreen
        Width = 35
      end
      item
        DisplayFormat = '0'
        EditButtons = <>
        FieldName = 'fdn9'
        Footer.Color = clYellow
        Footer.ValueType = fvtAvg
        Footers = <>
        Title.Caption = #28809#20307#28201#24230#65288#8451#65289'| '#28809#36523#19979#37096'|'#35199#21335
        Title.Color = clMoneyGreen
        Width = 35
      end
      item
        DisplayFormat = '0'
        EditButtons = <>
        FieldName = 'fdn10'
        Footer.Color = clYellow
        Footer.ValueType = fvtAvg
        Footers = <>
        Title.Caption = #28809#20307#28201#24230#65288#8451#65289'| '#28809#36523#19979#37096'|'#19996#21271
        Title.Color = clMoneyGreen
        Width = 35
      end
      item
        DisplayFormat = '0'
        EditButtons = <>
        FieldName = 'fdn11'
        Footer.Color = clYellow
        Footer.ValueType = fvtAvg
        Footers = <>
        Title.Caption = #28809#20307#28201#24230#65288#8451#65289'| '#28809#36523#19979#37096'| '#35199#21271
        Title.Color = clMoneyGreen
        Width = 35
      end
      item
        DisplayFormat = '0'
        EditButtons = <>
        FieldName = 'fdn12'
        Footer.Color = clYellow
        Footer.DisplayFormat = '0'
        Footer.ValueType = fvtAvg
        Footers = <>
        MRUList.Active = True
        MRUList.Items.Strings = (
          '')
        Title.Caption = #29123#28903#23460'| '#28201#24230#65288#8451#65289' | '#19996#21335
        Title.Color = clMoneyGreen
        Width = 35
      end
      item
        DisplayFormat = '0'
        EditButtons = <>
        FieldName = 'fdn13'
        Footer.Color = clYellow
        Footer.DisplayFormat = '0'
        Footer.ValueType = fvtAvg
        Footers = <>
        MRUList.Active = True
        MRUList.Items.Strings = (
          '')
        Title.Caption = #29123#28903#23460'| '#28201#24230#65288#8451#65289' | '#35199#21335
        Title.Color = clMoneyGreen
        Width = 35
      end
      item
        DisplayFormat = '0'
        EditButtons = <>
        FieldName = 'fdn14'
        Footer.Color = clYellow
        Footer.DisplayFormat = '0'
        Footer.ValueType = fvtAvg
        Footers = <>
        MRUList.Active = True
        MRUList.Items.Strings = (
          '')
        Title.Caption = #29123#28903#23460'| '#28201#24230#65288#8451#65289' | '#19996#21271
        Title.Color = clMoneyGreen
        Width = 35
      end
      item
        DisplayFormat = '0'
        EditButtons = <>
        FieldName = 'fdn15'
        Footer.Color = clYellow
        Footer.DisplayFormat = '0'
        Footer.ValueType = fvtAvg
        Footers = <>
        MRUList.Active = True
        MRUList.Items.Strings = (
          '')
        Title.Caption = #29123#28903#23460'| '#28201#24230#65288#8451#65289' | '#35199#21271
        Title.Color = clMoneyGreen
        Width = 35
      end
      item
        DisplayFormat = '0'
        EditButtons = <>
        FieldName = 'fdn16'
        Footer.Color = clYellow
        Footer.DisplayFormat = '0'
        Footer.ValueType = fvtAvg
        Footers = <>
        MRUList.Active = True
        MRUList.Items.Strings = (
          '')
        Title.Caption = #29123#28903#23460'| '#21387#21147'(KPa) | '#21335
        Title.Color = clMoneyGreen
        Width = 35
      end
      item
        DisplayFormat = '0'
        EditButtons = <>
        FieldName = 'fdn17'
        Footer.Color = clYellow
        Footer.DisplayFormat = '0'
        Footer.ValueType = fvtAvg
        Footers = <>
        MRUList.Active = True
        MRUList.Items.Strings = (
          '')
        Title.Caption = #29123#28903#23460'| '#21387#21147'(KPa) | '#21271
        Title.Color = clMoneyGreen
        Width = 35
      end
      item
        DisplayFormat = '0'
        EditButtons = <>
        FieldName = 'fdn18'
        Footer.Color = clYellow
        Footer.DisplayFormat = '0'
        Footer.ValueType = fvtAvg
        Footers = <>
        MRUList.Active = True
        MRUList.Items.Strings = (
          '')
        Title.Caption = #39640#28809#29028#27668' | '#21387#21147#65288'KPa'#65289'| '#24635#31649
        Title.Color = clMoneyGreen
        Width = 35
      end
      item
        DisplayFormat = '0'
        EditButtons = <>
        FieldName = 'fdn19'
        Footer.Color = clYellow
        Footer.DisplayFormat = '0'
        Footer.ValueType = fvtAvg
        Footers = <>
        MRUList.Active = True
        MRUList.Items.Strings = (
          '')
        Title.Caption = #39640#28809#29028#27668' | '#21387#21147#65288'KPa'#65289'| '#21335#25903
        Title.Color = clMoneyGreen
        Width = 35
      end
      item
        DisplayFormat = '0'
        EditButtons = <>
        FieldName = 'fdn20'
        Footer.Color = clYellow
        Footer.DisplayFormat = '0'
        Footer.ValueType = fvtAvg
        Footers = <>
        MRUList.Active = True
        MRUList.Items.Strings = (
          '')
        Title.Caption = #39640#28809#29028#27668' | '#21387#21147#65288'KPa'#65289'| '#21271#25903
        Title.Color = clMoneyGreen
        Width = 35
      end
      item
        DisplayFormat = '0'
        EditButtons = <>
        FieldName = 'fdn21'
        Footer.Color = clYellow
        Footer.DisplayFormat = '0'
        Footer.ValueType = fvtAvg
        Footers = <>
        MRUList.Active = True
        MRUList.Items.Strings = (
          '')
        Title.Caption = #39640#28809#29028#27668' | '#27969#37327#65288'm3/h'#65289'| '#24635#31649
        Title.Color = clMoneyGreen
        Width = 35
      end
      item
        DisplayFormat = '0'
        EditButtons = <>
        FieldName = 'fdn22'
        Footer.Color = clYellow
        Footer.DisplayFormat = '0'
        Footer.ValueType = fvtAvg
        Footers = <>
        MRUList.Active = True
        MRUList.Items.Strings = (
          '')
        Title.Caption = #39640#28809#29028#27668' | '#27969#37327#65288'm3/h'#65289'| '#21335#25903#31649
        Title.Color = clMoneyGreen
        Width = 35
      end
      item
        DisplayFormat = '0'
        EditButtons = <>
        FieldName = 'fdn23'
        Footer.Color = clYellow
        Footer.DisplayFormat = '0'
        Footer.ValueType = fvtAvg
        Footers = <>
        MRUList.Active = True
12 3 下一页
💿 文件大小 647 K
👤 上传用户 jiajuncai
📂 所属分类 Delphi控件源码
🏷️ 相关标签

#OPC #源程序
⌨️ 快捷键说明

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