📄 takepageman.dfm
字号:
object frmtakepageman: Tfrmtakepageman
Left = 441
Top = 224
Width = 398
Height = 317
Caption = #39046#29992#20154#20449#24687#24405#20837
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poDesktopCenter
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object spl1: TSplitter
Left = 0
Top = 3
Height = 243
end
object spl2: TSplitter
Left = 0
Top = 246
Width = 390
Height = 3
Cursor = crVSplit
Align = alBottom
end
object spl3: TSplitter
Left = 0
Top = 0
Width = 390
Height = 3
Cursor = crVSplit
Align = alTop
end
object spl4: TSplitter
Left = 387
Top = 3
Height = 243
Align = alRight
end
object pnl1: TPanel
Left = 0
Top = 249
Width = 390
Height = 41
Align = alBottom
BorderStyle = bsSingle
Color = clBtnShadow
TabOrder = 0
object btn1: TBitBtn
Left = 216
Top = 8
Width = 75
Height = 25
Caption = #30830#23450
TabOrder = 0
OnClick = btn1Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
555555555555555555555555555555555555555555FF55555555555559055555
55555555577FF5555555555599905555555555557777F5555555555599905555
555555557777FF5555555559999905555555555777777F555555559999990555
5555557777777FF5555557990599905555555777757777F55555790555599055
55557775555777FF5555555555599905555555555557777F5555555555559905
555555555555777FF5555555555559905555555555555777FF55555555555579
05555555555555777FF5555555555557905555555555555777FF555555555555
5990555555555555577755555555555555555555555555555555}
NumGlyphs = 2
end
object btn2: TBitBtn
Left = 296
Top = 8
Width = 75
Height = 25
Caption = #36864#20986
TabOrder = 1
OnClick = btn2Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
03333377777777777F333301111111110333337F333333337F33330111111111
0333337F333333337F333301111111110333337F333333337F33330111111111
0333337F333333337F333301111111110333337F333333337F33330111111111
0333337F3333333F7F333301111111B10333337F333333737F33330111111111
0333337F333333337F333301111111110333337F33FFFFF37F3333011EEEEE11
0333337F377777F37F3333011EEEEE110333337F37FFF7F37F3333011EEEEE11
0333337F377777337F333301111111110333337F333333337F33330111111111
0333337FFFFFFFFF7F3333000000000003333377777777777333}
NumGlyphs = 2
end
end
object pnl2: TPanel
Left = 5
Top = 3
Width = 381
Height = 241
BorderStyle = bsSingle
TabOrder = 1
object lbl2: TLabel
Left = 36
Top = 31
Width = 72
Height = 13
Caption = #39046#29992#20154#22995#21517#65306
end
object lbl3: TLabel
Left = 54
Top = 61
Width = 36
Height = 13
Caption = #24615#21035#65306
end
object lbl4: TLabel
Left = 42
Top = 93
Width = 60
Height = 13
Caption = #39046#29992#26085#26399#65306
end
object lbl5: TLabel
Left = 36
Top = 122
Width = 72
Height = 13
Caption = #36523#20221#35777#21495#30721#65306
end
object lbl6: TLabel
Left = 42
Top = 153
Width = 60
Height = 13
Caption = #39046#29992#22320#28857#65306
end
object lbl7: TLabel
Left = 54
Top = 185
Width = 36
Height = 13
Caption = #30005#35805#65306
end
object dbedt2: TDBEdit
Left = 129
Top = 27
Width = 180
Height = 21
DataField = 'pername'
DataSource = ds1
TabOrder = 0
OnKeyDown = dbedt2KeyDown
end
object dbcbb1: TDBComboBox
Left = 129
Top = 58
Width = 200
Height = 21
DataField = 'sex'
DataSource = ds1
ItemHeight = 13
Items.Strings = (
#30007
#22899)
TabOrder = 1
OnKeyDown = dbcbb1KeyDown
end
object dxDBDateEdit1: TdxDBDateEdit
Left = 129
Top = 89
Width = 200
TabOrder = 2
OnKeyDown = dxDBDateEdit1KeyDown
DataField = 'years'
DataSource = ds1
end
object dbedt3: TDBEdit
Left = 129
Top = 119
Width = 180
Height = 21
DataField = 'serialnumber'
DataSource = ds1
TabOrder = 3
OnKeyDown = dbedt3KeyDown
OnKeyPress = dbedt3KeyPress
end
object dbcbb2: TDBComboBox
Left = 129
Top = 150
Width = 200
Height = 21
DataField = 'deputmant'
DataSource = ds1
ItemHeight = 13
TabOrder = 4
OnKeyDown = dbcbb2KeyDown
end
object dbedt4: TDBEdit
Left = 129
Top = 181
Width = 180
Height = 21
DataField = 'tel'
DataSource = ds1
TabOrder = 5
OnKeyPress = dbedt4KeyPress
end
end
object ds1: TDataSource
DataSet = DM.tblperson
Left = 13
Top = 11
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -