?? uls.dfm
字號:
object fls: Tfls
Left = 153
Top = 164
BorderStyle = bsSingle
Caption = #38646#21806
ClientHeight = 473
ClientWidth = 692
Color = clInactiveCaptionText
Constraints.MinHeight = 400
Constraints.MinWidth = 700
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
FormStyle = fsMDIChild
OldCreateOrder = False
Position = poDefault
Visible = True
WindowState = wsMaximized
OnClose = FormClose
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 0
Top = 0
Width = 692
Height = 29
Align = alTop
Alignment = taCenter
Caption = #33647#21697#38646#21806#21333
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object DBGridEh1: TDBGridEh
Left = 0
Top = 73
Width = 692
Height = 183
TabStop = False
Align = alClient
AllowedOperations = [alopInsertEh, alopUpdateEh, alopDeleteEh]
DataSource = adodm.dscr
Flat = True
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
FooterColor = clWindow
FooterFont.Charset = DEFAULT_CHARSET
FooterFont.Color = clWindowText
FooterFont.Height = -11
FooterFont.Name = 'MS Sans Serif'
FooterFont.Style = []
FooterRowCount = 1
OptionsEh = [dghFixed3D, dghHighlightFocus, dghClearSelection, dghEnterAsTab]
ParentFont = False
SumList.Active = True
TabOrder = 1
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
OnColEnter = DBGridEh1ColEnter
OnColExit = DBGridEh1ColExit
OnKeyDown = DBGridEh1KeyDown
Columns = <
item
AutoDropDown = True
AutoFitColWidth = False
DropDownWidth = 300
EditButtons = <>
FieldName = #33647#21697#31616#30721
Footer.Value = #21697#31181#21512#35745#65306
Footer.ValueType = fvtStaticText
Footers = <>
LookupDisplayFields = #31616#30721';'#32534#21495';'#21517#31216
Width = 62
end
item
AutoFitColWidth = False
EditButtons = <>
FieldName = #25968#37327
Footer.FieldName = #33647#21697#31616#30721
Footer.ValueType = fvtCount
Footers = <>
Width = 68
end
item
AutoDropDown = True
AutoFitColWidth = False
DropDownWidth = 300
EditButtons = <>
FieldName = #33647#21697#32534#21495
Footer.EndEllipsis = True
Footers = <>
LookupDisplayFields = #31616#30721';'#32534#21495';'#21517#31216
Width = 68
end
item
AutoDropDown = True
AutoFitColWidth = False
DropDownWidth = 300
EditButtons = <>
FieldName = #33647#21697#21517#31216
Footers = <>
LookupDisplayFields = #31616#30721';'#32534#21495';'#21517#31216
Width = 73
end
item
AutoFitColWidth = False
EditButtons = <>
FieldName = #21333#20215
Footer.Value = #21512#35745#65306
Footer.ValueType = fvtStaticText
Footers = <>
end
item
AutoFitColWidth = False
EditButtons = <>
FieldName = #37329#39069
Footer.EndEllipsis = True
Footer.FieldName = #37329#39069
Footer.ValueType = fvtSum
Footers = <>
ReadOnly = True
Width = 83
end
item
AutoFitColWidth = False
EditButtons = <>
FieldName = #21333#20301
Footers = <>
ReadOnly = True
Width = 71
end
item
AutoFitColWidth = False
EditButtons = <>
FieldName = #35268#26684
Footers = <>
ReadOnly = True
Width = 87
end
item
AutoFitColWidth = False
EditButtons = <>
FieldName = #38646#21806#20215
Footers = <>
ReadOnly = True
end>
end
object TabControl1: TTabControl
Left = 0
Top = 29
Width = 692
Height = 44
Align = alTop
Style = tsFlatButtons
TabOrder = 0
object Label2: TLabel
Left = 512
Top = 16
Width = 48
Height = 13
AutoSize = False
Caption = #32534#21495
end
object Label3: TLabel
Left = 320
Top = 16
Width = 32
Height = 13
Caption = 'Label3'
end
object Label4: TLabel
Left = 8
Top = 16
Width = 65
Height = 13
AutoSize = False
Caption = #36141#33647#21333#20301
end
object dw: TDBLookupComboboxEh
Left = 72
Top = 16
Width = 121
Height = 19
DropDownBox.AutoDrop = True
DropDownBox.Width = 200
EditButtons = <>
KeyField = 'clientid'
ListField = #31616#30721';'#21517#31216
ListFieldIndex = 1
ListSource = adodm.dsdw
Style = csDropDownEh
TabOrder = 0
OnChange = dwChange
OnExit = dwExit
end
object Edit2: TEdit
Left = 568
Top = 16
Width = 105
Height = 19
Enabled = False
TabOrder = 1
end
end
object TabControl2: TTabControl
Left = 0
Top = 256
Width = 692
Height = 217
Align = alBottom
Style = tsFlatButtons
TabOrder = 2
object Label5: TLabel
Left = 264
Top = 28
Width = 57
Height = 13
AutoSize = False
Caption = #25805#20316#20154
end
object Label6: TLabel
Left = 24
Top = 28
Width = 49
Height = 13
AutoSize = False
Caption = #24320#31080#20154
end
object Label7: TLabel
Left = 16
Top = 88
Width = 57
Height = 17
AutoSize = False
Caption = #23454#20184#37329#39069#65306
end
object Label8: TLabel
Left = 280
Top = 96
Width = 33
Height = 17
AutoSize = False
Caption = #25214#38065#65306
end
object sncCurrencyLabel1: TsncCurrencyLabel
Left = 104
Top = 64
Width = 129
Height = 26
Ctl3D = False
DecimalSymbols.Strings = (
#35282
#20998)
DigitalSymbols.Strings = (
#20803
#21313
#30334
#21315
#19975
#21313
#30334
#21315
#20159
#21313
#30334
#21315
#19975)
ParentColor = False
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -