fdbdemoclient2.dfm
来自「Delphi开发webservice的一套例子」· DFM 代码 · 共 293 行
DFM
293 行
object Form3: TForm3
Left = 125
Top = 100
Width = 834
Height = 662
Caption = 'Web Service'#36039#26009#24235#31684#20363'2'
Color = clBtnFace
Font.Charset = CHINESEBIG5_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = #26032#32048#26126#39636
Font.Style = []
OldCreateOrder = False
OnActivate = FormActivate
PixelsPerInch = 120
TextHeight = 20
object PageControl1: TPageControl
Left = 0
Top = 0
Width = 826
Height = 89
ActivePage = TabSheet2
Align = alTop
TabIndex = 1
TabOrder = 0
object TabSheet1: TTabSheet
Caption = 'SQL '#36984#25799#36039#26009
object Label1: TLabel
Left = 16
Top = 16
Width = 75
Height = 20
Caption = 'SQL'#25944#36848
end
object sbtnRun: TSpeedButton
Left = 696
Top = 16
Width = 33
Height = 33
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333303333
333333333337FF3333333333330003333333333333777F333333333333080333
3333333F33777FF33F3333B33B000B33B3333373F777773F7333333BBB0B0BBB
33333337737F7F77F333333BBB0F0BBB33333337337373F73F3333BBB0F7F0BB
B333337F3737F73F7F3333BB0FB7BF0BB3333F737F37F37F73FFBBBB0BF7FB0B
BBB3773F7F37337F377333BB0FBFBF0BB333337F73F333737F3333BBB0FBF0BB
B3333373F73FF7337333333BBB000BBB33333337FF777337F333333BBBBBBBBB
3333333773FF3F773F3333B33BBBBB33B33333733773773373333333333B3333
333333333337F33333333333333B333333333333333733333333}
NumGlyphs = 2
OnClick = sbtnRunClick
end
object edtSQL: TEdit
Left = 104
Top = 16
Width = 585
Height = 28
TabOrder = 0
end
end
object TabSheet2: TTabSheet
Caption = #26781#20214#36984#25799#36039#26009
ImageIndex = 1
object Label11: TLabel
Left = 16
Top = 16
Width = 104
Height = 20
Caption = 'CATEGORY'
end
object CLEVEL: TLabel
Left = 344
Top = 16
Width = 71
Height = 20
Caption = 'CLEVEL'
end
object sbtnConditions: TSpeedButton
Left = 560
Top = 16
Width = 33
Height = 33
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333303333
333333333337FF3333333333330003333333333333777F333333333333080333
3333333F33777FF33F3333B33B000B33B3333373F777773F7333333BBB0B0BBB
33333337737F7F77F333333BBB0F0BBB33333337337373F73F3333BBB0F7F0BB
B333337F3737F73F7F3333BB0FB7BF0BB3333F737F37F37F73FFBBBB0BF7FB0B
BBB3773F7F37337F377333BB0FBFBF0BB333337F73F333737F3333BBB0FBF0BB
B3333373F73FF7337333333BBB000BBB33333337FF777337F333333BBBBBBBBB
3333333773FF3F773F3333B33BBBBB33B33333733773773373333333333B3333
333333333337F33333333333333B333333333333333733333333}
NumGlyphs = 2
OnClick = sbtnConditionsClick
end
object cbCategory: TComboBox
Left = 128
Top = 16
Width = 201
Height = 28
ItemHeight = 20
TabOrder = 0
end
object cbLevel: TComboBox
Left = 416
Top = 16
Width = 121
Height = 28
ItemHeight = 20
TabOrder = 1
end
end
end
object DBCtrlGrid1: TDBCtrlGrid
Left = 0
Top = 89
Width = 826
Height = 536
Align = alTop
ColCount = 1
DataSource = dsDemo2
PanelHeight = 268
PanelWidth = 803
TabOrder = 1
RowCount = 2
SelectedColor = clInfoBk
object Label2: TLabel
Left = 24
Top = 8
Width = 43
Height = 20
Caption = 'ISBN'
FocusControl = DBEdit1
end
object Label3: TLabel
Left = 352
Top = 8
Width = 47
Height = 20
Caption = 'BKID'
FocusControl = DBEdit2
end
object Label4: TLabel
Left = 8
Top = 40
Width = 83
Height = 20
Caption = 'BOOKNO'
FocusControl = DBEdit3
end
object Label5: TLabel
Left = 16
Top = 72
Width = 111
Height = 20
Caption = 'BOOKNAME'
FocusControl = DBEdit4
end
object Label6: TLabel
Left = 32
Top = 104
Width = 34
Height = 20
Caption = 'VID'
FocusControl = DBEdit5
end
object Label7: TLabel
Left = 296
Top = 104
Width = 104
Height = 20
Caption = 'CATEGORY'
FocusControl = DBEdit6
end
object Label8: TLabel
Left = 312
Top = 40
Width = 71
Height = 20
Caption = 'CLEVEL'
FocusControl = DBEdit7
end
object Label9: TLabel
Left = 432
Top = 40
Width = 34
Height = 20
Caption = 'AID'
FocusControl = DBEdit8
end
object Label10: TLabel
Left = 16
Top = 136
Width = 62
Height = 20
Caption = 'IMAGE'
FocusControl = DBImage1
end
object DBEdit1: TDBEdit
Left = 80
Top = 8
Width = 264
Height = 28
DataField = 'ISBN'
DataSource = dsDemo2
TabOrder = 0
end
object DBEdit2: TDBEdit
Left = 408
Top = 8
Width = 204
Height = 28
DataField = 'BKID'
DataSource = dsDemo2
TabOrder = 1
end
object DBEdit3: TDBEdit
Left = 96
Top = 40
Width = 204
Height = 28
DataField = 'BOOKNO'
DataSource = dsDemo2
TabOrder = 2
end
object DBEdit4: TDBEdit
Left = 136
Top = 72
Width = 636
Height = 28
DataField = 'BOOKNAME'
DataSource = dsDemo2
TabOrder = 3
end
object DBEdit5: TDBEdit
Left = 88
Top = 104
Width = 204
Height = 28
DataField = 'VID'
DataSource = dsDemo2
TabOrder = 4
end
object DBEdit6: TDBEdit
Left = 408
Top = 104
Width = 204
Height = 28
DataField = 'CATEGORY'
DataSource = dsDemo2
TabOrder = 5
end
object DBEdit7: TDBEdit
Left = 392
Top = 40
Width = 24
Height = 28
DataField = 'CLEVEL'
DataSource = dsDemo2
TabOrder = 6
end
object DBEdit8: TDBEdit
Left = 472
Top = 40
Width = 204
Height = 28
DataField = 'AID'
DataSource = dsDemo2
TabOrder = 7
end
object DBImage1: TDBImage
Left = 88
Top = 136
Width = 217
Height = 129
DataField = 'IMAGE'
DataSource = dsDemo2
TabOrder = 8
end
end
object dsDemo2: TDataSource
DataSet = dmDBDemo2.cdsDemo2
Left = 656
Top = 176
end
end
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?