📄 mc_dcfy_lr.~dfm
字号:
end
object Label3: TLabel
Left = 12
Top = 13
Width = 72
Height = 12
Caption = #26381#21153#21592#32534#21495#65306
end
object Label4: TLabel
Left = 128
Top = 13
Width = 72
Height = 12
Caption = #26381#21153#21592#22995#21517#65306
end
object Label13: TLabel
Left = 476
Top = 13
Width = 60
Height = 12
Caption = #32467#24080#32534#21495#65306
end
object Label1: TLabel
Left = 636
Top = 13
Width = 84
Height = 12
Caption = #24635#35745#28040#36153#37329#39069#65306
end
object Label14: TLabel
Left = 720
Top = 13
Width = 6
Height = 12
Caption = '0'
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsUnderline]
ParentFont = False
end
object Label15: TLabel
Left = 88
Top = 13
Width = 6
Height = 12
Caption = '1'
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label16: TLabel
Left = 204
Top = 13
Width = 24
Height = 12
Caption = #26446#28059
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label17: TLabel
Left = 327
Top = 13
Width = 42
Height = 12
Caption = 'Label17'
Font.Charset = GB2312_CHARSET
Font.Color = clLime
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label18: TLabel
Left = 536
Top = 13
Width = 42
Height = 12
Caption = 'Label18'
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
end
object Panel2: TPanel
Left = 527
Top = 10
Width = 258
Height = 62
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 2
object BitBtn2: TBitBtn
Left = 9
Top = 5
Width = 120
Height = 25
Caption = #24320#22987#28857#33756'[&K]'
TabOrder = 0
OnClick = BitBtn2Click
Glyph.Data = {
42020000424D4202000000000000420000002800000010000000100000000100
1000030000000002000000000000000000000000000000000000007C0000E003
00001F0000001F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C21044A29210400000000
1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7CF75EFF7FF75EF75E0000
1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C000085654C7EC0301F7C
1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C0000C03085654C7E4C7EC0301F7C
1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7CC0308565327F8565327F8565C0301F7C
1F7C1F7C1F7C1F7C1F7C1F7C1F7CC0304C7E327FC0304C7E4C7E4C7EC0301F7C
1F7C1F7C1F7C1F7C1F7C1F7C0000C0304C7E856500001F7C1F7C8565C0301F7C
1F7C1F7C1F7C1F7C00000000830C830C830C830C830C00000000830C830C0000
000000001F7C08214A29CE39524A744E7B6FFD7FFF7FFF7FFD7FFD7F3F67744E
524ACE3900001F7C1F7C7B6FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F
00001F7C1F7C1F7C1F7C7B6FFF7FFF7FFF7FFF7FFF7FFF7F524AFF7FFF7FFF7F
00001F7C1F7C1F7C1F7C7B6FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F
00001F7C1F7C1F7C1F7C7B6FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F
00001F7C1F7C1F7C1F7C7B6F524A524AFF7FFF7FFF7FFF7FFF7FFF7F006CFF7F
00001F7C1F7C1F7C1F7C7B6F7B6F7B6F7B6F7B6F7B6F7B6F7B6F7B6F7B6F7B6F
00001F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C
1F7C1F7C1F7C}
end
object BitBtn3: TBitBtn
Left = 133
Top = 5
Width = 116
Height = 25
Caption = #30830#23450#36820#22238'[&E]'
TabOrder = 1
OnClick = BitBtn3Click
Glyph.Data = {
42020000424D4202000000000000420000002800000010000000100000000100
1000030000000002000000000000000000000000000000000000007C0000E003
00001F0000001F7C1F7C5F4A5F4A5F4A5F4A5F4A5F4A5F4A5F4A5F4A5F4A5F4A
5F4A5F4A5F4A0000CE39CE39CE39CE39CE39CE39CE39CE39CE39CE39CE39CE39
CE3908215F4A0000FD7F7B6F396739670000000000000000000000000000744E
744E08215F4A0000FD7FFD7F7B6F396739670000327F327F0000744E744E744E
744E08215F4A0000FD7FFD7FFD7F7B6F39670000327F0000327F327F744E744E
744E08215F4A0000FD7FFD7FFD7FFD7F7B6F0000327F327FFF7F0C480000744E
744E08215F4A0000FD7FFD7FFD7FFD7FFD7F327F327F327F327F327F327F744E
744E08215F4A0000FD7FFD7FFD7FFD7F4C16327F327F327F327F327F327F0000
744E08215F4A0000FD7FFD7FFD7FFF7F327F327F327F0000327F0000327F0000
744E08215F4A0000FD7FFD7FFF7F92499249327F00001214327F00000000744E
744E08211F7C1F7CFF7F9931830C92490000327F0000327F327F327F00000000
000000001F7C1F7C1F7CFF7F830C9249924992490000327F9249327F00000000
1F7C1F7C1F7C1F7C1F7C1F7C0000924992499249924992499249924900009249
1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C92499249924992499249924992499249
1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C830C92490000924992499249830C
1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C830C830C830C1F7C1F7C
1F7C1F7C1F7C}
end
object BitBtn1: TBitBtn
Left = 9
Top = 32
Width = 121
Height = 25
Caption = #25918#24323#24320#21488'[&Q]'
TabOrder = 2
OnClick = BitBtn1Click
Glyph.Data = {
DE010000424DDE01000000000000760000002800000024000000120000000100
0400000000006801000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333333333333333333333000033338833333333333333333F333333333333
0000333911833333983333333388F333333F3333000033391118333911833333
38F38F333F88F33300003339111183911118333338F338F3F8338F3300003333
911118111118333338F3338F833338F3000033333911111111833333338F3338
3333F8330000333333911111183333333338F333333F83330000333333311111
8333333333338F3333383333000033333339111183333333333338F333833333
00003333339111118333333333333833338F3333000033333911181118333333
33338333338F333300003333911183911183333333383338F338F33300003333
9118333911183333338F33838F338F33000033333913333391113333338FF833
38F338F300003333333333333919333333388333338FFF830000333333333333
3333333333333333333888330000333333333333333333333333333333333333
0000}
NumGlyphs = 2
end
object BitBtn4: TBitBtn
Left = 133
Top = 32
Width = 57
Height = 25
Hint = #25346#36215#24403#21069#28857#33756#20449#24687
Caption = #25346#21333
Enabled = False
TabOrder = 3
end
object BitBtn5: TBitBtn
Left = 192
Top = 32
Width = 57
Height = 25
Hint = #35835#20837#25346#36215#30340#28857#33756#20449#24687
Caption = #35835#21333
Enabled = False
TabOrder = 4
end
end
object Panel3: TPanel
Left = 527
Top = 70
Width = 258
Height = 27
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 3
object Label19: TLabel
Left = 48
Top = 6
Width = 168
Height = 20
Caption = #26126#26085#31185#25216#26377#38480#20844#21496
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = #26999#20307'_GB2312'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object Label20: TLabel
Left = 47
Top = 5
Width = 168
Height = 20
Caption = #26126#26085#31185#25216#26377#38480#20844#21496
Font.Charset = GB2312_CHARSET
Font.Color = clWhite
Font.Height = -20
Font.Name = #26999#20307'_GB2312'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
end
object ListBox2: TListBox
Left = 682
Top = 121
Width = 79
Height = 53
Color = clBlue
Font.Charset = GB2312_CHARSET
Font.Color = clWhite
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ItemHeight = 12
Items.Strings = (
#28857#21333
#36192#21333)
ParentFont = False
TabOrder = 5
Visible = False
OnKeyPress = ListBox2KeyPress
end
object ImageList1: TImageList
Left = 712
Top = 248
end
object Query1: TQuery
DatabaseName = 'CYGLDATE'
SQL.Strings = (
'select '#24211#23384#20449#24687#34920'.* From '#24211#23384#20449#24687#34920','#37202#27700#36153#29992#20449#24687#34920' Where '#24211#23384#20449#24687#34920'.'#32534#21495'='#37202#27700#36153#29992#20449#24687#34920'.'#36135#23384#32534#21495)
Left = 488
Top = 16
end
object Query2: TQuery
DatabaseName = 'CYGLDATE'
SQL.Strings = (
'Insert '#28857#33756#20020#26102#34920' ('#25151#38388#21488#21495','#32534#21495','#21517#31216','#31867#22411','#21333#20301','#25968#37327','#20215#26684','#21512#35745','#26381#21153#21592#32534#21495','#26381#21153#21592#22995#21517','#29366#24577','#28857#21333#26085#26399','#32467#24080#32534#21495 +
','#26159#21542#32467#21333')'
'Add('#39'Values(:'#25151#38388#21488#21495',:'#32534#21495',:'#21517#31216',:'#31867#22411',:'#21333#20301',:'#25968#37327',:'#20215#26684',:'#21512#35745',:'#26381#21153#21592#32534#21495',:'#26381#21153#21592#21517#31216',:'#29366#24577',' +
':'#28857#21333#26085#26399',:'#32467#24080#32534#21495',:'#26159#21542#32467#21333')')
Left = 485
Top = 69
end
object Query3: TQuery
DatabaseName = 'CYGLDATE'
SQL.Strings = (
'if Not exists (select * from sysobjects where id = object_id(N'#39'[' +
'dbo].['#25346#21333#33756#35889']'#39') and OBJECTPROPERTY(id, N'#39'IsUserTable'#39') = 1)'
'begin'
'CREATE TABLE [dbo].['#25346#21333#33756#35889'] ('
#9'[id] [uniqueidentifier] NOT NULL ,'
#9'['#25346#21333#32534#21495'] [int] NOT NULL ,'
#9'['#25151#38388#21488#21495'] [int] NULL ,'
#9'['#31867#21035'] [char] (10) NULL ,'
#9'['#32534#21495'] [int] NULL ,'
#9'['#21517#31216'] [char] (50) NULL ,'
#9'['#31867#22411'] [char] (20) NULL ,'
#9'['#21333#20301'] [char] (10) NULL ,'
#9'['#25968#37327'] [int] NULL ,'
#9'['#20215#26684'] [money] NULL ,'
#9'['#21512#35745'] [money] NULL ,'
#9'['#28857#21333#26085#26399'] [datetime] NULL ,'
#9'['#32467#21333#26085#26399'] [datetime] NULL ,'
#9'['#26381#21153#21592#32534#21495'] [int] NULL ,'
#9'['#26381#21153#21592#22995#21517'] [char] (12) NULL ,'
#9'['#29366#24577'] [char] (10) NULL ,'
#9'['#32467#24080#32534#21495'] [int] NULL ,'
#9'['#26159#21542#32467#21333'] [char] (10) NULL '
') ON [PRIMARY]'
''
''
'ALTER TABLE [dbo].['#25346#21333#33756#35889'] WITH NOCHECK ADD '
#9'CONSTRAINT [DF_'#25346#21333#33756#35889'_id] DEFAULT (newid()) FOR [id],'
#9'CONSTRAINT [PK_'#25346#21333#33756#35889'] PRIMARY KEY NONCLUSTERED '
#9'('
#9#9'[id]'
#9') ON [PRIMARY] '
''
'end')
Left = 671
Top = 70
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -