📄 u_employmove_child.dfm
字号:
inherited F_employmove_child: TF_employmove_child
Left = 285
Top = 83
Width = 504
Height = 417
BorderIcons = [biSystemMenu, biMinimize]
Caption = #20154#21592#24322#21160
FormStyle = fsNormal
OldCreateOrder = True
Visible = False
PixelsPerInch = 96
TextHeight = 16
object Label3: TLabel [0]
Left = 24
Top = 74
Width = 65
Height = 16
Caption = #21407#37096#38376#32534#21495
FocusControl = DBEdit3
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label4: TLabel [1]
Left = 232
Top = 74
Width = 52
Height = 16
Caption = #37096#38376#21517#31216
FocusControl = DBEdit4
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label5: TLabel [2]
Left = 24
Top = 114
Width = 39
Height = 16
Caption = #21407#24037#31181
FocusControl = DBEdit5
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label6: TLabel [3]
Left = 24
Top = 154
Width = 39
Height = 16
Caption = #21407#32844#20301
FocusControl = DBEdit6
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Shape1: TShape [4]
Left = 16
Top = 186
Width = 449
Height = 1
end
object Label7: TLabel [5]
Left = 24
Top = 209
Width = 65
Height = 16
Caption = #26032#37096#38376#32534#21495
FocusControl = DBEdit3
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label8: TLabel [6]
Left = 24
Top = 249
Width = 39
Height = 16
Caption = #26032#24037#31181
FocusControl = DBEdit5
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label9: TLabel [7]
Left = 24
Top = 289
Width = 39
Height = 16
Caption = #26032#32844#20301
FocusControl = DBEdit6
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label10: TLabel [8]
Left = 233
Top = 209
Width = 52
Height = 16
Caption = #37096#38376#21517#31216
FocusControl = DBEdit4
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object SpeedButton1: TSpeedButton [9]
Left = 192
Top = 199
Width = 23
Height = 24
Caption = '...'
OnClick = SpeedButton1Click
end
object Label12: TLabel [10]
Left = 272
Top = 120
Width = 52
Height = 16
Caption = #33258#21160#21464#37327
FocusControl = DBEdit7
Visible = False
end
object Label13: TLabel [11]
Left = 234
Top = 248
Width = 52
Height = 16
Caption = #21464#21160#21407#22240
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object DBEdit3: TDBEdit [12]
Left = 96
Top = 69
Width = 121
Height = 24
DataField = 'Emp_bmcode'
DataSource = F_EmployMove.DS_main
ReadOnly = True
TabOrder = 0
end
object DBEdit4: TDBEdit [13]
Left = 296
Top = 68
Width = 137
Height = 24
DataField = 'Emp_bmname'
DataSource = F_EmployMove.DS_main
ReadOnly = True
TabOrder = 1
end
object DBEdit5: TDBEdit [14]
Left = 96
Top = 107
Width = 121
Height = 24
DataField = 'Emp_Gz'
DataSource = F_EmployMove.DS_main
ReadOnly = True
TabOrder = 2
end
object DBEdit6: TDBEdit [15]
Left = 96
Top = 146
Width = 121
Height = 24
DataField = 'Emp_ZW'
DataSource = F_EmployMove.DS_main
ReadOnly = True
TabOrder = 3
end
object Panel1: TPanel [16]
Left = 0
Top = 0
Width = 496
Height = 41
Align = alTop
BevelInner = bvLowered
TabOrder = 4
object Label1: TLabel
Left = 14
Top = 17
Width = 38
Height = 16
Caption = #24037' '#21495
FocusControl = DBEdit1
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label2: TLabel
Left = 171
Top = 17
Width = 35
Height = 16
Caption = #22995' '#21517
FocusControl = DBEdit2
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object DBEdit1: TDBEdit
Left = 67
Top = 9
Width = 92
Height = 24
DataField = 'Emp_id'
DataSource = F_EmployMove.DS_main
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ReadOnly = True
TabOrder = 0
end
object DBEdit2: TDBEdit
Left = 218
Top = 9
Width = 117
Height = 24
DataField = 'Emp_name'
DataSource = F_EmployMove.DS_main
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ReadOnly = True
TabOrder = 1
end
end
object Panel2: TPanel [17]
Left = 0
Top = 349
Width = 496
Height = 41
Align = alBottom
BevelInner = bvLowered
TabOrder = 5
object Label11: TLabel
Left = 24
Top = 16
Width = 52
Height = 16
Caption = #35843#21160#26085#26399
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object BitBtn1: TBitBtn
Left = 280
Top = 8
Width = 75
Height = 25
Caption = #30830#23450
TabOrder = 0
OnClick = BitBtn1Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
555555555555555555555555555555555555555555FF55555555555559055555
55555555577FF5555555555599905555555555557777F5555555555599905555
555555557777FF5555555559999905555555555777777F555555559999990555
5555557777777FF5555557990599905555555777757777F55555790555599055
55557775555777FF5555555555599905555555555557777F5555555555559905
555555555555777FF5555555555559905555555555555777FF55555555555579
05555555555555777FF5555555555557905555555555555777FF555555555555
5990555555555555577755555555555555555555555555555555}
NumGlyphs = 2
end
object BitBtn2: TBitBtn
Left = 376
Top = 8
Width = 75
Height = 25
Caption = #36864#20986
TabOrder = 1
OnClick = BitBtn2Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
03333377777777777F333301BBBBBBBB033333773F3333337F3333011BBBBBBB
0333337F73F333337F33330111BBBBBB0333337F373F33337F333301110BBBBB
0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB
0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB
0333337F337F33337F333301110BBBBB0333337F337FF3337F33330111B0BBBB
0333337F337733337F333301110BBBBB0333337F337F33337F333301110BBBBB
0333337F3F7F33337F333301E10BBBBB0333337F7F7F33337F333301EE0BBBBB
0333337F777FFFFF7F3333000000000003333377777777777333}
NumGlyphs = 2
end
object d1: TDateTimePicker
Left = 95
Top = 8
Width = 154
Height = 24
Date = 37941.000000000000000000
Time = 37941.000000000000000000
TabOrder = 2
end
end
object Edit1: TEdit [18]
Left = 96
Top = 200
Width = 97
Height = 24
ReadOnly = True
TabOrder = 6
end
object Edit2: TEdit [19]
Left = 297
Top = 201
Width = 137
Height = 24
ReadOnly = True
TabOrder = 7
end
object wwDBComboBox8: TwwDBComboBox [20]
Left = 96
Top = 287
Width = 124
Height = 23
ShowButton = True
Style = csDropDownList
MapList = False
AllowClearKey = False
AutoSize = False
Color = clWhite
DataField = 'Emp_ZW'
DropDownCount = 8
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Arial'
Font.Style = []
HistoryList.FileName = 'GeneisMRP.ini'
ItemHeight = 0
ParentFont = False
Sorted = False
TabOrder = 8
UnboundDataType = wwDefault
OnEnter = wwDBComboBox8Enter
OnKeyDown = wwDBComboBox8KeyDown
end
object wwDBComboBox3: TwwDBComboBox [21]
Left = 95
Top = 245
Width = 124
Height = 23
ShowButton = True
Style = csDropDownList
MapList = False
AllowClearKey = False
AutoSize = False
Color = clWhite
DataField = 'Emp_Gz'
DropDownCount = 8
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Arial'
Font.Style = []
HistoryList.FileName = 'GeneisMRP.ini'
ItemHeight = 0
ParentFont = False
Sorted = False
TabOrder = 9
UnboundDataType = wwDefault
OnEnter = wwDBComboBox8Enter
OnKeyDown = wwDBComboBox8KeyDown
end
object DBEdit7: TDBEdit [22]
Left = 272
Top = 136
Width = 161
Height = 24
DataField = 'Sid'
DataSource = F_EmployMove.DS_main
TabOrder = 10
Visible = False
end
object Memo: TMemo [23]
Left = 232
Top = 272
Width = 201
Height = 41
TabOrder = 11
end
inherited Q_main: TADOQuery
CursorType = ctStatic
SQL.Strings = (
'Select * from TB_employ_move')
Left = 16
Top = 312
end
inherited Q_detail: TADOQuery
Left = 176
Top = 352
end
inherited DS_main: TDataSource
Left = 208
Top = 344
end
inherited DS_detail: TDataSource
Left = 216
Top = 344
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -