📄 rsxx.dfm
字号:
object Info_Form: TInfo_Form
Left = 261
Top = 196
Width = 515
Height = 424
Caption = #20154#20107#31649#29702
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
OnActivate = FormActivate
PixelsPerInch = 96
TextHeight = 13
object ToolBar1: TToolBar
Left = 0
Top = 0
Width = 507
Height = 29
Caption = 'ToolBar1'
TabOrder = 0
object SpeedButton1: TSpeedButton
Left = 0
Top = 2
Width = 23
Height = 22
Hint = #20445#23384
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333330070
7700333333337777777733333333008088003333333377F73377333333330088
88003333333377FFFF7733333333000000003FFFFFFF77777777000000000000
000077777777777777770FFFFFFF0FFFFFF07F3333337F3333370FFFFFFF0FFF
FFF07F3FF3FF7FFFFFF70F00F0080CCC9CC07F773773777777770FFFFFFFF039
99337F3FFFF3F7F777F30F0000F0F09999937F7777373777777F0FFFFFFFF999
99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339
99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999
93337FFFF7737777733300000033333333337777773333333333}
NumGlyphs = 2
ParentShowHint = False
ShowHint = True
OnClick = SpeedButton1Click
end
object SpeedButton2: TSpeedButton
Left = 23
Top = 2
Width = 23
Height = 22
Hint = #26032#24314
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
07333337F33333337F333330FFFFFFFF07333337F33333337F333330FFFFFFFF
07333FF7F33333337FFFBBB0FFFFFFFF0BB37777F3333333777F3BB0FFFFFFFF
0BBB3777F3333FFF77773330FFFF000003333337F333777773333330FFFF0FF0
33333337F3337F37F3333330FFFF0F0B33333337F3337F77FF333330FFFF003B
B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
3BB33773333773333773B333333B3333333B7333333733333337}
NumGlyphs = 2
ParentShowHint = False
ShowHint = True
OnClick = SpeedButton2Click
end
object SpeedButton3: TSpeedButton
Left = 46
Top = 2
Width = 23
Height = 22
Hint = #21024#38500
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333333333333333FF33333333333330003333333333333777333333333333
300033FFFFFF3333377739999993333333333777777F3333333F399999933333
3300377777733333337733333333333333003333333333333377333333333333
3333333333333333333F333333333333330033333F33333333773333C3333333
330033337F3333333377333CC3333333333333F77FFFFFFF3FF33CCCCCCCCCC3
993337777777777F77F33CCCCCCCCCC399333777777777737733333CC3333333
333333377F33333333FF3333C333333330003333733333333777333333333333
3000333333333333377733333333333333333333333333333333}
NumGlyphs = 2
ParentShowHint = False
ShowHint = True
OnClick = SpeedButton3Click
end
object SpeedButton4: TSpeedButton
Left = 69
Top = 2
Width = 23
Height = 22
Hint = #36864#20986
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
03333377777777777F333301111111110333337F333333337F33330111111111
0333337F333333337F333301111111110333337F333333337F33330111111111
0333337F333333337F333301111111110333337F333333337F33330111111111
0333337F3333333F7F333301111111B10333337F333333737F33330111111111
0333337F333333337F333301111111110333337F33FFFFF37F3333011EEEEE11
0333337F377777F37F3333011EEEEE110333337F37FFF7F37F3333011EEEEE11
0333337F377777337F333301111111110333337F333333337F33330111111111
0333337FFFFFFFFF7F3333000000000003333377777777777333}
NumGlyphs = 2
ParentShowHint = False
ShowHint = True
OnClick = SpeedButton4Click
end
end
object DBGrid1: TDBGrid
Left = 16
Top = 32
Width = 473
Height = 137
DataSource = DataSource1
ReadOnly = True
TabOrder = 1
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
end
object GroupBox1: TGroupBox
Left = 16
Top = 168
Width = 473
Height = 217
Caption = #20154#20107#20449#24687
TabOrder = 2
object Label1: TLabel
Left = 32
Top = 24
Width = 56
Height = 14
Caption = #32844#24037#32534#21495
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #26999#20307'_GB2312'
Font.Style = []
ParentFont = False
end
object Label2: TLabel
Left = 264
Top = 24
Width = 56
Height = 14
Caption = #32844#24037#22995#21517
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #26999#20307'_GB2312'
Font.Style = []
ParentFont = False
end
object Label3: TLabel
Left = 56
Top = 48
Width = 28
Height = 14
Caption = #24615#21035
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #26999#20307'_GB2312'
Font.Style = []
ParentFont = False
end
object Label4: TLabel
Left = 264
Top = 48
Width = 56
Height = 14
Caption = #36523#20221#35777#21495
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #26999#20307'_GB2312'
Font.Style = []
ParentFont = False
end
object Label5: TLabel
Left = 32
Top = 72
Width = 56
Height = 14
Caption = #20986#29983#24180#26376
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #26999#20307'_GB2312'
Font.Style = []
ParentFont = False
end
object Label6: TLabel
Left = 264
Top = 72
Width = 56
Height = 14
Caption = #32852#31995#30005#35805
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #26999#20307'_GB2312'
Font.Style = []
ParentFont = False
end
object Label7: TLabel
Left = 32
Top = 96
Width = 56
Height = 14
Caption = #36890#20449#22320#22336
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #26999#20307'_GB2312'
Font.Style = []
ParentFont = False
end
object Label8: TLabel
Left = 32
Top = 120
Width = 56
Height = 14
Caption = #24037#20316#37096#38376
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #26999#20307'_GB2312'
Font.Style = []
ParentFont = False
end
object Label9: TLabel
Left = 296
Top = 120
Width = 28
Height = 14
Caption = #24037#36164
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #26999#20307'_GB2312'
Font.Style = []
ParentFont = False
end
object Label10: TLabel
Left = 8
Top = 144
Width = 84
Height = 14
Caption = #21442#21152#24037#20316#26102#38388
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #26999#20307'_GB2312'
Font.Style = []
ParentFont = False
end
object Label11: TLabel
Left = 296
Top = 144
Width = 28
Height = 14
Caption = #32844#21153
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #26999#20307'_GB2312'
Font.Style = []
ParentFont = False
end
object Label12: TLabel
Left = 56
Top = 168
Width = 28
Height = 14
Caption = #19987#19994
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #26999#20307'_GB2312'
Font.Style = []
ParentFont = False
end
object Label13: TLabel
Left = 296
Top = 168
Width = 28
Height = 14
Caption = #22791#27880
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #26999#20307'_GB2312'
Font.Style = []
ParentFont = False
end
object Label14: TLabel
Left = 48
Top = 192
Width = 42
Height = 14
Caption = #25805#20316#21592
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #26999#20307'_GB2312'
Font.Style = []
ParentFont = False
end
object Label15: TLabel
Left = 272
Top = 192
Width = 56
Height = 14
Caption = #25805#20316#26102#38388
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #26999#20307'_GB2312'
Font.Style = []
ParentFont = False
end
object Edit1: TEdit
Left = 96
Top = 16
Width = 121
Height = 21
TabOrder = 0
OnExit = Edit1Exit
end
object Edit2: TEdit
Left = 328
Top = 16
Width = 121
Height = 21
TabOrder = 1
end
object ComboBox1: TComboBox
Left = 96
Top = 40
Width = 121
Height = 21
ItemHeight = 13
TabOrder = 2
end
object Edit3: TEdit
Left = 328
Top = 40
Width = 121
Height = 21
MaxLength = 18
TabOrder = 3
end
object MaskEdit1: TMaskEdit
Left = 96
Top = 64
Width = 120
Height = 21
EditMask = '!9999/99/00;1;_'
MaxLength = 10
TabOrder = 4
Text = ' - - '
end
object Edit4: TEdit
Left = 328
Top = 64
Width = 121
Height = 21
TabOrder = 5
end
object Edit5: TEdit
Left = 96
Top = 88
Width = 353
Height = 21
TabOrder = 6
end
object Edit6: TEdit
Left = 96
Top = 112
Width = 121
Height = 21
TabOrder = 7
end
object Edit7: TEdit
Left = 328
Top = 112
Width = 121
Height = 21
TabOrder = 8
end
object MaskEdit2: TMaskEdit
Left = 96
Top = 136
Width = 118
Height = 21
EditMask = '!9999/99/00;1;_'
MaxLength = 10
TabOrder = 9
Text = ' - - '
end
object Edit8: TEdit
Left = 328
Top = 136
Width = 121
Height = 21
TabOrder = 10
end
object Edit9: TEdit
Left = 96
Top = 160
Width = 121
Height = 21
TabOrder = 11
end
object Edit10: TEdit
Left = 328
Top = 160
Width = 121
Height = 21
TabOrder = 12
end
object Edit11: TEdit
Left = 96
Top = 184
Width = 121
Height = 21
TabStop = False
Enabled = False
ReadOnly = True
TabOrder = 13
end
object MaskEdit3: TMaskEdit
Left = 328
Top = 184
Width = 120
Height = 21
TabStop = False
Enabled = False
EditMask = '!9999/99/00;1;_'
MaxLength = 10
ReadOnly = True
TabOrder = 14
Text = ' - - '
end
end
object Table1: TTable
AfterScroll = Table1AfterScroll
DatabaseName = 'rsgl'
TableName = 'info.db'
Left = 352
Top = 16
object Table1Number: TStringField
FieldName = 'Number'
Size = 6
end
object Table1Name: TStringField
FieldName = 'Name'
Size = 8
end
object Table1Sex: TStringField
FieldName = 'Sex'
Size = 2
end
object Table1Birthday: TDateField
FieldName = 'Birthday'
end
object Table1Address: TStringField
FieldName = 'Address'
Size = 40
end
object Table1Phone: TStringField
FieldName = 'Phone'
end
object Table1Unit: TStringField
FieldName = 'Unit'
end
object Table1Salary: TFloatField
FieldName = 'Salary'
end
object Table1Work_date: TDateField
FieldName = 'Work_date'
end
object Table1Duty: TStringField
FieldName = 'Duty'
Size = 10
end
object Table1Speciality: TStringField
FieldName = 'Speciality'
end
object Table1Note: TStringField
FieldName = 'Note'
end
object Table1Operator: TStringField
FieldName = 'Operator'
Size = 8
end
object Table1Stamp: TDateField
FieldName = 'Stamp'
end
object Table1Id: TStringField
FieldName = 'Id'
Size = 18
end
end
object DataSource1: TDataSource
DataSet = Table1
Left = 448
Top = 16
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -