📄 u_setprogram.dfm
字号:
inherited F_setprogram: TF_setprogram
Left = 70
Top = 170
Width = 693
Height = 403
Caption = #29992#25143#26435#38480#35774#32622
PixelsPerInch = 96
TextHeight = 13
inherited Splitter1: TSplitter
Left = 163
Height = 376
end
inherited ScrollBox2: TScrollBox
Width = 163
Height = 376
inherited DBGrid1: TDBGridEh
Width = 159
Height = 372
Columns = <
item
EditButtons = <>
FieldName = 'user_no'
Footers = <>
Title.Caption = #29992#25143#32534#21495
Title.Font.Charset = DEFAULT_CHARSET
Title.Font.Color = clGreen
Title.Font.Height = -13
Title.Font.Name = 'MS Sans Serif'
Title.Font.Style = []
end
item
EditButtons = <>
FieldName = 'user_nm'
Footers = <>
Title.Caption = #29992#25143#21517#31216
Title.Font.Charset = DEFAULT_CHARSET
Title.Font.Color = clGreen
Title.Font.Height = -13
Title.Font.Name = 'MS Sans Serif'
Title.Font.Style = []
end>
end
end
inherited ScrollBox3: TScrollBox
Left = 164
Width = 521
Height = 376
inherited DBEdit1: TDBEdit
Width = 118
Color = clInfoBk
DataField = 'user_no'
DataSource = DataSource1
OnEnter = DBEdit1Enter
end
inherited DBEdit2: TDBEdit
Left = 211
Top = 20
Width = 270
Color = clInfoBk
DataField = 'user_nm'
DataSource = DataSource1
OnEnter = DBEdit2Enter
end
inherited ScrollBox4: TScrollBox
Left = 7
Top = 56
Width = 506
Height = 313
inherited DBCtrlGrid1: TDBCtrlGrid
Top = 0
Width = 502
Height = 309
Align = alClient
DataSource = DataSource2
Font.Charset = GB2312_CHARSET
Font.Height = -13
Font.Name = #23435#20307
PanelHeight = 61
PanelWidth = 486
ParentFont = False
RowCount = 5
object StaticText3: TStaticText
Left = 8
Top = 7
Width = 56
Height = 17
Caption = #31243#24207#32534#21495
TabOrder = 0
end
object StaticText4: TStaticText
Left = 2
Top = 38
Width = 30
Height = 17
Caption = #26032#22686
TabOrder = 1
end
object DBEdit3: TDBEdit
Left = 72
Top = 3
Width = 121
Height = 21
Color = clInfoBk
DataField = 'program_no'
DataSource = DataSource2
Enabled = False
TabOrder = 2
end
object StaticText5: TStaticText
Left = 64
Top = 38
Width = 30
Height = 17
Caption = #20462#25913
TabOrder = 3
end
object StaticText6: TStaticText
Left = 128
Top = 38
Width = 30
Height = 17
Caption = #21024#38500
TabOrder = 4
end
object StaticText7: TStaticText
Left = 192
Top = 38
Width = 30
Height = 17
Caption = #26597#35810
TabOrder = 5
end
object StaticText8: TStaticText
Left = 248
Top = 38
Width = 30
Height = 17
Caption = #21015#21360
TabOrder = 6
end
object StaticText9: TStaticText
Left = 304
Top = 38
Width = 30
Height = 17
Caption = #21462#20540
TabOrder = 7
end
object StaticText10: TStaticText
Left = 364
Top = 38
Width = 30
Height = 17
Caption = #27719#20837
TabOrder = 8
end
object StaticText11: TStaticText
Left = 428
Top = 38
Width = 30
Height = 17
Caption = #27719#20986
TabOrder = 9
end
object DBEdit4: TDBEdit
Left = 32
Top = 34
Width = 20
Height = 21
CharCase = ecUpperCase
DataField = 'p_add'
DataSource = DataSource2
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 10
OnClick = DBEdit4Click
OnEnter = DBEdit4Enter
OnExit = DBEdit4Exit
end
object DBEdit5: TDBEdit
Left = 96
Top = 34
Width = 20
Height = 21
CharCase = ecUpperCase
DataField = 'p_edit'
DataSource = DataSource2
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 11
OnClick = DBEdit5Click
OnEnter = DBEdit5Enter
OnExit = DBEdit5Exit
end
object DBEdit6: TDBEdit
Left = 160
Top = 34
Width = 20
Height = 21
CharCase = ecUpperCase
DataField = 'p_delete'
DataSource = DataSource2
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 12
OnClick = DBEdit6Click
OnEnter = DBEdit6Enter
OnExit = DBEdit6Exit
end
object DBEdit7: TDBEdit
Left = 224
Top = 34
Width = 20
Height = 21
CharCase = ecUpperCase
DataField = 'p_query'
DataSource = DataSource2
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 13
OnClick = DBEdit7Click
OnEnter = DBEdit7Enter
OnExit = DBEdit7Exit
end
object DBEdit8: TDBEdit
Left = 276
Top = 34
Width = 20
Height = 21
CharCase = ecUpperCase
DataField = 'p_print'
DataSource = DataSource2
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 14
OnClick = DBEdit8Click
OnEnter = DBEdit8Enter
OnExit = DBEdit8Exit
end
object DBEdit9: TDBEdit
Left = 336
Top = 34
Width = 20
Height = 21
CharCase = ecUpperCase
DataField = 'p_getdata'
DataSource = DataSource2
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 15
OnClick = DBEdit9Click
OnEnter = DBEdit9Enter
OnExit = DBEdit9Exit
end
object DBEdit10: TDBEdit
Left = 392
Top = 34
Width = 20
Height = 21
CharCase = ecUpperCase
DataField = 'p_datain'
DataSource = DataSource2
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 16
OnClick = DBEdit10Click
OnEnter = DBEdit10Enter
OnExit = DBEdit10Exit
end
object DBEdit11: TDBEdit
Left = 456
Top = 34
Width = 20
Height = 21
CharCase = ecUpperCase
DataField = 'p_dataout'
DataSource = DataSource2
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 17
OnClick = DBEdit11Click
OnEnter = DBEdit11Enter
OnExit = DBEdit11Exit
end
object DBEdit12: TDBEdit
Left = 192
Top = 3
Width = 281
Height = 21
Color = clInfoBk
DataField = 'program_nm'
DataSource = DataSource2
Enabled = False
TabOrder = 18
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -