?? cw_kdskdx.~dfm
字號(hào):
object Form37: TForm37
Left = 255
Top = 125
Width = 696
Height = 479
BorderIcons = [biSystemMenu]
Caption = #27454#24453#25910#27454#25269#28040
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poDesktopCenter
Scaled = False
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
object Label1: TLabel
Left = 296
Top = 8
Width = 102
Height = 16
Caption = #27454#24453#25910#27454#25269#28040
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object GroupBox1: TGroupBox
Left = 8
Top = 32
Width = 241
Height = 417
Caption = #27454#24453#20154#21592#24773#20917
TabOrder = 0
object Label3: TLabel
Left = 16
Top = 32
Width = 36
Height = 12
AutoSize = False
Caption = #22995#21517#65306
end
object Label2: TLabel
Left = 13
Top = 64
Width = 36
Height = 12
AutoSize = False
Caption = #32534#30721#65306
end
object DBGrid1: TDBGrid
Left = 8
Top = 88
Width = 225
Height = 321
DataSource = ds_kdry
Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = #23435#20307
TitleFont.Style = []
OnCellClick = DBGrid1CellClick
Columns = <
item
Alignment = taCenter
Expanded = False
FieldName = 'UserNo'
Title.Alignment = taCenter
Title.Caption = #32534#21495
Width = 66
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'UserName'
Title.Alignment = taCenter
Title.Caption = #22995#21517
Width = 70
Visible = True
end
item
Expanded = False
FieldName = 'TotalMoney'
Title.Alignment = taCenter
Title.Caption = #37329#39069
Visible = True
end>
end
object Edit2: TEdit
Left = 48
Top = 24
Width = 121
Height = 20
TabOrder = 1
end
object Button2: TButton
Left = 176
Top = 24
Width = 49
Height = 20
Caption = #26597#35810
TabOrder = 2
OnClick = Button2Click
end
object Edit1: TEdit
Left = 48
Top = 56
Width = 121
Height = 20
TabOrder = 3
end
object Button1: TButton
Left = 176
Top = 56
Width = 49
Height = 20
Caption = #26597#35810
TabOrder = 4
OnClick = Button1Click
end
end
object GroupBox2: TGroupBox
Left = 256
Top = 96
Width = 425
Height = 353
Caption = #21382#21490#25269#28040#24773#20917
TabOrder = 1
object DBGrid2: TDBGrid
Left = 8
Top = 16
Width = 409
Height = 329
DataSource = ds_kddx
Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = #23435#20307
TitleFont.Style = []
Columns = <
item
Alignment = taCenter
Expanded = False
FieldName = 'UserNo'
Title.Alignment = taCenter
Title.Caption = #32534#21495
Width = 84
Visible = True
end
item
Expanded = False
FieldName = 'dxje'
Title.Alignment = taCenter
Title.Caption = #25269#28040#37329#39069
Width = 82
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'dxr'
Title.Alignment = taCenter
Title.Caption = #25269#28040#20154
Width = 71
Visible = True
end
item
Expanded = False
FieldName = 'dxsj'
Title.Alignment = taCenter
Title.Caption = #25269#28040#26102#38388
Width = 143
Visible = True
end>
end
end
object GroupBox3: TGroupBox
Left = 256
Top = 32
Width = 425
Height = 57
Caption = #25269#28040#21150#29702
TabOrder = 2
object Label4: TLabel
Left = 8
Top = 32
Width = 36
Height = 12
AutoSize = False
Caption = #32534#21495#65306
end
object Label5: TLabel
Left = 216
Top = 32
Width = 57
Height = 12
AutoSize = False
Caption = #25269#28040#37329#39069#65306
end
object Label6: TLabel
Left = 112
Top = 32
Width = 36
Height = 12
Caption = #22995#21517#65306
end
object DBText1: TDBText
Left = 40
Top = 32
Width = 65
Height = 17
DataField = 'UserNo'
DataSource = ds_kdry
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object DBText2: TDBText
Left = 144
Top = 32
Width = 65
Height = 17
DataField = 'UserName'
DataSource = ds_kdry
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Button3: TButton
Left = 360
Top = 18
Width = 57
Height = 25
Caption = #30830' '#23450
TabOrder = 0
OnClick = Button3Click
end
object dxje: TEdit
Left = 272
Top = 24
Width = 81
Height = 20
TabOrder = 1
Text = '0'
end
end
object Button4: TButton
Left = 615
Top = 5
Width = 56
Height = 25
Caption = #36820' '#22238
TabOrder = 3
OnClick = Button4Click
end
object Q_kdry: TQuery
Active = True
DatabaseName = 'Hotel'
SQL.Strings = (
'select * from userinfo')
Left = 32
Top = 8
end
object ds_kdry: TDataSource
DataSet = Q_kdry
Left = 64
Top = 8
end
object Q_kddx: TQuery
Active = True
DatabaseName = 'Hotel'
RequestLive = True
SQL.Strings = (
'select * from h_kddx')
Left = 312
Top = 184
end
object ds_kddx: TDataSource
DataSet = Q_kddx
Left = 344
Top = 184
end
object Q_dxwc: TQuery
DatabaseName = 'Hotel'
RequestLive = True
Left = 480
Top = 16
end
object Q_dxdx: TTable
DatabaseName = 'Hotel'
TableName = 'h_kddx'
Left = 456
Top = 224
end
end
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -