?? extractresult.~dfm
字號:
object frmExtractResult: TfrmExtractResult
Left = 217
Top = 205
Width = 708
Height = 445
Caption = #25277#21462#32467#26524
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poMainFormCenter
OnClose = FormClose
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 48
Top = 40
Width = 60
Height = 13
Caption = #39033#30446#32534#21495#65306
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label2: TLabel
Left = 48
Top = 72
Width = 60
Height = 13
Caption = #39033#30446#21517#31216#65306
end
object Label3: TLabel
Left = 256
Top = 168
Width = 48
Height = 13
Caption = #39033#30446#32534#21495
end
object DBGridResult: TDBGrid
Left = 11
Top = 96
Width = 678
Height = 257
DataSource = DataSource3
ReadOnly = True
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = #19987#23478'ID'
Title.Alignment = taCenter
Width = 38
Visible = True
end
item
Expanded = False
FieldName = #32452'ID'
Title.Alignment = taCenter
Visible = True
end
item
Expanded = False
FieldName = #22995#21517
Title.Alignment = taCenter
Width = 55
Visible = True
end
item
Expanded = False
FieldName = #24615#21035
Visible = True
end
item
Expanded = False
FieldName = #25163#26426
Title.Alignment = taCenter
Width = 82
Visible = True
end
item
Expanded = False
FieldName = #30005#35805
Title.Alignment = taCenter
Width = 101
Visible = True
end
item
Expanded = False
FieldName = #32844#21153
Title.Alignment = taCenter
Width = 186
Visible = True
end
item
Expanded = False
FieldName = #32844#31216
Title.Alignment = taCenter
Width = 111
Visible = True
end
item
Expanded = False
FieldName = #21333#20301#21517#31216
Title.Alignment = taCenter
Width = 177
Visible = True
end>
end
object CheckBox1: TCheckBox
Left = 344
Top = 40
Width = 81
Height = 17
Caption = #35780#26631#26102#38388
TabOrder = 1
end
object CheckBox2: TCheckBox
Left = 344
Top = 72
Width = 81
Height = 17
Caption = #35780#26631#22320#28857
TabOrder = 2
end
object DateTimePicker1: TDateTimePicker
Left = 432
Top = 40
Width = 113
Height = 21
CalAlignment = dtaLeft
Date = 38786.525527338
Time = 38786.525527338
DateFormat = dfLong
DateMode = dmComboBox
Kind = dtkDate
ParseInput = False
TabOrder = 3
end
object DateTimePicker2: TDateTimePicker
Left = 552
Top = 40
Width = 89
Height = 21
CalAlignment = dtaLeft
Date = 38786.5262313657
Time = 38786.5262313657
DateFormat = dfLong
DateMode = dmComboBox
Kind = dtkTime
ParseInput = False
TabOrder = 4
end
object btnToWord: TButton
Left = 32
Top = 372
Width = 97
Height = 25
Caption = #23548#20986'->Word'
TabOrder = 5
OnClick = btnToWordClick
end
object btnToExcel: TButton
Left = 152
Top = 372
Width = 97
Height = 25
Caption = #23548#20986'->Excel'
TabOrder = 6
OnClick = btnToExcelClick
end
object ToolBar1: TToolBar
Left = 0
Top = 0
Width = 700
Height = 35
ButtonHeight = 31
ButtonWidth = 97
Caption = 'ToolBar1'
TabOrder = 7
object BitBtnSave: TBitBtn
Left = 0
Top = 2
Width = 97
Height = 31
Caption = #20445#23384#39033#30446
TabOrder = 0
OnClick = BitBtnSaveClick
Glyph.Data = {
96010000424D9601000000000000760000002800000018000000180000000100
0400000000002001000000000000000000001000000000000000000000008000
00000080000080800000000080008000800000808000C0C0C000C0DCC000A6CA
F000FFFBF000A0A0A40080808000FF00000000FF0000FFFF0000777777777777
77777777777770000000000000000000000070C0898898988989889890C070C0
7A9A7A7A7A7A7A7A80C070C0A000A0A0AA0AA000A0C070C0AAA0A0A0A0A0A0AA
A0C070C0A000A000A0A0A000A0C070C0A0AAA0A0A0A0A0AAA0C070C0A000A000
A0A0A000A0C070C0AAAAAAAAAAAAAAAAA0C070C0AAAAAAAAAAAAAAAAA0C070C0
AAAAAAAAAAAAAAAAA0C070C0AAAAAAAAAAAAAAAAA0C070CC0000000000000000
0CC070CCCCCCCCCCCCCCCCCCCCC070CC00000000000000CC0CC070C0CCCC0777
B77B7B0CCCC070C0C0C07B777000070CCCC070C0CCC077B770CC0B0CC0C070C0
C0C0777B703C070CCCC070C0CCC077777000070CCCC070C02CC077777777B70C
CCC0700000000000000000000000777777777777777777777777}
end
object ToolButton3: TToolButton
Left = 97
Top = 2
Width = 8
Caption = 'ToolButton3'
ImageIndex = 2
Style = tbsSeparator
end
object BitBtnCancel: TBitBtn
Left = 105
Top = 2
Width = 96
Height = 31
Caption = #21462' '#28040
TabOrder = 1
OnClick = BitBtnCancelClick
Glyph.Data = {
F6060000424DF606000000000000360000002800000018000000180000000100
180000000000C006000000000000000000000000000000000000C4C4C4C1C1C1
D5D5D59191911111110303030303030202030505060505060202020202020303
03020202020202060607040406020202040404020202505050CDCDCDC8C8C8C3
C3C3BFBFBFCDCDCD8E8E8E0F0F0F020202010101030303010101010101020202
02020509090F0B0B1108080E0101030202020101010101010303030202020404
04484848C8C8C8C3C3C3BFBFBFCFCFCF32323202020204040401010102020205
050A29293F54547870709C7F7FAD8383B07F7FAC6E6E98505071232336010104
020202010101020202020202A1A1A1CCCCCCBFBFBFD0D0D06565650303030202
0202020227273A6566879394BCAAABD6B4B4E0B9B9E3BBBBE5B9B9E3B4B4E1AB
ABD99393BF616186202032020202020202181818BCBCBCC6C6C6C3C3C3C5C5C5
C2C2C26B6B691B1B2033335B7578939498A5A4A6B6ACACC7B0B0DAB1B1E6B1B1
E9B1B1E8B0B0E6ACADD7A4A5BD9697AF7677A029294C3C3C3DA8A8A7CACACAC2
C2C2C4C4C4C2C2C2CACAC9C0C0C44545805B5D9282919B8F9FA4909CA49098A5
9193B19393D19494E59393E59393D69293B68F99A38B979F81869B595B966262
90CACAC9C4C4C4C3C3C4C3C3C3C4C4C4C5C5C33B3B722D2C8C5D6CA873AEBD7F
B2C07DA7B277949E6E808D6F72997272C07172BF6E709D6F7D8C7A929B77A1AA
6C9BAF6065AF2828825A5A82CECECAC2C2C3BEBEC0D1D1CC66668806076A3734
AD475BBF7FC6DC9DE0E679C9DB62ADC05689964964764A4C76484D74495F7058
859161A8BB6FC7D4569DCE4547BE3636A70A0A6488889DCFCFCBCACAC9B6B6BA
10105E0E0E8A2222B62C2CCA424FCE7796D49DD5E166C9DB41A6BC377B8B2A53
652F58693F79873CA2B856C6D96FC3DD364DC82A26C72324B108087D2B2B69C7
C7C5DFDFD67777920202600F0F9E1212BB1616CA1412CE110FCB445FC775C5D9
3DBBD2329EB637879C36869B2398B038BAD26BC7DD3158C61512CA1617C91212
B60D0E9504045C9999A7DBDBD24242750101700B0BA70A0ABF0B0BC90D0ECA0B
0CCD0704C1306ABE38B8D31EAEC927A5BF1DA5BE38BCD359C2DF1B53A90404A6
0C0CC10B0BC70A0ABB0C0CA1010165676788C9C9C424246701017D0909AB0808
C10909C80909C80809C90805C70C2BAA1495C90DACC906ADC83EB9D247A9C808
4B7C010C4C040B5D07098F0909BF0808BE0A0AA7010170454576C9C9C326266A
0202820A0AAF0909C10A0AC60B0BC7090AC70907C9091EAB0987C309A8C904AD
C60BACC70392B30D75900B5D7302374F051860090BB30909C10B0BA902027546
4678C9C9C326266A0101800909AD0707C00808C50909C50909C60908C80911B3
0D77BF10A2C90EABC411ABC432B1C747B5CB36A3BD159BAF035D9F0706B50809
C00B0BA8010175464679C7C7C323236601017D0909AA0808BE0808C40808C408
08C4090AC60806BE1E5DBA3FACCE249AC03CACC779C3D586C1D48DCCD472CAD4
154CC00601C0090ABB0A0AA5010170434375D5D5CD36366D0202710A0AA40808
B90A0AC20A0AC30909C30A0AC30907C41020B95BA2C87BC4D86AB5D32F519C1E
269F3F50BE465CC20E0EC00908C10809B60B0B9E02026458587FE2E2D7646485
01015F0A0A990606B20707BE0808C10707C10707C2090AC20401C2192AB85079
A9265B8501296402106501019C0101C10707C10607BD0606AD08089101015887
879BD2D2CEA3A3AE0303550606850707A60D0DBA0E0EC00D0DC20D0DC20F0FC2
0F0FC50B07B1042A781C74942B748D12536C0B1B7C0F0FBF0F0FC00C0CB70707
A103037916165BBCBCBEC0C0C1CFCFCB4848750303621B1B9E2F2FBA2F2FC32E
2EC72E2EC82F30C82F2FCB2E2DB62E82B247AABB4E8AA2398E9C2952982E2AC2
2F30C32E2EB61414950303586B6B8AD1D1CDC1C1C2C9C9C7B4B4B80C0C532424
876161BF5656C65959CF5959D15959D2595AD45856CC5E9CD070C7D77AC3D368
C3D65A7DC75955CC5657C46060BC0E0E7423235FC7C7C5C4C4C4C4C4C4C1C1C2
D0D0CC8A8A9E0D0D5A8787C08E8ED08484D28989D98A8ADC898ADD8786DD96A1
DABFD7E3CBE0E4B2C9DF8B91D68382D09595D27272AE0E0E56AAAAB1CBCBC9C2
C2C3C4C4C4C4C4C4C0C0C2D4D4CE8080973C3C75B9B9D7C7C7E8B7B7E0B5B5E1
B5B5E3B5B5E5B6B5E5C0C2E3C7CAE3BBBBDFB8B7E1CBCBE9A6A6C832326C9E9E
AAD0D0CCC1C1C2C4C4C4C4C4C4C4C4C4C4C4C4C1C1C2D2D2CD8B8B9E52527FA1
A1BEE1E1EEF0F0FAF0F0FAEEEEF9EDEEF9ECECF9EDEDFAEEEEF9DADBE98F8FB1
50507CA1A1ACD0D0CCC0C0C1C4C4C4C4C4C4C4C4C4C4C4C4C4C4C4C4C4C4C1C1
C2D0D0CCB7B7BB68688867678B8E8EABAEAEC4BFBFD2C4C4D5BEBED0A9A9C086
86A561618673738FC4C4C3CDCDCAC1C1C2C4C4C4C4C4C4C4C4C4}
end
end
object btnAdd: TButton
Left = 272
Top = 372
Width = 97
Height = 25
Caption = #22686' '#21152'(&A)'
Enabled = False
TabOrder = 8
Visible = False
OnClick = btnAddClick
end
object EditProID: TEdit
Left = 112
Top = 40
Width = 185
Height = 21
TabOrder = 9
end
object EditProName: TEdit
Left = 112
Top = 72
Width = 185
Height = 21
TabOrder = 10
end
object ComBoxAddr: TComboBox
Left = 432
Top = 72
Width = 257
Height = 21
ItemHeight = 13
TabOrder = 11
end
object ADOQryResult: TADOQuery
Connection = frmMain.ADOConnection1
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select * from Expert order by '#32452'ID asc,'#19987#23478'ID asc')
Left = 8
Top = 220
object ADOQryResultID: TWideStringField
DisplayWidth = 7
FieldName = #19987#23478'ID'
ReadOnly = True
Size = 4
end
object ADOQryResultDSDesigner6: TWideStringField
FieldName = #29366#24577
ReadOnly = True
Size = 50
end
object ADOQryResultID2: TWideStringField
DisplayWidth = 5
FieldName = #32452'ID'
ReadOnly = True
Size = 2
end
object ADOQryResultDSDesigner: TWideStringField
DisplayWidth = 13
FieldName = #22995#21517
ReadOnly = True
Size = 50
end
object ADOQryResultDSDesigner2: TWideStringField
FieldName = #24615#21035
Size = 2
end
object ADOQryResultDSDesigner4: TWideStringField
DisplayWidth = 60
FieldName = #25163#26426
ReadOnly = True
Size = 50
end
object ADOQryResultDSDesigner3: TWideStringField
FieldName = #30005#35805
Size = 50
end
object ADOQryResultDSDesigner5: TWideStringField
FieldName = #32844#21153
Size = 50
end
object ADOQryResultDSDesigner7: TWideStringField
DisplayWidth = 60
FieldName = #32844#31216
ReadOnly = True
Size = 50
end
object ADOQryResultDSDesigner8: TWideStringField
DisplayWidth = 60
FieldName = #21333#20301#21517#31216
ReadOnly = True
Size = 50
end
end
object DataSource2: TDataSource
DataSet = ADOQryProDetail
Left = 16
Top = 68
end
object ADOQryPro: TADOQuery
Connection = frmMain.ADOConnection1
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select * from ExtractPro order by '#39033#30446#32534#21495' asc')
Top = 32
object ADOQryProDSDesigner: TWideStringField
FieldName = #39033#30446#32534#21495
Size = 12
end
object ADOQryProDSDesigner2: TWideStringField
FieldName = #39033#30446#21517#31216
Size = 50
end
object ADOQryProDSDesigner3: TWideStringField
FieldName = #35780#26631#22320#28857
Size = 50
end
object ADOQryProDSDesigner4: TDateTimeField
FieldName = #35780#26631#26102#38388
end
object ADOQryProDSDesigner5: TWideStringField
FieldName = #25277#31614#20154
Size = 50
end
object ADOQryProDSDesigner6: TDateTimeField
FieldName = #25277#31614#26102#38388
end
end
object DataSource1: TDataSource
DataSet = ADOQryPro
Left = 16
Top = 32
end
object ADOQryProDetail: TADOQuery
Active = True
Connection = frmMain.ADOConnection1
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select * from ProDetail Order by '#39033#30446#32534#21495' asc, '#19987#23478'ID asc')
Top = 64
object ADOQryProDetailDSDesigner: TWideStringField
FieldName = #39033#30446#32534#21495
Size = 12
end
object ADOQryProDetailID: TWideStringField
FieldName = #19987#23478'ID'
Size = 5
end
object ADOQryProDetailID2: TWideStringField
FieldName = #32452'ID'
Size = 2
end
object ADOQryProDetailDSDesigner2: TWideStringField
FieldName = #22995#21517
Size = 50
end
object ADOQryProDetailDSDesigner3: TWideStringField
FieldName = #24615#21035
Size = 2
end
object ADOQryProDetailDSDesigner4: TWideStringField
FieldName = #25163#26426
Size = 50
end
object ADOQryProDetailDSDesigner5: TWideStringField
FieldName = #30005#35805
Size = 50
end
object ADOQryProDetailDSDesigner6: TWideStringField
FieldName = #32844#21153
Size = 50
end
object ADOQryProDetailDSDesigner7: TWideStringField
FieldName = #32844#31216
Size = 50
end
object ADOQryProDetailDSDesigner8: TWideStringField
FieldName = #21333#20301#21517#31216
Size = 50
end
end
object DataSource3: TDataSource
DataSet = ADOQryResult
Left = 40
Top = 224
end
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -