?? untreporttextadd.dfm
字號:
EEF4EFEEF4EFEEF4EFEEF4EFEEF4EFEEF4EFEEF4EFEEF3EEEDF4EFEEF4EFEEF4
EFEEF4EFEEF4EFEEF4EFEEF3EEEDF4EFEEF4EFEEF4EFEEF4EFEEF4EFEEF4EFEE
F4EFEEF4EFEEF4EFEEF4EFEEF4EFEEF4EFEEF4EFEEF4EFEEF4EFEEF4EFEEF4EF
EEF4EFEEF4EFEEF4EFEEF4EFEEF4EFEEF4EFEEF4EFEEF4EFEEF4EFEEF4EFEEF4
EFEEF4EFEEF4EFEEF4EFEEF4EFEEF4EDEAF5F0EDF1EDECF5F1F0F4F0EFF6F1F0
F5EBEBEDE3E3E2D8D8F4EAEA0000FBF7F6E7E2E1DCD2D2EFE3E3FBEFEFFBF1F1
FDF5F5F4EFEEF9F2EFF9F2EFF9F2EFF9F2EFF9F2EFF9F2EFF9F2EFF9F2EFF9F2
EFF9F2EFF9F2EFF9F2EFF9F2EFF9F2EFF9F2EFF9F2EFFBF2EFFBF2EFFBF2EFFB
F2EFFBF2EFFBF2EFFBF2EFFBF2EFF8F1EEF8F1EEF8F1EEF8F1EEF8F1EEF8F1EE
F8F1EEF8F1EEF9F2EFF9F2EFF9F2EFF9F2EFF9F2EFF9F2EFF9F2EFF9F2EFF9F2
EFF9F2EFF9F2EFF9F2EFF9F2EFF9F2EFF9F2EFF9F2EFF9F2EFF9F2EFF9F2EFF9
F2EFF9F2EFF9F2EFF9F2EFF9F2EFF9F2EFF9F2EFF9F2EFF9F2EFF9F2EFF9F2EF
F9F2EFF9F2EFF9F2EFFAF3F0F7F0EDFBF2EFFAF0F0F9EFEFEDE3E3E1D7D7E6E0
E1FDF7F80000FFFFFFF6F4F4E9E1E1E4D8D8E0D2D3D9CCCADACDCBD6CAC8D6CB
C7D6CBC7D6CBC7D6CBC7D6CBC7D6CBC7D6CBC7D6CBC7D6CBC7D6CBC7D6CBC7D6
CBC7D6CBC7D6CBC7D6CBC7D6CBC7D8CCC8D8CCC8D8CCC8D8CCC8D8CCC8D8CCC8
D8CCC8D8CCC8D8CDC9D7CCC8D7CCC8D7CCC8D7CCC8D7CCC8D7CCC8D8CDC9D7CC
C8D7CCC8D7CCC8D6CBC7D6CBC7D6CBC7D5CAC6D5CAC6D7CCC8D7CCC8D7CCC8D7
CCC8D7CCC8D7CCC8D7CCC8D7CCC8D6CBC7D6CBC7D6CBC7D6CBC7D6CBC7D6CBC7
D6CBC7D6CBC7D6CBC7D6CBC7D6CBC7D6CBC7D6CBC7D6CBC7D6CBC7D6CBC7D4CB
C7D5C9C7D5C8C6DACBC9DACDCBE0D4D2DFD8D5E2DDDAFAF8F8FCFAFA0000F5F7
F7FCFCFCFFF7F8F4E6E7F1E2E0F0DFDCEDDEDBEEDFDCECE0DAECE0DAECE0DAEC
E0DAECE0DAECE0DAECE0DAECE0DAEDE1DBEDE1DBEDE1DBEDE1DBEDE1DBEDE1DB
EDE1DBEDE1DBEDDFD9EDDFD9EDDFD9EDDFD9EDDFD9EDDFD9EDDFD9EDDFD9EBDF
D9EBDFD9EADED8EADED8EADED8EADED8EBDFD9EBDFD9EDE1DBEDE1DBEDE1DBEC
E0DAEBDFD9EBDFD9EADED8EADED8EDDFD9EDDFD9EDDFD9EDDFD9EDDFD9EDDFD9
EDDFD9EDDFD9EEE0DAEEE0DAEEE0DAEEE0DAEEE0DAEEE0DAEEE0DAEEE0DAECE0
DAECE0DAECE0DAECE0DAECE0DAECE0DAECE0DAECE0DAEADFDBECE0DCF2E1DEF4
E1DEEDDBDAEDE0DEEFE8E5FEFBF7F9F9F9FAFAFA0000}
NumGlyphs = 0
ParentClipping = False
ShadeStyle = fbsNormal
TabOrder = 0
TextOptions.Alignment = taCenter
TextOptions.VAlignment = vaVCenter
TransparentColor = clNone
OnClick = btnAddClick
RegionData = {
400000002000000001000000020000002000000000000000000000004B000000
1900000001000000000000004B0000000100000000000000010000004B000000
19000000}
DownRegionData = {
400000002000000001000000020000002000000000000000000000004B000000
1900000001000000000000004B0000000100000000000000010000004B000000
19000000}
end
end
object DBGrid1: TDBGrid
Left = 0
Top = 44
Width = 954
Height = 511
Align = alClient
DataSource = dsText
FixedColor = 15525344
TabOrder = 1
TitleFont.Charset = ANSI_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = #23435#20307
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'MeasureName'
ReadOnly = True
Width = 101
Visible = True
end
item
Expanded = False
FieldName = 'ItemName'
ReadOnly = True
Width = 75
Visible = True
end
item
Expanded = False
FieldName = 'Lvl'
PickList.Strings = (
#36739#20302
#20302
#20013
#39640
#36739#39640)
ReadOnly = True
Width = 33
Visible = True
end
item
Expanded = False
FieldName = 'Discript'
Width = 300
Visible = True
end
item
Expanded = False
FieldName = 'Method'
Width = 420
Visible = True
end>
end
end
inherited pnlBottom: TPanel
Top = 555
Width = 954
inherited Bevel1: TBevel
Width = 954
end
inherited btnCancel: TfcImageBtn
NumGlyphs = 1
RegionData = {
400000002000000001000000020000002000000000000000000000004B000000
1900000001000000000000004B0000000100000000000000010000004B000000
19000000}
DownRegionData = {
400000002000000001000000020000002000000000000000000000004B000000
1900000001000000000000004B0000000100000000000000010000004B000000
19000000}
end
inherited btnOK: TfcImageBtn
NumGlyphs = 1
RegionData = {
400000002000000001000000020000002000000000000000000000004B000000
1900000001000000000000004B0000000100000000000000010000004B000000
19000000}
DownRegionData = {
400000002000000001000000020000002000000000000000000000004B000000
1900000001000000000000004B0000000100000000000000010000004B000000
19000000}
end
end
end
inherited pnl1: TPanel
Top = 604
Width = 988
inherited img2: TImage
Width = 976
end
inherited img3: TImage
Left = 982
end
end
object adsText: TADODataSet
Connection = DM.cnn
LockType = ltBatchOptimistic
CommandText = 'select * from tReportText where 1>1'
Parameters = <>
Left = 264
Top = 168
object adsTextiAutoID: TAutoIncField
FieldName = 'iAutoID'
ReadOnly = True
Visible = False
end
object adsTextMeasureCode: TStringField
FieldName = 'MeasureCode'
Visible = False
Size = 10
end
object adsTextMeasureName: TStringField
DisplayLabel = #37327#34920
FieldKind = fkLookup
FieldName = 'MeasureName'
LookupDataSet = adsLookMeasure
LookupKeyFields = 'code'
LookupResultField = 'name'
KeyFields = 'MeasureCode'
LookupCache = True
Size = 30
Lookup = True
end
object adsTextItemCode: TStringField
FieldName = 'ItemCode'
Visible = False
Size = 10
end
object adsTextItemName: TStringField
DisplayLabel = #22240#23376
FieldKind = fkLookup
FieldName = 'ItemName'
LookupDataSet = adsLookMeasureItem
LookupKeyFields = 'code'
LookupResultField = 'Name'
KeyFields = 'ItemCode'
LookupCache = True
Size = 30
Lookup = True
end
object adsTextLvl: TIntegerField
DisplayLabel = #31561#32423
FieldName = 'Lvl'
OnGetText = adsTextLvlGetText
OnSetText = adsTextLvlSetText
end
object adsTextDiscript: TStringField
DisplayLabel = #23618#24230#22240#23376#25551#36848
FieldName = 'Discript'
Size = 100
end
object adsTextMethod: TStringField
DisplayLabel = #22788#29702#26041#24335
FieldName = 'Method'
Size = 800
end
end
object dsText: TDataSource
DataSet = adsText
Left = 336
Top = 168
end
object adsMeasure: TADODataSet
Connection = DM.cnn
CommandText = 'select code, name from tMeasure'
Parameters = <>
Left = 88
Top = 128
end
object dsMeasure: TDataSource
DataSet = adsMeasure
Left = 88
Top = 184
end
object adsLookMeasure: TADODataSet
Connection = DM.cnn
CommandText = 'select code, name from tMeasure'
Parameters = <>
Left = 192
Top = 328
end
object adsLookMeasureItem: TADODataSet
Connection = DM.cnn
CommandText = 'select code, Name from tMeasure_Item'
Parameters = <>
Left = 192
Top = 392
end
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -