📄 report1.~dfm

📁 OPC 源程序示例
💻 ~DFM
📖 第 1 页 / 共 3 页
字号:
上一页 1 23
        MRUList.Items.Strings = (
          '')
        Title.Caption = #28070#30952'|1#'#20027#36724#25215#28201#24230'('#8451')|4#'
        Title.Color = clMoneyGreen
        Width = 35
      end
      item
        DisplayFormat = '0'
        EditButtons = <>
        FieldName = 'fdn48'
        Footer.Color = clYellow
        Footer.DisplayFormat = '0'
        Footer.ValueType = fvtAvg
        Footers = <>
        MRUList.Active = True
        MRUList.Items.Strings = (
          '')
        Title.Caption = #28070#30952'|2#'#20027#36724#25215#28201#24230'('#8451')|1#'
        Title.Color = clMoneyGreen
        Width = 35
      end
      item
        DisplayFormat = '0'
        EditButtons = <>
        FieldName = 'fdn49'
        Footer.Color = clYellow
        Footer.DisplayFormat = '0'
        Footer.ValueType = fvtAvg
        Footers = <>
        MRUList.Active = True
        MRUList.Items.Strings = (
          '')
        Title.Caption = #28070#30952'|2#'#20027#36724#25215#28201#24230'('#8451')|2#'
        Title.Color = clMoneyGreen
        Width = 35
      end
      item
        DisplayFormat = '0'
        EditButtons = <>
        FieldName = 'fdn50'
        Footer.Color = clYellow
        Footer.DisplayFormat = '0'
        Footer.ValueType = fvtAvg
        Footers = <>
        MRUList.Active = True
        MRUList.Items.Strings = (
          '')
        Title.Caption = #28070#30952'|2#'#20027#36724#25215#28201#24230'('#8451')|3#'
        Title.Color = clMoneyGreen
        Width = 35
      end
      item
        DisplayFormat = '0'
        EditButtons = <>
        FieldName = 'fdn51'
        Footer.Color = clYellow
        Footer.DisplayFormat = '0'
        Footer.ValueType = fvtAvg
        Footers = <>
        Title.Caption = #28070#30952'|2#'#20027#36724#25215#28201#24230'('#8451')|4#'
        Title.Color = clMoneyGreen
        Width = 35
      end
      item
        DisplayFormat = '0'
        EditButtons = <>
        FieldName = 'fdn52'
        Footer.Color = clYellow
        Footer.DisplayFormat = '0'
        Footer.ValueType = fvtAvg
        Footers = <>
        Title.Caption = #28070#30952'|R4'#37327' (t/h)'
        Title.Color = clMoneyGreen
        Width = 35
      end
      item
        DisplayFormat = '0'
        EditButtons = <>
        FieldName = 'fdn53'
        Footer.Color = clYellow
        Footer.DisplayFormat = '0'
        Footer.ValueType = fvtAvg
        Footers = <>
        MRUList.Active = True
        MRUList.Items.Strings = (
          '')
        Title.Caption = #28070#30952'|F2'#37327' (t/h)'
        Title.Color = clMoneyGreen
        Width = 35
      end
      item
        DisplayFormat = '0'
        EditButtons = <>
        FieldName = 'fdn54'
        Footer.Color = clYellow
        Footer.DisplayFormat = '0'
        Footer.ValueType = fvtAvg
        Footers = <>
        MRUList.Active = True
        MRUList.Items.Strings = (
          '')
        Title.Caption = #36896#29699'|1#'#20027#30005#26426#39057#29575'(Hz)'
        Title.Color = clMoneyGreen
        Width = 35
      end
      item
        DisplayFormat = '0'
        EditButtons = <>
        FieldName = 'fdn55'
        Footer.Color = clYellow
        Footer.DisplayFormat = '0'
        Footer.ValueType = fvtAvg
        Footers = <>
        MRUList.Active = True
        MRUList.Items.Strings = (
          '')
        Title.Caption = #36896#29699'|2#'#20027#30005#26426#39057#29575'(Hz)'
        Title.Color = clMoneyGreen
        Width = 35
      end
      item
        DisplayFormat = '0'
        EditButtons = <>
        FieldName = 'fdn56'
        Footer.Color = clYellow
        Footer.DisplayFormat = '0'
        Footer.ValueType = fvtAvg
        Footers = <>
        MRUList.Active = True
        MRUList.Items.Strings = (
          '')
        Title.Caption = #36896#29699'|'#29983#29699#37327'(t/t)'
        Title.Color = clMoneyGreen
        Width = 35
      end
      item
        DisplayFormat = '0'
        EditButtons = <>
        FieldName = 'fdn57'
        Footer.Color = clYellow
        Footer.DisplayFormat = '0'
        Footer.ValueType = fvtAvg
        Footers = <>
        Title.Caption = #37197#26009#31216#37327#21450#21464#26356#24773#20917'|'#19978#26009#37327'(t/h)'
        Title.Color = clMoneyGreen
        Width = 35
      end
      item
        DisplayFormat = '0'
        EditButtons = <>
        FieldName = 'fdn58'
        Footer.Color = clYellow
        Footer.DisplayFormat = '0'
        Footer.ValueType = fvtAvg
        Footers = <>
        MRUList.Active = True
        MRUList.Items.Strings = (
          '')
        Title.Caption = #37197#26009#31216#37327#21450#21464#26356#24773#20917'|SP1|'#37197#27604
        Title.Color = clMoneyGreen
        Width = 35
      end
      item
        DisplayFormat = '0'
        EditButtons = <>
        FieldName = 'fdn59'
        Footer.Color = clYellow
        Footer.DisplayFormat = '0'
        Footer.ValueType = fvtAvg
        Footers = <>
        MRUList.Active = True
        MRUList.Items.Strings = (
          '')
        Title.Caption = #37197#26009#31216#37327#21450#21464#26356#24773#20917'|SP1|'#27969#37327
        Title.Color = clMoneyGreen
        Width = 35
      end
      item
        DisplayFormat = '0'
        EditButtons = <>
        FieldName = 'fdn60'
        Footer.Color = clYellow
        Footer.DisplayFormat = '0'
        Footer.ValueType = fvtAvg
        Footers = <>
        MRUList.Active = True
        MRUList.Items.Strings = (
          '')
        Title.Caption = #37197#26009#31216#37327#21450#21464#26356#24773#20917'|SP2|'#37197#27604
        Title.Color = clMoneyGreen
        Width = 35
      end
      item
        DisplayFormat = '0'
        EditButtons = <>
        FieldName = 'fdn61'
        Footer.Color = clYellow
        Footer.DisplayFormat = '0'
        Footer.ValueType = fvtAvg
        Footers = <>
        MRUList.Active = True
        MRUList.Items.Strings = (
          '')
        Title.Caption = #37197#26009#31216#37327#21450#21464#26356#24773#20917'|SP2|'#27969#37327
        Title.Color = clMoneyGreen
        Width = 35
      end
      item
        DisplayFormat = '0'
        EditButtons = <>
        FieldName = 'fdn62'
        Footer.Color = clYellow
        Footer.DisplayFormat = '0'
        Footer.ValueType = fvtAvg
        Footers = <>
        MRUList.Active = True
        MRUList.Items.Strings = (
          '')
        Title.Caption = #37197#26009#31216#37327#21450#21464#26356#24773#20917'|SP3|'#37197#27604
        Title.Color = clMoneyGreen
        Width = 35
      end
      item
        DisplayFormat = '0'
        EditButtons = <>
        FieldName = 'fdn63'
        Footer.Color = clYellow
        Footer.DisplayFormat = '0'
        Footer.ValueType = fvtAvg
        Footers = <>
        MRUList.Active = True
        MRUList.Items.Strings = (
          '')
        Title.Caption = #37197#26009#31216#37327#21450#21464#26356#24773#20917'|SP3|'#27969#37327
        Title.Color = clMoneyGreen
        Width = 35
      end
      item
        DisplayFormat = '0'
        EditButtons = <>
        FieldName = 'fdn64'
        Footer.Color = clYellow
        Footer.DisplayFormat = '0'
        Footer.ValueType = fvtAvg
        Footers = <>
        MRUList.Active = True
        MRUList.Items.Strings = (
          '')
        Title.Caption = #37197#26009#31216#37327#21450#21464#26356#24773#20917'|SP4|'#37197#27604
        Title.Color = clMoneyGreen
        Width = 35
      end
      item
        DisplayFormat = '0'
        EditButtons = <>
        FieldName = 'fdn65'
        Footer.Color = clYellow
        Footer.DisplayFormat = '0'
        Footer.ValueType = fvtAvg
        Footers = <>
        MRUList.Active = True
        MRUList.Items.Strings = (
          '')
        Title.Caption = #37197#26009#31216#37327#21450#21464#26356#24773#20917'|SP4|'#27969#37327
        Title.Color = clMoneyGreen
        Width = 35
      end
      item
        DisplayFormat = '0'
        EditButtons = <>
        FieldName = 'fdn66'
        Footer.Color = clYellow
        Footer.DisplayFormat = '0'
        Footer.ValueType = fvtAvg
        Footers = <>
        MRUList.Active = True
        MRUList.Items.Strings = (
          '')
        Title.Caption = #37197#26009#31216#37327#21450#21464#26356#24773#20917'|SP5|'#37197#27604
        Title.Color = clMoneyGreen
        Width = 35
      end
      item
        DisplayFormat = '0'
        EditButtons = <>
        FieldName = 'fdn67'
        Footer.Color = clYellow
        Footer.DisplayFormat = '0'
        Footer.ValueType = fvtAvg
        Footers = <>
        MRUList.Active = True
        MRUList.Items.Strings = (
          '')
        Title.Caption = #37197#26009#31216#37327#21450#21464#26356#24773#20917'|SP5|'#27969#37327
        Title.Color = clMoneyGreen
        Width = 35
      end
      item
        DisplayFormat = '0'
        EditButtons = <>
        FieldName = 'fdn68'
        Footer.Color = clYellow
        Footer.DisplayFormat = '0'
        Footer.ValueType = fvtAvg
        Footers = <>
        MRUList.Active = True
        MRUList.Items.Strings = (
          '')
        Title.Caption = #37197#26009#31216#37327#21450#21464#26356#24773#20917'|SP6|'#27969#37327
        Title.Color = clMoneyGreen
        Width = 35
      end
      item
        DisplayFormat = '0'
        EditButtons = <>
        FieldName = 'fdn69'
        Footer.Color = clYellow
        Footer.DisplayFormat = '0'
        Footer.ValueType = fvtAvg
        Footers = <>
        MRUList.Active = True
        MRUList.Items.Strings = (
          '')
        Title.Caption = #37197#26009#31216#37327#21450#21464#26356#24773#20917'|SP6|'#37197#27604
        Title.Color = clMoneyGreen
        Width = 35
      end
      item
        DisplayFormat = '0'
        EditButtons = <>
        FieldName = 'fdn70'
        Footer.Color = clYellow
        Footer.DisplayFormat = '0'
        Footer.ValueType = fvtAvg
        Footers = <>
        MRUList.Active = True
        MRUList.Items.Strings = (
          '')
        Title.Caption = #37197#26009#31216#37327#21450#21464#26356#24773#20917'|SP7|'#37197#27604
        Title.Color = clMoneyGreen
        Width = 35
      end
      item
        DisplayFormat = '0'
        EditButtons = <>
        FieldName = 'fdn71'
        Footer.Color = clYellow
        Footer.DisplayFormat = '0'
        Footer.ValueType = fvtAvg
        Footers = <>
        MRUList.Active = True
        MRUList.Items.Strings = (
          '')
        Title.Caption = #37197#26009#31216#37327#21450#21464#26356#24773#20917'|SP7|'#27969#37327
        Title.Color = clMoneyGreen
        Width = 35
      end>
  end
  object ADOT_OneTimeDataValues: TADOTable
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    TableName = 'OneTimeDataValues'
    Left = 168
    Top = 8
  end
  object ADOT_TagName: TADOTable
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    TableName = 'sltagname'
    Left = 200
    Top = 8
  end
  object ADOConnection1: TADOConnection
    Connected = True
    ConnectionString = 
      'Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security In' +
      'fo=False;Initial Catalog=SlReportDB;Data Source=ZJXTZ-ZJJ\WINCC'
    LoginPrompt = False
    Provider = 'SQLOLEDB.1'
    Left = 240
    Top = 8
  end
  object PrintDBGridEh1: TPrintDBGridEh
    DBGridEh = DBGridEh1
    Options = []
    PageFooter.Font.Charset = DEFAULT_CHARSET
    PageFooter.Font.Color = clWindowText
    PageFooter.Font.Height = -11
    PageFooter.Font.Name = 'MS Sans Serif'
    PageFooter.Font.Style = []
    PageHeader.Font.Charset = DEFAULT_CHARSET
    PageHeader.Font.Color = clWindowText
    PageHeader.Font.Height = -11
    PageHeader.Font.Name = 'MS Sans Serif'
    PageHeader.Font.Style = []
    Units = MM
    Left = 272
    Top = 8
  end
  object DataSource1: TDataSource
    DataSet = ADOT_OneTimeDataValues
    Left = 144
    Top = 8
  end
end
上一页 1 23
💿 文件大小 647 K
👤 上传用户 jiajuncai
📂 所属分类 Delphi控件源码
🏷️ 相关标签

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

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