?? frm_main.dfm
字號:
object Form1: TForm1
Left = 190
Top = 107
Width = 675
Height = 487
Caption = 'EXCEL'#25511#21046#31243#24207
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
PixelsPerInch = 96
TextHeight = 13
object DBGrid1: TDBGrid
Left = 0
Top = 0
Width = 667
Height = 185
Align = alTop
DataSource = DataSource1
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
end
object rbtoexcel: TGroupBox
Left = 0
Top = 255
Width = 667
Height = 205
Align = alBottom
Caption = 'EXCEL'#36873#39033#35774#32622
TabOrder = 1
object Label1: TLabel
Left = 40
Top = 104
Width = 72
Height = 13
Caption = #21512#24182#36215#22987#26684#23376
end
object Label2: TLabel
Left = 40
Top = 136
Width = 72
Height = 13
Caption = #21512#24182#32467#26463#26684#23376
end
object Label3: TLabel
Left = 48
Top = 56
Width = 24
Height = 13
Caption = #39029#33050
end
object Label4: TLabel
Left = 48
Top = 24
Width = 24
Height = 13
Caption = #39029#30473
end
object edtleftheader: TEdit
Left = 96
Top = 24
Width = 121
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
TabOrder = 0
Text = #24038#39029#30473
end
object edtcenterheader: TEdit
Left = 312
Top = 24
Width = 121
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
TabOrder = 1
Text = #20013#39029#30473
end
object edtrightheader: TEdit
Left = 520
Top = 24
Width = 121
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
TabOrder = 2
Text = #21491#39029#30473
end
object edtleftfooter: TEdit
Left = 96
Top = 56
Width = 121
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
TabOrder = 3
Text = #24038#39029#33050
end
object edtcenterfooter: TEdit
Left = 312
Top = 56
Width = 121
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
TabOrder = 4
Text = #20013#39029#33050
end
object edtrightfooter: TEdit
Left = 520
Top = 56
Width = 121
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
TabOrder = 5
Text = #21491#39029#33050
end
object edtbeginx: TEdit
Left = 128
Top = 96
Width = 49
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
TabOrder = 6
Text = '1'
end
object edtendx: TEdit
Left = 128
Top = 136
Width = 49
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
TabOrder = 7
Text = '2'
end
object edtbeginy: TEdit
Left = 208
Top = 96
Width = 41
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
TabOrder = 8
Text = '1'
end
object edtendy: TEdit
Left = 208
Top = 136
Width = 41
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
TabOrder = 9
Text = '2'
end
object cbtitle: TCheckBox
Left = 352
Top = 104
Width = 97
Height = 17
Caption = #26159#21542#23548#20986#34920#22836
TabOrder = 10
end
object Button1: TButton
Left = 480
Top = 104
Width = 113
Height = 25
Caption = #25968#25454#34920#23548#20986
TabOrder = 11
OnClick = Button1Click
end
object btnmerge: TButton
Left = 136
Top = 168
Width = 75
Height = 25
Caption = #25191#34892#21512#24182
TabOrder = 12
OnClick = btnmergeClick
end
object btnfont: TButton
Left = 360
Top = 152
Width = 217
Height = 25
Caption = #21333#20803#26684#23383#20307#25511#21046'/'#25554#20837#20998#39029#31526
TabOrder = 13
OnClick = btnfontClick
end
end
object DBNavigator1: TDBNavigator
Left = 56
Top = 224
Width = 240
Height = 25
DataSource = DataSource1
TabOrder = 2
end
object DBEdit1: TDBEdit
Left = 56
Top = 192
Width = 121
Height = 21
DataField = 'Title'
DataSource = DataSource1
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
ParentFont = False
TabOrder = 3
end
object ExcelApplication1: TExcelApplication
AutoConnect = False
ConnectKind = ckRunningOrNew
AutoQuit = False
Left = 344
Top = 200
end
object ExcelWorksheet1: TExcelWorksheet
AutoConnect = False
ConnectKind = ckRunningOrNew
Left = 408
Top = 200
end
object ExcelWorkbook1: TExcelWorkbook
AutoConnect = False
ConnectKind = ckRunningOrNew
Left = 376
Top = 200
end
object DataSource1: TDataSource
DataSet = ADOTable1
Left = 200
Top = 112
end
object ADOConnection1: TADOConnection
Connected = True
ConnectionString =
'Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security In' +
'fo=False;Initial Catalog=Northwind;Data Source=ZWEI-GUEST02;Use ' +
'Procedure for Prepare=1;Auto Translate=True;Packet Size=4096;Wor' +
'kstation ID=ZWEI-GUEST02;Use Encryption for Data=False;Tag with ' +
'column collation when possible=False'
LoginPrompt = False
Provider = 'SQLOLEDB.1'
Left = 136
Top = 112
end
object ADOTable1: TADOTable
Active = True
Connection = ADOConnection1
CursorType = ctStatic
TableName = 'Employees'
Left = 168
Top = 112
end
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -