You cannot select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

509 lines
13 KiB
Plaintext

12 months ago
object frmupdatesql: Tfrmupdatesql
Left = 237
Top = 232
Width = 842
Height = 605
Caption = #21319#32423#25991#20214#32500#25252
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poDesktopCenter
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
object PageControl1: TPageControl
Left = 0
Top = 49
Width = 826
Height = 518
ActivePage = TabSheet1
Align = alClient
TabIndex = 0
TabOrder = 0
object TabSheet1: TTabSheet
Caption = #25191#34892#25991#20214
object Panel1: TPanel
Left = 185
Top = 0
Width = 633
Height = 491
Align = alClient
BevelOuter = bvNone
Caption = 'Panel1'
TabOrder = 0
object DBMemo1: TDBMemo
Left = 0
Top = 28
Width = 633
Height = 463
Align = alClient
DataField = #25191#34892
DataSource = t_sql1
ScrollBars = ssBoth
TabOrder = 0
end
object Panel3: TPanel
Left = 0
Top = 0
Width = 633
Height = 28
Align = alTop
TabOrder = 1
object Label1: TLabel
Left = 7
Top = 8
Width = 36
Height = 12
Caption = #29256#26412#21495
FocusControl = DBEdit1
end
object Label2: TLabel
Left = 127
Top = 8
Width = 24
Height = 12
Caption = #39034#24207
FocusControl = DBEdit2
end
object DBEdit1: TDBEdit
Left = 47
Top = 4
Width = 74
Height = 20
DataField = #29256#26412#21495
DataSource = t_sql1
TabOrder = 0
end
object DBEdit2: TDBEdit
Left = 155
Top = 4
Width = 54
Height = 20
DataField = #39034#24207
DataSource = t_sql1
TabOrder = 1
end
object DBNavigator1: TDBNavigator
Left = 212
Top = 1
Width = 225
Height = 25
DataSource = t_sql1
VisibleButtons = [nbInsert, nbDelete, nbEdit, nbPost, nbCancel]
TabOrder = 2
end
object Button1: TButton
Left = 452
Top = 2
Width = 109
Height = 25
Caption = #25191#34892#27492#26465#35821#21477
TabOrder = 3
OnClick = Button1Click
end
end
end
object Panel7: TPanel
Left = 0
Top = 0
Width = 185
Height = 491
Align = alLeft
BevelOuter = bvNone
TabOrder = 1
object dxDBGrid1: TdxDBGrid
Left = 0
Top = 0
Width = 185
Height = 491
Bands = <
item
end>
DefaultLayout = True
HeaderPanelRowCount = 1
KeyField = #29256#26412#21495
SummaryGroups = <>
SummarySeparator = ', '
Align = alClient
TabOrder = 0
DataSource = t_sql1
Filter.Criteria = {00000000}
OptionsBehavior = [edgoAutoSort, edgoDragScroll, edgoEnterShowEditor, edgoImmediateEditor, edgoMultiSelect, edgoTabThrough, edgoVertThrough]
OptionsDB = [edgoCanNavigation, edgoLoadAllRecords, edgoUseBookmarks]
OptionsView = [edgoBandHeaderWidth, edgoIndicator, edgoUseBitmap]
object dxDBGrid1Column1: TdxDBGridColumn
Width = 78
BandIndex = 0
RowIndex = 0
FieldName = #29256#26412#21495
end
object dxDBGrid1Column2: TdxDBGridColumn
Width = 78
BandIndex = 0
RowIndex = 0
FieldName = #39034#24207
end
end
end
end
object TabSheet2: TTabSheet
Caption = #21319#32423#35828#26126
ImageIndex = 1
object DBGrid2: TDBGrid
Left = 0
Top = 0
Width = 145
Height = 544
Align = alLeft
DataSource = t_readme1
ReadOnly = True
TabOrder = 0
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = #23435#20307
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = #29256#26412#21495
Width = 102
Visible = True
end>
end
object Panel2: TPanel
Left = 145
Top = 0
Width = 681
Height = 544
Align = alClient
BevelOuter = bvNone
Caption = 'Panel1'
TabOrder = 1
object DBMemo2: TDBMemo
Left = 0
Top = 28
Width = 681
Height = 516
Align = alClient
DataField = #26356#26032#35828#26126
DataSource = t_readme1
ScrollBars = ssBoth
TabOrder = 0
end
object Panel4: TPanel
Left = 0
Top = 0
Width = 681
Height = 28
Align = alTop
TabOrder = 1
object Label3: TLabel
Left = 7
Top = 8
Width = 36
Height = 12
Caption = #29256#26412#21495
FocusControl = DBEdit3
end
object DBEdit3: TDBEdit
Left = 47
Top = 4
Width = 74
Height = 20
DataField = #29256#26412#21495
DataSource = t_readme1
TabOrder = 0
end
object DBNavigator2: TDBNavigator
Left = 128
Top = 1
Width = 530
Height = 25
DataSource = t_readme1
TabOrder = 1
end
end
end
end
object TabSheet3: TTabSheet
Caption = #26356#26032'VIEW'
ImageIndex = 2
object DBGrid3: TDBGrid
Left = 0
Top = 0
Width = 177
Height = 544
Align = alLeft
DataSource = t_view_update1
ReadOnly = True
TabOrder = 0
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = #23435#20307
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = #39034#24207
Width = 90
Visible = True
end>
end
object Panel5: TPanel
Left = 177
Top = 0
Width = 649
Height = 544
Align = alClient
BevelOuter = bvNone
Caption = 'Panel1'
TabOrder = 1
object DBMemo3: TDBMemo
Left = 0
Top = 28
Width = 649
Height = 516
Align = alClient
DataField = #25191#34892
DataSource = t_view_update1
ScrollBars = ssBoth
TabOrder = 0
end
object Panel6: TPanel
Left = 0
Top = 0
Width = 649
Height = 28
Align = alTop
TabOrder = 1
object Label5: TLabel
Left = 15
Top = 8
Width = 24
Height = 12
Caption = #39034#24207
FocusControl = DBEdit5
end
object DBEdit5: TDBEdit
Left = 43
Top = 4
Width = 54
Height = 20
DataField = #39034#24207
DataSource = t_view_update1
TabOrder = 0
end
object DBNavigator3: TDBNavigator
Left = 108
Top = 1
Width = 225
Height = 25
DataSource = t_view_update1
VisibleButtons = [nbInsert, nbDelete, nbEdit, nbPost, nbCancel]
TabOrder = 1
end
object Button2: TButton
Left = 348
Top = 2
Width = 109
Height = 25
Caption = #25191#34892#27492#26465#35821#21477
TabOrder = 2
OnClick = Button2Click
end
end
end
end
end
object bsSkinPanel1: TbsSkinPanel
Left = 0
Top = 0
Width = 826
Height = 49
TabOrder = 1
SkinData = frmsoftupdate.bsSkinData1
SkinDataName = 'panel'
DefaultFont.Charset = DEFAULT_CHARSET
DefaultFont.Color = clWindowText
DefaultFont.Height = 14
DefaultFont.Name = 'Arial'
DefaultFont.Style = []
DefaultWidth = 0
DefaultHeight = 0
UseSkinFont = True
AutoEnabledControls = True
CheckedMode = False
Checked = False
DefaultAlignment = taLeftJustify
DefaultCaptionHeight = 22
BorderStyle = bvFrame
CaptionMode = False
RollUpMode = False
RollUpState = False
NumGlyphs = 1
Spacing = 2
Caption = 'bsSkinPanel1'
Align = alTop
object Label4: TLabel
Left = 20
Top = 20
Width = 36
Height = 12
Caption = #29256#26412#21495
Transparent = True
end
object Label6: TLabel
Left = 192
Top = 20
Width = 24
Height = 12
Caption = #20869#23481
Transparent = True
end
object bsSkinSpeedButton1: TbsSkinSpeedButton
Left = 644
Top = 12
Width = 75
Height = 25
SkinData = frmsoftupdate.bsSkinData1
SkinDataName = 'toolbutton'
DefaultFont.Charset = DEFAULT_CHARSET
DefaultFont.Color = clWindowText
DefaultFont.Height = 14
DefaultFont.Name = 'Arial'
DefaultFont.Style = []
DefaultWidth = 0
DefaultHeight = 0
UseSkinFont = True
RepeatMode = False
RepeatInterval = 100
Transparent = False
Flat = False
AllowAllUp = False
Down = False
GroupIndex = 0
Caption = #26597' '#35810
NumGlyphs = 2
Spacing = 1
OnClick = bsSkinSpeedButton1Click
end
object bsSkinSpeedButton2: TbsSkinSpeedButton
Left = 740
Top = 12
Width = 75
Height = 25
SkinData = frmsoftupdate.bsSkinData1
SkinDataName = 'toolbutton'
DefaultFont.Charset = DEFAULT_CHARSET
DefaultFont.Color = clWindowText
DefaultFont.Height = 14
DefaultFont.Name = 'Arial'
DefaultFont.Style = []
DefaultWidth = 0
DefaultHeight = 0
UseSkinFont = True
RepeatMode = False
RepeatInterval = 100
Transparent = False
Flat = False
AllowAllUp = False
Down = False
GroupIndex = 0
Caption = #20840' '#37096
NumGlyphs = 2
Spacing = 1
OnClick = bsSkinSpeedButton2Click
end
object Label7: TLabel
Left = 368
Top = 20
Width = 24
Height = 12
Caption = #20869#23481
Transparent = True
end
object Edit1: TEdit
Left = 60
Top = 16
Width = 121
Height = 20
TabOrder = 0
end
object Edit2: TEdit
Left = 220
Top = 16
Width = 137
Height = 20
TabOrder = 1
end
object Edit3: TEdit
Left = 396
Top = 16
Width = 137
Height = 20
TabOrder = 2
end
end
object ADOConnection1: TADOConnection
ConnectionString =
'Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source=E:\UP' +
'\update.mdb;Mode=Share Deny None;Extended Properties="";Persist ' +
'Security Info=False;Jet OLEDB:System database="";Jet OLEDB:Regis' +
'try Path="";Jet OLEDB:Database Password="";Jet OLEDB:Engine Typ'
LoginPrompt = False
Mode = cmShareDenyNone
Provider = 'Microsoft.Jet.OLEDB.4.0'
BeforeConnect = ADOConnection1BeforeConnect
Left = 100
Top = 248
end
object t_sql1: TDataSource
DataSet = t_sql
Left = 88
Top = 388
end
object t_readme1: TDataSource
DataSet = t_readme
Left = 216
Top = 372
end
object t_sql: TADOQuery
Connection = frmsoftupdate.db_update
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select * from t_sql order by '#29256#26412#21495','#39034#24207)
Left = 76
Top = 320
end
object t_readme: TADOQuery
Connection = frmsoftupdate.db_update
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select * from t_readme order by '#29256#26412#21495)
Left = 452
Top = 284
end
object t_view_update: TADOQuery
Connection = frmsoftupdate.db_update
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select * from t_view_update order by '#39034#24207)
Left = 324
Top = 184
end
object t_view_update1: TDataSource
DataSet = t_view_update
Left = 336
Top = 252
end
end