📄 u_query.dfm
字号:
object F_query: TF_query
Left = 272
Top = 162
Width = 608
Height = 477
Caption = '查询'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
PixelsPerInch = 96
TextHeight = 13
object PageControl1: TPageControl
Left = 0
Top = 0
Width = 432
Height = 450
ActivePage = TabSheet1
Align = alClient
TabOrder = 0
object TabSheet1: TTabSheet
Caption = '设备失效记录'
object Label6: TLabel
Left = 16
Top = 8
Width = 60
Height = 13
Caption = '记录列表:'
end
object DBG_fail_rec: TDBGrid
Left = 0
Top = 32
Width = 424
Height = 390
Align = alBottom
Anchors = [akLeft, akTop, akRight, akBottom]
DataSource = DM_main.DS_fail_rec
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'ID'
Title.Caption = '记录编号'
Visible = True
end
item
Expanded = False
FieldName = 'FIND_DATE'
Title.Caption = '发现时间'
Visible = True
end
item
Expanded = False
FieldName = 'END_DATE'
Title.Caption = '维修结束时间'
Visible = True
end
item
Expanded = False
FieldName = 'DESCRIP'
Title.Caption = '故障描述'
Visible = True
end
item
Expanded = False
FieldName = 'MODE'
Title.Caption = '失效模式'
Visible = True
end
item
Expanded = False
FieldName = 'CAUSE'
Title.Caption = '失效原因'
Visible = True
end
item
Expanded = False
FieldName = 'CONSEQUENCE'
Title.Caption = '可能结果'
Visible = True
end
item
Expanded = False
FieldName = 'RESULT'
Title.Caption = '维修结果'
Visible = True
end
item
Expanded = False
FieldName = 'LAST_MODIFY'
Title.Caption = '最后修改'
Visible = True
end
item
Expanded = False
FieldName = 'PERSON'
Title.Caption = '记录人'
Visible = True
end
item
Expanded = False
FieldName = 'REMARK'
Title.Caption = '备注'
Visible = True
end>
end
object B_print_fail: TButton
Left = 320
Top = 2
Width = 75
Height = 25
Caption = '打印报表'
TabOrder = 1
end
end
object TabSheet2: TTabSheet
Caption = '工作位置变化'
ImageIndex = 1
object Label7: TLabel
Left = 16
Top = 8
Width = 60
Height = 13
Caption = '记录列表:'
end
object DBG_move_rec: TDBGrid
Left = 0
Top = 32
Width = 424
Height = 390
Align = alBottom
Anchors = [akLeft, akTop, akRight, akBottom]
DataSource = DM_main.DS_move_rec
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'ID'
Title.Caption = '记录编号'
Visible = True
end
item
Expanded = False
FieldName = 'MOVE_DATE'
Title.Caption = '移动时间'
Visible = True
end
item
Expanded = False
FieldName = 'OPERATION'
Title.Caption = '操作'
Visible = True
end
item
Expanded = False
FieldName = 'WORKPLACE'
Title.Caption = '新的工作位置'
Visible = True
end
item
Expanded = False
FieldName = 'LAST_MODIFY'
Title.Caption = '最后修改'
Visible = True
end
item
Expanded = False
FieldName = 'PERSON'
Title.Caption = '记录人'
Visible = True
end
item
Expanded = False
FieldName = 'REMARK'
Title.Caption = '备注'
Visible = True
end>
end
object B_print_move: TButton
Left = 320
Top = 2
Width = 75
Height = 25
Caption = '打印报表'
TabOrder = 1
end
end
object TabSheet3: TTabSheet
Caption = '可靠性报表'
ImageIndex = 2
object Label8: TLabel
Left = 32
Top = 24
Width = 60
Height = 13
AutoSize = False
Caption = '设备名称:'
end
object Label9: TLabel
Left = 32
Top = 48
Width = 60
Height = 13
AutoSize = False
Caption = '购买日期:'
end
object Label10: TLabel
Left = 32
Top = 96
Width = 60
Height = 13
AutoSize = False
Caption = '工程特性:'
end
object Label11: TLabel
Left = 32
Top = 72
Width = 48
Height = 13
AutoSize = False
Caption = '供货商:'
end
object Label12: TLabel
Left = 32
Top = 208
Width = 60
Height = 13
AutoSize = False
Caption = '设备边界:'
end
object Label13: TLabel
Left = 232
Top = 24
Width = 60
Height = 13
AutoSize = False
Caption = '分布类型:'
end
object Label14: TLabel
Left = 232
Top = 48
Width = 60
Height = 13
AutoSize = False
Caption = '分布函数:'
end
object Label15: TLabel
Left = 232
Top = 120
Width = 36
Height = 13
AutoSize = False
Caption = '参数:'
end
object Label16: TLabel
Left = 232
Top = 96
Width = 60
Height = 13
AutoSize = False
Caption = '平均寿命:'
end
object DBText1: TDBText
Left = 104
Top = 24
Width = 65
Height = 17
DataField = 'NAME'
DataSource = DM_main.DS_reliability
end
object DBText2: TDBText
Left = 104
Top = 48
Width = 65
Height = 17
DataField = 'BUY_DATE'
DataSource = DM_main.DS_reliability
end
object DBText3: TDBText
Left = 104
Top = 72
Width = 65
Height = 17
DataField = 'MERCHANT'
DataSource = DM_main.DS_reliability
end
object DBText4: TDBText
Left = 32
Top = 112
Width = 177
Height = 89
DataField = 'ENG_CHAR'
DataSource = DM_main.DS_reliability
WordWrap = True
end
object DBText5: TDBText
Left = 296
Top = 24
Width = 65
Height = 17
DataField = 'DISTRIBUTION'
DataSource = DM_main.DS_reliability
end
object DBText6: TDBText
Left = 240
Top = 64
Width = 145
Height = 25
DataField = 'FORMULA'
DataSource = DM_main.DS_reliability
WordWrap = True
end
object DBText7: TDBText
Left = 296
Top = 96
Width = 65
Height = 17
DataField = 'MTTF'
DataSource = DM_main.DS_reliability
end
object DBText8: TDBText
Left = 296
Top = 144
Width = 65
Height = 17
DataField = 'R1'
DataSource = DM_main.DS_reliability
end
object DBText9: TDBText
Left = 296
Top = 168
Width = 65
Height = 17
DataField = 'R2'
DataSource = DM_main.DS_reliability
end
object DBText10: TDBText
Left = 296
Top = 192
Width = 65
Height = 17
DataField = 'R3'
DataSource = DM_main.DS_reliability
end
object Label17: TLabel
Left = 256
Top = 144
Width = 19
Height = 13
Caption = 'P1='
end
object Label18: TLabel
Left = 256
Top = 168
Width = 19
Height = 13
Caption = 'P2='
end
object Label19: TLabel
Left = 256
Top = 192
Width = 19
Height = 13
Caption = 'P3='
end
object DBImage1: TDBImage
Left = 0
Top = 224
Width = 424
Height = 198
Align = alBottom
Anchors = [akLeft, akTop, akRight, akBottom]
BorderStyle = bsNone
DataField = 'BOUNDARY'
DataSource = DM_main.DS_reliability
Stretch = True
TabOrder = 0
end
end
end
object GroupBox1: TGroupBox
Left = 432
Top = 0
Width = 168
Height = 450
Align = alRight
Caption = '查询条件'
TabOrder = 1
object Label1: TLabel
Left = 16
Top = 24
Width = 60
Height = 13
AutoSize = False
Caption = '工作位置:'
end
object Label2: TLabel
Left = 16
Top = 72
Width = 60
Height = 13
AutoSize = False
Caption = '时间范围:'
end
object Label3: TLabel
Left = 24
Top = 92
Width = 12
Height = 13
AutoSize = False
Caption = '从'
end
object Label4: TLabel
Left = 24
Top = 116
Width = 12
Height = 13
AutoSize = False
Caption = '至'
end
object Label5: TLabel
Left = 16
Top = 144
Width = 60
Height = 13
AutoSize = False
Caption = '设备列表:'
end
object i_workplace: TEdit
Left = 24
Top = 40
Width = 121
Height = 21
TabOrder = 0
OnKeyDown = i_workplaceKeyDown
end
object i_start_time: TDateTimePicker
Left = 40
Top = 88
Width = 105
Height = 21
CalAlignment = dtaLeft
Date = 37279.4310106134
Time = 37279.4310106134
DateFormat = dfShort
DateMode = dmComboBox
Kind = dtkDate
ParseInput = False
TabOrder = 1
end
object i_end_time: TDateTimePicker
Left = 40
Top = 112
Width = 105
Height = 21
CalAlignment = dtaLeft
Date = 37279.4310106134
Time = 37279.4310106134
DateFormat = dfShort
DateMode = dmComboBox
Kind = dtkDate
ParseInput = False
TabOrder = 2
end
object DBG_equip: TDBGrid
Left = 2
Top = 160
Width = 164
Height = 288
Align = alBottom
DataSource = DM_main.DS_q_equip
TabOrder = 3
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'EQUIP'
Title.Caption = '设备编号'
Visible = True
end>
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -