📄 ubld_lr.dfm
字号:
DataField = #21457#26009#20154
DataSource = DataSource2
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ReadOnly = True
TabOrder = 2
end
object DBEdit7: TDBEdit
Left = 656
Top = 72
Width = 129
Height = 24
DataField = #34917#26009#20154
DataSource = DataSource2
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ReadOnly = True
TabOrder = 3
end
object DBMemo1: TDBMemo
Left = 64
Top = 72
Width = 145
Height = 25
DataField = #22791#27880
DataSource = DataSource2
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ReadOnly = True
ScrollBars = ssVertical
TabOrder = 4
end
object DBEdit8: TDBEdit
Left = 408
Top = 88
Width = 129
Height = 24
DataField = #26085#26399
DataSource = DataSource2
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 5
Visible = False
end
object DBComboBox1: TDBComboBox
Left = 464
Top = 72
Width = 129
Height = 24
DataField = #39046#26009#37096#38376
DataSource = DataSource2
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ItemHeight = 16
ParentFont = False
ReadOnly = True
TabOrder = 6
end
object DBEdit3: TDBEdit
Left = 272
Top = 48
Width = 121
Height = 24
DataField = #34917#26009#21333#21495
DataSource = DataSource2
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ReadOnly = True
TabOrder = 7
end
object DBEdit2: TDBEdit
Left = 272
Top = 72
Width = 121
Height = 24
DataField = #24037#31243#21333#21495
DataSource = DataSource2
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ReadOnly = True
TabOrder = 8
end
object DBEdit5: TDBEdit
Left = 568
Top = 88
Width = 121
Height = 21
DataField = #34917#21457#26085#26399
DataSource = DataSource2
TabOrder = 9
Visible = False
end
object dtprq: TRzDBDateTimePicker
Left = 656
Top = 48
Width = 129
Height = 24
Date = 39153.443650000000000000
Time = 39153.443650000000000000
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 10
DataField = #34917#21457#26085#26399
DataSource = DataSource2
ReadOnly = True
end
end
object ADOQuery1: TADOQuery
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select * from view_bld')
Left = 496
Top = 216
object ADOQuery1DSDesigner: TStringField
FieldName = #34917#21457#21333#21495
FixedChar = True
Size = 16
end
object ADOQuery1DSDesigner2: TStringField
FieldName = #29289#26009#20195#30721
FixedChar = True
Size = 10
end
object ADOQuery1DSDesigner3: TStringField
FieldName = #29289#26009#21517#31216
FixedChar = True
Size = 60
end
object ADOQuery1DSDesigner4: TStringField
FieldName = #39068#33394
FixedChar = True
Size = 12
end
object ADOQuery1DSDesigner5: TStringField
FieldName = #33394#21495
FixedChar = True
Size = 6
end
object ADOQuery1DSDesigner6: TStringField
FieldName = #21333#20301
FixedChar = True
Size = 4
end
object ADOQuery1DSDesigner7: TStringField
FieldName = #20379#24212#21830
FixedChar = True
Size = 10
end
object ADOQuery1DSDesigner8: TBCDField
FieldName = #25968#37327
Precision = 18
Size = 0
end
end
object ADOQuery2: TADOQuery
Parameters = <>
Left = 608
Top = 272
end
object ADOQuery3: TADOQuery
Parameters = <>
Left = 584
Top = 208
end
object PopupMenu1: TPopupMenu
Left = 512
Top = 288
object N1: TMenuItem
Caption = #21024#38500#35760#24405
ShortCut = 46
OnClick = N1Click
end
object N2: TMenuItem
Caption = #22686#21152#35760#24405
ShortCut = 112
OnClick = N2Click
end
end
object DataSource1: TDataSource
DataSet = ADOQuery1
Left = 560
Top = 240
end
object DataSource2: TDataSource
DataSet = ADOQuery2
Left = 608
Top = 304
end
object ADOQuery4: TADOQuery
Parameters = <>
Left = 504
Top = 248
end
object frReport1: TfrReport
Dataset = frDBDataSet1
InitialZoom = pzDefault
PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbHelp, pbExit]
Left = 528
Top = 176
ReportForm = {18000000}
end
object frDBDataSet1: TfrDBDataSet
DataSet = ADOQuery1
Left = 520
Top = 336
end
object frDBDataSet2: TfrDBDataSet
DataSet = ADOQuery5
Left = 360
Top = 272
end
object ADOQuery5: TADOQuery
CursorType = ctStatic
Parameters = <
item
Name = 'bfdh'
DataType = ftString
NumericScale = 255
Precision = 255
Size = 13
Value = Null
end>
SQL.Strings = (
'select bldh as '#34917#26009#21333#21495',bfdh as '#34917#21457#21333#21495',blr as '#34917#26009#20154',djr as '#21457#26009#20154','
'ylbm as '#29992#26009#37096#38376',srrq as '#26085#26399',gcdh as '#24037#31243#21333#21495',bz as '#22791#27880' from bld_main wher' +
'e bfdh=:bfdh'
' ')
Left = 432
Top = 264
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -