📄 borrow_return.~dfm
字号:
inherited F_BReturn: TF_BReturn
Tag = 4
Left = 243
Top = 161
Width = 545
Height = 454
Caption = #26723#26696#20511#29992#21644#24402#36824#31649#29702
OldCreateOrder = True
Position = poMainFormCenter
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object PageControl1: TPageControl [0]
Left = 0
Top = 5
Width = 529
Height = 333
ActivePage = TabSheet1
TabOrder = 10
OnChange = PageControl1Change
object TabSheet1: TTabSheet
Caption = #26723#26696#20511#29992#31649#29702
object GroupBox1: TGroupBox
Left = 0
Top = 0
Width = 521
Height = 89
TabOrder = 0
object Label1: TLabel
Left = 139
Top = 8
Width = 60
Height = 13
Caption = #26723#26696#21517#31216#65306
FocusControl = DBEdit1
end
object Label2: TLabel
Left = 9
Top = 47
Width = 60
Height = 13
Caption = #20511#29992#20154#21592#65306
FocusControl = DBEdit2
end
object Label3: TLabel
Left = 112
Top = 47
Width = 60
Height = 13
Caption = #20511#29992#26085#26399#65306
FocusControl = DBEdit3
end
object Label4: TLabel
Left = 268
Top = 47
Width = 36
Height = 13
Caption = #22791#27880#65306
FocusControl = DBEdit4
end
object Label5: TLabel
Left = 10
Top = 8
Width = 60
Height = 13
Caption = #26723#26696#32534#21495#65306
FocusControl = DBEdit2
end
object DBEdit1: TDBEdit
Left = 140
Top = 24
Width = 373
Height = 21
DataField = 'Borrow_Name'
DataSource = DM.DS_Borrow
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
TabOrder = 0
end
object DBEdit2: TDBEdit
Left = 9
Top = 63
Width = 93
Height = 21
DataField = 'Borrow_Person'
DataSource = DM.DS_Borrow
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
TabOrder = 1
end
object DBEdit3: TDBEdit
Left = 112
Top = 63
Width = 145
Height = 21
DataField = 'Borrow_Date'
DataSource = DM.DS_Borrow
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
TabOrder = 2
end
object DBEdit4: TDBEdit
Left = 268
Top = 63
Width = 245
Height = 21
DataField = 'Borrow_Memo'
DataSource = DM.DS_Borrow
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
TabOrder = 3
end
object ME_Borrow: TMaskEdit
Left = 9
Top = 24
Width = 118
Height = 21
Enabled = False
EditMask = '!999999;1;_'
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
MaxLength = 6
TabOrder = 4
Text = ' '
OnChange = ME_BorrowChange
end
end
object DBGrid1: TDBGrid
Left = 0
Top = 104
Width = 521
Height = 201
DataSource = DM.DS_Borrow
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
TabOrder = 1
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'Borrow_ID'
Title.Alignment = taCenter
Title.Caption = #26723#26696#32534#21495
Visible = True
end
item
Expanded = False
FieldName = 'Borrow_Name'
Title.Alignment = taCenter
Title.Caption = #26723#26696#21517#31216
Visible = True
end
item
Expanded = False
FieldName = 'Borrow_Person'
Title.Alignment = taCenter
Title.Caption = #20511#29992#20154#21592
Visible = True
end
item
Expanded = False
FieldName = 'Borrow_Date'
Title.Alignment = taCenter
Title.Caption = #20511#29992#26085#26399
Width = 89
Visible = True
end
item
Expanded = False
FieldName = 'Borrow_Memo'
Title.Alignment = taCenter
Title.Caption = #22791#27880
Width = 158
Visible = True
end>
end
end
object TabSheet2: TTabSheet
Caption = #26723#26696#24402#36824#31649#29702
ImageIndex = 1
object GroupBox2: TGroupBox
Left = 0
Top = 0
Width = 513
Height = 89
TabOrder = 0
object Label6: TLabel
Left = 139
Top = 8
Width = 60
Height = 13
Caption = #26723#26696#21517#31216#65306
FocusControl = DBEdit5
end
object Label7: TLabel
Left = 9
Top = 47
Width = 60
Height = 13
Caption = #24402#36824#20154#21592#65306
FocusControl = DBEdit6
end
object Label8: TLabel
Left = 112
Top = 47
Width = 60
Height = 13
Caption = #24402#36824#26085#26399#65306
FocusControl = DBEdit7
end
object Label9: TLabel
Left = 268
Top = 47
Width = 36
Height = 13
Caption = #22791#27880#65306
FocusControl = DBEdit8
end
object Label10: TLabel
Left = 10
Top = 8
Width = 60
Height = 13
Caption = #26723#26696#32534#21495#65306
FocusControl = DBEdit6
end
object DBEdit5: TDBEdit
Left = 140
Top = 24
Width = 361
Height = 21
DataField = 'Return_Name'
DataSource = DM.DS_Return
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
TabOrder = 0
end
object DBEdit6: TDBEdit
Left = 9
Top = 63
Width = 93
Height = 21
DataField = 'Return_Person'
DataSource = DM.DS_Return
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
TabOrder = 1
end
object DBEdit7: TDBEdit
Left = 112
Top = 63
Width = 145
Height = 21
DataField = 'Return_Date'
DataSource = DM.DS_Return
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
TabOrder = 2
end
object DBEdit8: TDBEdit
Left = 268
Top = 63
Width = 233
Height = 21
DataField = 'Return_Memo'
DataSource = DM.DS_Return
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
TabOrder = 3
end
object ME_Return: TMaskEdit
Left = 9
Top = 24
Width = 118
Height = 21
Enabled = False
EditMask = '!999999;1;_'
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
MaxLength = 6
TabOrder = 4
Text = ' '
OnChange = ME_ReturnChange
end
end
object DBGrid2: TDBGrid
Left = 0
Top = 115
Width = 513
Height = 190
DataSource = DM.DS_Return
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
TabOrder = 1
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'Return_ID'
Title.Alignment = taCenter
Title.Caption = #26723#26696#32534#21495
Visible = True
end
item
Expanded = False
FieldName = 'Return_Name'
Title.Alignment = taCenter
Title.Caption = #26723#26696#21517#31216
Visible = True
end
item
Expanded = False
FieldName = 'Return_Person'
Title.Alignment = taCenter
Title.Caption = #24402#36824#20154#21592
Visible = True
end
item
Expanded = False
FieldName = 'Return_Date'
Title.Alignment = taCenter
Title.Caption = #24402#36824#26085#26399
Width = 90
Visible = True
end
item
Expanded = False
FieldName = 'Return_Memo'
Title.Alignment = taCenter
Title.Caption = #22791#27880
Width = 144
Visible = True
end>
end
end
end
inherited cmdadd: TButton
Left = 112
Top = 344
end
inherited cmdpre: TButton
Left = 112
Top = 384
end
inherited cmdmodi: TButton
Left = 176
Top = 344
end
inherited cmdnext: TButton
Left = 176
Top = 384
end
inherited cmdsearch: TButton
Left = 248
Top = 344
end
inherited cmdlast: TButton
Left = 248
Top = 384
end
inherited cmddel: TButton
Left = 312
Top = 344
OnClick = cmddelClick
end
inherited cmdstore: TButton
Left = 312
Top = 384
end
inherited cmdfirst: TButton
Left = 376
Top = 344
end
inherited cmdquit: TButton
Left = 376
Top = 384
end
object DBNavigator: TDBNavigator
Left = 168
Top = 128
Width = 200
Height = 41
TabOrder = 11
Visible = False
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -