📄 mainunit.~dfm
字号:
object frmMain: TfrmMain
Left = 51
Top = 203
Width = 477
Height = 420
BorderIcons = []
Caption = #20027#31383#20307
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Menu = MainMenu
OldCreateOrder = False
OnCloseQuery = FormCloseQuery
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object GroupBox1: TGroupBox
Left = 8
Top = 280
Width = 225
Height = 81
Caption = #25968#25454#27983#35272
TabOrder = 0
object btn_First: TButton
Left = 8
Top = 16
Width = 89
Height = 25
Caption = #31532#19968#26465#35760#24405
TabOrder = 0
OnClick = btn_FirstClick
end
object btn_Next: TButton
Left = 128
Top = 16
Width = 89
Height = 25
Caption = #21518#19968#26465#35760#24405
TabOrder = 1
OnClick = btn_NextClick
end
object btn_Prev: TButton
Left = 8
Top = 48
Width = 89
Height = 25
Caption = #21069#19968#26465#35760#24405
TabOrder = 2
OnClick = btn_PrevClick
end
object btn_Last: TButton
Left = 128
Top = 48
Width = 89
Height = 25
Caption = #26411#19968#26465#35760#24405
TabOrder = 3
OnClick = btn_LastClick
end
end
object GroupBox2: TGroupBox
Left = 240
Top = 280
Width = 217
Height = 81
Caption = #25968#25454#25805#20316
TabOrder = 1
object btn_Add: TButton
Left = 8
Top = 16
Width = 81
Height = 25
Caption = #28155#21152#35760#24405
TabOrder = 0
OnClick = btn_AddClick
end
object btn_Update: TButton
Left = 120
Top = 16
Width = 89
Height = 25
Caption = #26356#26032#35760#24405
TabOrder = 1
OnClick = btn_UpdateClick
end
object btn_Edit: TButton
Left = 8
Top = 48
Width = 81
Height = 25
Caption = #32534#36753#35760#24405
TabOrder = 2
OnClick = btn_EditClick
end
object btn_Delete: TButton
Left = 120
Top = 48
Width = 89
Height = 25
Caption = #21024#38500#35760#24405
TabOrder = 3
OnClick = btn_DeleteClick
end
end
object TabbedNotebook: TTabbedNotebook
Left = 8
Top = 8
Width = 449
Height = 265
PageIndex = 1
TabFont.Charset = DEFAULT_CHARSET
TabFont.Color = clBtnText
TabFont.Height = -11
TabFont.Name = 'MS Sans Serif'
TabFont.Style = []
TabOrder = 2
object TTabPage
Left = 4
Top = 24
Caption = #25991#26412#26174#31034
object GroupBox3: TGroupBox
Left = 8
Top = 8
Width = 425
Height = 217
Caption = #25968#25454#26174#31034#21306
TabOrder = 0
object Label1: TLabel
Left = 16
Top = 16
Width = 49
Height = 13
AutoSize = False
Caption = #37038#20214#21495
end
object Label2: TLabel
Left = 16
Top = 36
Width = 41
Height = 13
AutoSize = False
Caption = #21457#20214#20154
end
object Label3: TLabel
Left = 16
Top = 56
Width = 60
Height = 13
Caption = #21457#20214#20154#22320#22336
end
object Label4: TLabel
Left = 16
Top = 77
Width = 73
Height = 13
AutoSize = False
Caption = #21457#20214#20154#37038#32534
end
object Label5: TLabel
Left = 16
Top = 97
Width = 49
Height = 13
AutoSize = False
Caption = #25910#20214#20154
end
object Label6: TLabel
Left = 16
Top = 118
Width = 73
Height = 13
AutoSize = False
Caption = #25910#20214#20154#22320#22336
end
object Label7: TLabel
Left = 16
Top = 138
Width = 73
Height = 13
AutoSize = False
Caption = #25910#20214#20154#37038#32534
end
object Label8: TLabel
Left = 16
Top = 159
Width = 65
Height = 13
AutoSize = False
Caption = #26159#21542#33322#31354
end
object Label9: TLabel
Left = 16
Top = 179
Width = 65
Height = 13
AutoSize = False
Caption = #37038#20214#37325#37327
end
object Label10: TLabel
Left = 16
Top = 200
Width = 65
Height = 13
AutoSize = False
Caption = #24050#20184#37038#36164
end
object MailCost: TDBEdit
Left = 160
Top = 192
Width = 121
Height = 21
DataField = #24050#20184#37038#36164
DataSource = DataControlModule.MailDataSource
TabOrder = 0
end
object MailHigtht: TDBEdit
Left = 160
Top = 172
Width = 121
Height = 21
DataField = #37038#20214#37325#37327
DataSource = DataControlModule.MailDataSource
TabOrder = 1
end
object AirPlane: TDBCheckBox
Left = 160
Top = 155
Width = 97
Height = 17
DataField = #26159#21542#33322#31354
DataSource = DataControlModule.MailDataSource
TabOrder = 2
ValueChecked = 'True'
ValueUnchecked = 'False'
end
object ReceiverNum: TDBEdit
Left = 160
Top = 133
Width = 121
Height = 21
DataField = #25910#20214#20154#37038#32534
DataSource = DataControlModule.MailDataSource
TabOrder = 3
end
object ReceiverAddress: TDBEdit
Left = 160
Top = 112
Width = 257
Height = 21
DataField = #25910#20214#20154#22320#22336
DataSource = DataControlModule.MailDataSource
TabOrder = 4
end
object Receiver: TDBEdit
Left = 160
Top = 91
Width = 177
Height = 21
DataField = #25910#20214#20154
DataSource = DataControlModule.MailDataSource
TabOrder = 5
end
object SenderNum: TDBEdit
Left = 160
Top = 70
Width = 121
Height = 21
DataField = #21457#20214#20154#37038#32534
DataSource = DataControlModule.MailDataSource
TabOrder = 6
end
object SenderAddress: TDBEdit
Left = 160
Top = 49
Width = 257
Height = 21
DataField = #21457#20214#20154#22320#22336
DataSource = DataControlModule.MailDataSource
TabOrder = 7
end
object Sender: TDBEdit
Left = 160
Top = 28
Width = 177
Height = 21
DataField = #21457#20214#20154
DataSource = DataControlModule.MailDataSource
TabOrder = 8
end
object MailNum: TDBEdit
Left = 160
Top = 8
Width = 121
Height = 21
DataField = #37038#20214#21495
DataSource = DataControlModule.MailDataSource
TabOrder = 9
end
end
end
object TTabPage
Left = 4
Top = 24
HelpContext = 1
Caption = #34920#26684#26174#31034
object DBGrid: TDBGrid
Left = 8
Top = 8
Width = 425
Height = 217
DataSource = DataControlModule.MailDataSource
ReadOnly = True
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
end
end
end
object MainMenu: TMainMenu
Left = 336
object N1: TMenuItem
Caption = #25991#20214
object mnu_Exit: TMenuItem
Caption = #36864#20986
OnClick = mnu_ExitClick
end
end
object N2: TMenuItem
Caption = #26174#31034
object mnu_Grid: TMenuItem
Caption = #32593#26684#26174#31034
OnClick = mnu_GridClick
end
object mnu_Text: TMenuItem
Caption = #25991#26412#26174#31034
OnClick = mnu_TextClick
end
object Saperator: TMenuItem
Caption = '-'
end
object mnu_Transact: TMenuItem
Caption = #22788#29702#24773#20917
OnClick = mnu_TransactClick
end
end
object N3: TMenuItem
Caption = #35774#32622
object mnu_UserManager: TMenuItem
Caption = #29992#25143#31649#29702
OnClick = mnu_UserManagerClick
end
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -