📄 ufrmcomparetb.dfm
字号:
object frmCompareTB: TfrmCompareTB
Left = 249
Top = 109
BorderStyle = bsSingle
Caption = #25968#25454#24211#27604#36739
ClientHeight = 560
ClientWidth = 1016
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poDesktopCenter
WindowState = wsMaximized
OnDestroy = FormDestroy
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 14
object Panel3: TPanel
Left = 0
Top = 265
Width = 1016
Height = 295
Align = alClient
TabOrder = 0
object lv: TListView
Left = 1
Top = 1
Width = 320
Height = 293
Align = alLeft
Columns = <
item
Caption = #34920#21517
Width = 150
end
item
Alignment = taCenter
Caption = #25968#25454#24211'A'
Width = 70
end
item
Alignment = taCenter
Caption = #25968#25454#24211'B'
Width = 70
end>
ColumnClick = False
GridLines = True
HideSelection = False
Items.Data = {
9E0000000500000000000000FFFFFFFFFFFFFFFF010000000000000003616161
0362626200000000FFFFFFFFFFFFFFFF01000000000000000331323303343536
00000000FFFFFFFFFFFFFFFF0100000000000000036363630331323301000000
FFFFFFFFFFFFFFFF0100000000000000033435360364646400000000FFFFFFFF
FFFFFFFF010000000000000003666666036767670100FFFFFFFFFFFFFFFF}
ReadOnly = True
RowSelect = True
SmallImages = ImageList1
TabOrder = 1
ViewStyle = vsReport
OnCustomDrawItem = lvCustomDrawItem
end
object Panel5: TPanel
Left = 321
Top = 1
Width = 120
Height = 293
Align = alLeft
BevelInner = bvLowered
TabOrder = 2
object lab: TLabel
Left = 24
Top = 136
Width = 7
Height = 14
Caption = '0'
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object BitBtn2: TBitBtn
Left = 20
Top = 56
Width = 80
Height = 30
Caption = #27604#36739#23383#27573' &Z'
TabOrder = 0
OnClick = BitBtn2Click
end
object BitBtn1: TBitBtn
Left = 20
Top = 16
Width = 80
Height = 30
Caption = #27604#36739#34920' &B'
TabOrder = 1
OnClick = BitBtn1Click
end
object BitBtn3: TBitBtn
Left = 20
Top = 96
Width = 80
Height = 30
Caption = #19979#19968#39033' &N'
TabOrder = 2
OnClick = BitBtn3Click
end
end
object lv1: TListView
Left = 441
Top = 1
Width = 574
Height = 293
Align = alClient
Columns = <
item
Caption = 'A '#34920
Width = 100
end
item
Alignment = taCenter
Caption = #31867#22411
Width = 100
end
item
Alignment = taCenter
Caption = #38271#24230
end
item
Caption = 'B '#34920
Width = 100
end
item
Caption = #31867#22411
Width = 100
end
item
Caption = #38271#24230
end>
ColumnClick = False
GridLines = True
HideSelection = False
Items.Data = {
9E0000000500000000000000FFFFFFFFFFFFFFFF010000000000000003616161
0362626200000000FFFFFFFFFFFFFFFF01000000000000000331323303343536
00000000FFFFFFFFFFFFFFFF0100000000000000036363630331323301000000
FFFFFFFFFFFFFFFF0100000000000000033435360364646400000000FFFFFFFF
FFFFFFFF010000000000000003666666036767670100FFFFFFFFFFFFFFFF}
ReadOnly = True
RowSelect = True
SmallImages = ImageList1
TabOrder = 0
ViewStyle = vsReport
OnCustomDrawItem = lv1CustomDrawItem
end
end
object Panel4: TPanel
Left = 0
Top = 0
Width = 1016
Height = 265
Align = alTop
TabOrder = 1
object Panel1: TPanel
Left = 1
Top = 1
Width = 300
Height = 263
Align = alLeft
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 0
object Label1: TLabel
Left = 16
Top = 16
Width = 45
Height = 13
AutoSize = False
Caption = #26381#21153#22120
end
object Label2: TLabel
Left = 16
Top = 40
Width = 45
Height = 13
AutoSize = False
Caption = #25968#25454#24211
end
object Label3: TLabel
Left = 16
Top = 64
Width = 44
Height = 13
AutoSize = False
Caption = #29992#25143#21517
end
object Label4: TLabel
Left = 16
Top = 88
Width = 33
Height = 13
AutoSize = False
Caption = #23494#30721
end
object edita1: TEdit
Left = 64
Top = 8
Width = 121
Height = 22
TabOrder = 0
Text = '127.0.0.1'
end
object edita2: TEdit
Left = 64
Top = 32
Width = 121
Height = 22
TabOrder = 1
Text = 'master'
end
object edita3: TEdit
Left = 64
Top = 56
Width = 121
Height = 22
TabOrder = 2
Text = 'sa'
end
object edita4: TEdit
Left = 64
Top = 80
Width = 121
Height = 22
TabOrder = 3
end
object btnlink1: TButton
Left = 208
Top = 8
Width = 73
Height = 41
Caption = #36830#25509'(&1)'
TabOrder = 4
OnClick = btnlink1Click
end
object btnunlink1: TButton
Left = 208
Top = 56
Width = 73
Height = 41
Caption = #26029#24320'(&2)'
Enabled = False
TabOrder = 5
OnClick = btnunlink1Click
end
object ListBox1: TListBox
Left = 2
Top = 111
Width = 296
Height = 120
Align = alBottom
ItemHeight = 14
TabOrder = 6
end
object pnlZS1: TPanel
Left = 2
Top = 231
Width = 296
Height = 30
Align = alBottom
BevelOuter = bvNone
Font.Charset = ANSI_CHARSET
Font.Color = clBlue
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 7
end
end
object Panel2: TPanel
Left = 301
Top = 1
Width = 300
Height = 263
Align = alLeft
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 1
object Label6: TLabel
Left = 16
Top = 16
Width = 49
Height = 13
AutoSize = False
Caption = #26381#21153#22120
end
object Label7: TLabel
Left = 16
Top = 40
Width = 47
Height = 13
AutoSize = False
Caption = #25968#25454#24211
end
object Label8: TLabel
Left = 16
Top = 64
Width = 44
Height = 13
AutoSize = False
Caption = #29992#25143#21517
end
object Label9: TLabel
Left = 16
Top = 88
Width = 34
Height = 13
AutoSize = False
Caption = #23494#30721
end
object editb1: TEdit
Left = 64
Top = 8
Width = 121
Height = 22
TabOrder = 0
Text = '127.0.0.1'
end
object editb4: TEdit
Left = 64
Top = 80
Width = 121
Height = 22
TabOrder = 3
end
object editb3: TEdit
Left = 64
Top = 56
Width = 121
Height = 22
TabOrder = 2
Text = 'sa'
end
object editb2: TEdit
Left = 64
Top = 32
Width = 121
Height = 22
TabOrder = 1
Text = 'master'
end
object btnlink2: TButton
Left = 208
Top = 8
Width = 73
Height = 41
Caption = #36830#25509'(&3)'
TabOrder = 4
OnClick = btnlink2Click
end
object btnunlink2: TButton
Left = 208
Top = 56
Width = 73
Height = 41
Caption = #26029#24320'(&4)'
Enabled = False
TabOrder = 5
OnClick = btnunlink2Click
end
object ListBox2: TListBox
Left = 2
Top = 111
Width = 296
Height = 120
Align = alBottom
ItemHeight = 14
TabOrder = 6
end
object pnlZS2: TPanel
Left = 2
Top = 231
Width = 296
Height = 30
Align = alBottom
BevelOuter = bvNone
Font.Charset = ANSI_CHARSET
Font.Color = clBlue
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 7
end
end
object mo: TMemo
Left = 601
Top = 1
Width = 414
Height = 263
Align = alClient
ScrollBars = ssVertical
TabOrder = 2
end
end
object Database1: TDatabase
DatabaseName = 'dbA'
DriverName = 'MSSQL'
LoginPrompt = False
Params.Strings = (
'DATABASE NAME='
'SERVER NAME=MSS_SERVER'
'USER NAME=MYNAME'
'OPEN MODE=READ/WRITE'
'SCHEMA CACHE SIZE=8'
'BLOB EDIT LOGGING='
'LANGDRIVER='
'SQLQRYMODE='
'SQLPASSTHRU MODE=SHARED AUTOCOMMIT'
'DATE MODE=0'
'SCHEMA CACHE TIME=-1'
'MAX QUERY TIME=300'
'MAX ROWS=-1'
'BATCH COUNT=200'
'ENABLE SCHEMA CACHE=FALSE'
'SCHEMA CACHE DIR='
'HOST NAME='
'APPLICATION NAME='
'NATIONAL LANG NAME='
'ENABLE BCD=FALSE'
'TDS PACKET SIZE=4096'
'BLOBS TO CACHE=64'
'BLOB SIZE=32'
'PASSWORD=')
SessionName = 'Default'
AfterConnect = Database1AfterConnect
AfterDisconnect = Database1AfterDisconnect
Left = 184
Top = 104
end
object Query1: TQuery
DatabaseName = 'dbA'
SQL.Strings = (
'select * from xzqhinfo')
Left = 184
Top = 152
end
object DataSource1: TDataSource
DataSet = Query1
Left = 184
Top = 200
end
object Database2: TDatabase
DatabaseName = 'dbB'
DriverName = 'MSSQL'
LoginPrompt = False
Params.Strings = (
'DATABASE NAME='
'SERVER NAME=MSS_SERVER'
'USER NAME=MYNAME'
'OPEN MODE=READ/WRITE'
'SCHEMA CACHE SIZE=8'
'BLOB EDIT LOGGING='
'LANGDRIVER='
'SQLQRYMODE='
'SQLPASSTHRU MODE=SHARED AUTOCOMMIT'
'DATE MODE=0'
'SCHEMA CACHE TIME=-1'
'MAX QUERY TIME=300'
'MAX ROWS=-1'
'BATCH COUNT=200'
'ENABLE SCHEMA CACHE=FALSE'
'SCHEMA CACHE DIR='
'HOST NAME='
'APPLICATION NAME='
'NATIONAL LANG NAME='
'ENABLE BCD=FALSE'
'TDS PACKET SIZE=4096'
'BLOBS TO CACHE=64'
'BLOB SIZE=32'
'PASSWORD=')
SessionName = 'Default'
AfterConnect = Database2AfterConnect
AfterDisconnect = Database2AfterDisconnect
Left = 568
Top = 104
end
object Query2: TQuery
DatabaseName = 'dbB'
Left = 568
Top = 152
end
object DataSource2: TDataSource
DataSet = Query2
Left = 568
Top = 200
end
object ActionList1: TActionList
Left = 632
Top = 64
object actEsc: TAction
Caption = 'actEsc'
ShortCut = 27
OnExecute = actEscExecute
end
end
object ImageList1: TImageList
Height = 18
Width = 0
Left = 257
Top = 185
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -