unit14.dfm
来自「玉龙飞雪进销存管理系统,可以帮您管理进销存的软件」· DFM 代码 · 共 85 行
DFM
85 行
object Formmima: TFormmima
Left = 255
Top = 182
BorderIcons = [biSystemMenu, biMinimize]
BorderStyle = bsSingle
ClientHeight = 107
ClientWidth = 184
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object SpeedButton1: TSpeedButton
Left = 8
Top = 72
Width = 65
Height = 33
Caption = #30830' '#23450
Flat = True
OnClick = Button1Click
end
object SpeedButton2: TSpeedButton
Left = 104
Top = 72
Width = 65
Height = 30
Caption = #36864' '#20986
Flat = True
OnClick = Button2Click
end
object Label1: TLabel
Left = 16
Top = 16
Width = 40
Height = 13
Caption = #21517' '#31216
end
object Label2: TLabel
Left = 16
Top = 48
Width = 40
Height = 13
Caption = #23494' '#30721
end
object Edit1: TEdit
Left = 80
Top = 8
Width = 89
Height = 21
TabOrder = 0
end
object Edit2: TEdit
Left = 80
Top = 40
Width = 89
Height = 21
PasswordChar = '*'
TabOrder = 1
end
object Table1: TTable
AutoCalcFields = False
DatabaseName = 'mydb'
TableName = 'pwd.DB'
Left = 112
Top = 32
end
object Database1: TDatabase
Connected = True
DatabaseName = 'mydb'
DriverName = 'STANDARD'
Params.Strings = (
'PATH=database'
'DEFAULT DRIVER=PARADOX'
'ENABLE BCD=FALSE')
SessionName = 'Default'
Left = 72
Top = 32
end
end
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?