📄 gysszpas.~dfm
字号:
object w_gyssz: Tw_gyssz
Left = -30
Top = 84
Width = 801
Height = 464
Caption = #20379#24212#21830#35774#32622
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
FormStyle = fsMDIChild
OldCreateOrder = False
Position = poDefault
Visible = True
OnActivate = FormActivate
OnClose = FormClose
PixelsPerInch = 96
TextHeight = 12
object GroupBox1: TGroupBox
Left = 0
Top = 292
Width = 793
Height = 145
Align = alBottom
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 0
object Label1: TLabel
Left = 104
Top = 32
Width = 60
Height = 12
Caption = #20379#24212#21830#32534#30721
end
object Label2: TLabel
Left = 116
Top = 68
Width = 48
Height = 12
Caption = #32852' '#31995' '#20154
end
object Label4: TLabel
Left = 560
Top = 72
Width = 48
Height = 12
Caption = #20256' '#30495
end
object Label5: TLabel
Left = 560
Top = 32
Width = 48
Height = 12
Caption = #25340' '#38899' '#30721
end
object Label7: TLabel
Left = 316
Top = 68
Width = 48
Height = 12
Caption = #32852#31995#30005#35805
end
object Label8: TLabel
Left = 304
Top = 32
Width = 60
Height = 12
Caption = #20379#24212#21830#21517#31216
end
object Label9: TLabel
Left = 116
Top = 104
Width = 48
Height = 12
Caption = #37038' '#32534
end
object Label10: TLabel
Left = 316
Top = 104
Width = 48
Height = 12
Caption = #22320' '#22336
end
object Button1: TButton
Left = 16
Top = 16
Width = 75
Height = 25
Action = DataSetInsert1
Caption = #22686#21152'(&A)'
TabOrder = 0
end
object Button2: TButton
Left = 16
Top = 48
Width = 75
Height = 25
Action = DataSetDelete1
Caption = #21024#38500'(&D)'
TabOrder = 1
end
object Button3: TButton
Left = 16
Top = 80
Width = 75
Height = 25
Action = DataSetPost1
Caption = #20445#23384'(&S)'
TabOrder = 11
end
object Button4: TButton
Left = 16
Top = 112
Width = 75
Height = 25
Action = DataSetCancel1
Caption = #21462#28040'(&C)'
TabOrder = 2
end
object DBEdit1: TDBEdit
Left = 176
Top = 24
Width = 113
Height = 20
Color = 8845813
DataField = #20379#24212#21830#32534#30721
DataSource = DataSource2
TabOrder = 3
OnKeyPress = DBEdit1KeyPress
end
object DBEdit2: TDBEdit
Left = 376
Top = 24
Width = 145
Height = 20
DataField = #20379#24212#21830#21517#31216
DataSource = DataSource2
TabOrder = 4
OnKeyPress = DBEdit1KeyPress
end
object DBEdit3: TDBEdit
Left = 624
Top = 24
Width = 113
Height = 20
DataField = #25340#38899#30721
DataSource = DataSource2
TabOrder = 5
OnKeyPress = DBEdit1KeyPress
end
object DBEdit4: TDBEdit
Left = 176
Top = 64
Width = 113
Height = 20
DataField = #32852#31995#20154
DataSource = DataSource2
TabOrder = 6
OnKeyPress = DBEdit1KeyPress
end
object DBEdit5: TDBEdit
Left = 376
Top = 64
Width = 145
Height = 20
DataField = #32852#31995#30005#35805
DataSource = DataSource2
TabOrder = 7
OnKeyPress = DBEdit1KeyPress
end
object DBEdit6: TDBEdit
Left = 176
Top = 96
Width = 113
Height = 20
DataField = #37038#32534
DataSource = DataSource2
TabOrder = 9
OnKeyPress = DBEdit1KeyPress
end
object DBEdit7: TDBEdit
Left = 624
Top = 64
Width = 113
Height = 20
DataField = #20256#30495
DataSource = DataSource2
TabOrder = 8
OnKeyPress = DBEdit1KeyPress
end
object DBEdit8: TDBEdit
Left = 376
Top = 96
Width = 361
Height = 20
DataField = #22320#22336
DataSource = DataSource2
TabOrder = 10
OnKeyPress = DBEdit1KeyPress
end
end
object DBGrid1: TDBGrid
Left = 0
Top = 0
Width = 793
Height = 292
Align = alClient
DataSource = DataSource1
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
ReadOnly = True
TabOrder = 1
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = #23435#20307
TitleFont.Style = []
OnCellClick = DBGrid1CellClick
OnKeyUp = DBGrid1KeyUp
Columns = <
item
Alignment = taCenter
Expanded = False
FieldName = #20379#24212#21830#32534#30721
Title.Alignment = taCenter
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = #20379#24212#21830#21517#31216
Title.Alignment = taCenter
Width = 120
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = #25340#38899#30721
Title.Alignment = taCenter
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = #32852#31995#20154
Title.Alignment = taCenter
Width = 80
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = #32852#31995#30005#35805
Title.Alignment = taCenter
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = #20256#30495
Title.Alignment = taCenter
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = #37038#32534
Title.Alignment = taCenter
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = #22320#22336
Title.Alignment = taCenter
Visible = True
end>
end
object DataSource1: TDataSource
DataSet = hjzcdata.gyscx
Left = 120
Top = 72
end
object DataSource2: TDataSource
DataSet = hjzcdata.gysbmb
Left = 248
Top = 32
end
object ActionList1: TActionList
Left = 152
Top = 112
object DataSetInsert1: TDataSetInsert
Category = 'Dataset'
Caption = '&Insert'
Hint = 'Insert'
ImageIndex = 4
OnExecute = DataSetInsert1Execute
DataSource = DataSource1
end
object DataSetDelete1: TDataSetDelete
Category = 'Dataset'
Caption = '&Delete'
Hint = 'Delete'
ImageIndex = 5
OnExecute = DataSetDelete1Execute
end
object DataSetPost1: TDataSetPost
Category = 'Dataset'
Caption = 'P&ost'
Hint = 'Post'
ImageIndex = 7
OnExecute = DataSetPost1Execute
end
object DataSetCancel1: TDataSetCancel
Category = 'Dataset'
Caption = '&Cancel'
Hint = 'Cancel'
ImageIndex = 8
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -