📄 unit1.~dfm
字号:
object Form1: TForm1
Left = 207
Top = 130
Hint = #26597#25214#20294#21069#30446#24405#21450#23376#30446#24405#20013'Excel'#25991#20214#25351#23450#20869#23481
AlphaBlend = True
AlphaBlendValue = 200
BorderStyle = bsNone
Caption = #26597#35810
ClientHeight = 28
ClientWidth = 187
Color = clMoneyGreen
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #21326#25991#20223#23435
Font.Style = []
FormStyle = fsStayOnTop
KeyPreview = True
OldCreateOrder = False
ShowHint = True
OnCloseQuery = FormCloseQuery
OnCreate = FormCreate
OnDblClick = FormDblClick
OnKeyUp = FormKeyUp
PixelsPerInch = 96
TextHeight = 14
object SpeedButton2: TSpeedButton
Left = 128
Top = 2
Width = 57
Height = 23
Caption = #26597
Flat = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
OnClick = SpeedButton2Click
end
object SpeedButton1: TSpeedButton
Left = 168
Top = -7
Width = 16
Height = 19
Caption = 'x'
Flat = True
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = '@Arial Unicode MS'
Font.Style = [fsBold]
ParentFont = False
OnClick = SpeedButton1Click
end
object Button6: TButton
Left = 199
Top = 1
Width = 89
Height = 25
Caption = #30830#35748#25991#20214
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
Visible = False
OnClick = Button6Click
end
object Edit1: TEdit
Left = 4
Top = 4
Width = 121
Height = 20
Hint = #26597#35810#20869#23481
Color = clMoneyGreen
Ctl3D = False
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #26999#20307'_GB2312'
Font.Style = []
ImeMode = imChinese
ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
ParentCtl3D = False
ParentFont = False
TabOrder = 1
OnDblClick = FormDblClick
OnKeyDown = Edit1KeyDown
end
object ListBox1: TListBox
Left = 0
Top = 30
Width = 313
Height = 121
ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
ItemHeight = 14
TabOrder = 2
end
object CheckBox1: TCheckBox
Left = 132
Top = 7
Width = 13
Height = 14
Hint = #31934#30830#26597#25214
Ctl3D = False
ParentCtl3D = False
TabOrder = 3
end
object ExcelApplication1: TExcelApplication
AutoConnect = False
ConnectKind = ckNewInstance
AutoQuit = False
Left = 16
Top = 72
end
object book1: TExcelWorkbook
AutoConnect = False
ConnectKind = ckRunningOrNew
Left = 48
Top = 72
end
object sheet1: TExcelWorksheet
AutoConnect = False
ConnectKind = ckRunningOrNew
Left = 80
Top = 72
end
object book2: TExcelWorkbook
AutoConnect = False
ConnectKind = ckRunningOrNew
Left = 48
Top = 104
end
object sheet2: TExcelWorksheet
AutoConnect = False
ConnectKind = ckRunningOrNew
Left = 80
Top = 104
end
object OpenDialog1: TOpenDialog
Left = 272
end
object ExcelApplication2: TExcelApplication
AutoConnect = False
ConnectKind = ckNewInstance
AutoQuit = True
Left = 16
Top = 104
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -