📄 frmjianlu.dfm
字号:
inherited jianlu: Tjianlu
Left = 71
Top = 93
Width = 659
Height = 486
Caption = '检录'
ParentFont = False
Font.Charset = ANSI_CHARSET
Font.Height = -13
Font.Name = '宋体'
OldCreateOrder = True
OnCloseQuery = FormCloseQuery
OnCreate = FormCreate
OnDestroy = FormDestroy
OnResize = FormResize
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Splitter1: TSplitter
Left = 249
Top = 41
Width = 3
Height = 370
Cursor = crHSplit
end
object DBGrid1: TDBGrid
Left = 0
Top = 41
Width = 249
Height = 370
Align = alLeft
DataSource = jl_source
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
TabOrder = 0
TitleFont.Charset = ANSI_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -13
TitleFont.Name = '宋体'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'YDYXM'
Title.Caption = '运动员姓名'
Width = 92
Visible = True
end
item
Expanded = False
FieldName = 'YDYBH'
Title.Caption = '运动员编号'
Width = 86
Visible = True
end>
end
object GroupBox1: TGroupBox
Left = 0
Top = 0
Width = 651
Height = 41
Align = alTop
TabOrder = 1
object Label1: TLabel
Left = 5
Top = 16
Width = 116
Height = 13
AutoSize = False
Caption = '所属类别->分组:'
end
object Label2: TLabel
Left = 272
Top = 16
Width = 26
Height = 13
Caption = '项目'
end
object Label3: TLabel
Left = 415
Top = 16
Width = 67
Height = 13
AutoSize = False
Caption = '比赛方式'
end
object lbfz: TComboBox
Left = 122
Top = 12
Width = 144
Height = 21
ItemHeight = 13
TabOrder = 0
OnChange = lbfzChange
end
object xm: TComboBox
Left = 309
Top = 12
Width = 102
Height = 21
ItemHeight = 13
TabOrder = 1
OnChange = xmChange
end
object bsfs: TComboBox
Left = 495
Top = 12
Width = 70
Height = 21
ItemHeight = 13
TabOrder = 2
OnChange = bsfsChange
end
object BitBtn1: TBitBtn
Left = 572
Top = 10
Width = 75
Height = 25
Caption = '开始'
TabOrder = 3
OnClick = BitBtn1Click
end
end
object GroupBox2: TGroupBox
Left = 0
Top = 411
Width = 651
Height = 48
Align = alBottom
TabOrder = 2
object BitBtn3: TBitBtn
Left = 136
Top = 14
Width = 75
Height = 25
Caption = '提交'
TabOrder = 0
OnClick = BitBtn3Click
end
object BitBtn4: TBitBtn
Left = 230
Top = 14
Width = 75
Height = 25
Caption = '结束'
TabOrder = 1
OnClick = BitBtn4Click
end
object BitBtn5: TBitBtn
Left = 326
Top = 15
Width = 75
Height = 25
Caption = '打印'
TabOrder = 2
OnClick = BitBtn5Click
end
object BitBtn6: TBitBtn
Left = 426
Top = 15
Width = 75
Height = 25
Caption = '关闭窗口'
TabOrder = 3
OnClick = BitBtn6Click
end
end
object Panel1: TPanel
Left = 252
Top = 41
Width = 77
Height = 370
Align = alLeft
TabOrder = 3
object GroupBox3: TGroupBox
Left = 1
Top = 43
Width = 75
Height = 79
Align = alTop
TabOrder = 0
object SpeedButton1: TSpeedButton
Left = 20
Top = 19
Width = 33
Height = 19
Caption = '=>'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = '宋体'
Font.Style = [fsBold]
ParentFont = False
OnClick = SpeedButton1Click
end
object SpeedButton2: TSpeedButton
Left = 20
Top = 45
Width = 33
Height = 19
Caption = '<='
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = '宋体'
Font.Style = [fsBold]
ParentFont = False
OnClick = SpeedButton2Click
end
end
object GroupBox4: TGroupBox
Left = 1
Top = 122
Width = 75
Height = 105
Align = alTop
TabOrder = 1
object Label4: TLabel
Left = 5
Top = 22
Width = 36
Height = 13
AutoSize = False
Caption = '小组'
end
object Label5: TLabel
Left = 8
Top = 54
Width = 36
Height = 13
AutoSize = False
Caption = '道次'
end
object xzh: TEdit
Left = 43
Top = 18
Width = 20
Height = 21
TabOrder = 0
end
object pdh: TEdit
Left = 44
Top = 49
Width = 20
Height = 21
TabOrder = 1
end
object BitBtn2: TBitBtn
Left = 9
Top = 76
Width = 56
Height = 22
Caption = '修改'
TabOrder = 2
OnClick = BitBtn2Click
end
end
object GroupBox5: TGroupBox
Left = 1
Top = 1
Width = 75
Height = 42
Align = alTop
Caption = '子项目'
TabOrder = 2
object zxm: TComboBox
Left = 4
Top = 15
Width = 68
Height = 21
ItemHeight = 13
TabOrder = 0
OnChange = zxmChange
end
end
end
object DBGrid2: TDBGrid
Left = 329
Top = 41
Width = 322
Height = 370
Align = alClient
DataSource = jl1_soure
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
TabOrder = 4
TitleFont.Charset = ANSI_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -13
TitleFont.Name = '宋体'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'YDYXM'
Title.Caption = '运动员姓名'
Width = 82
Visible = True
end
item
Expanded = False
FieldName = 'YDYBH'
Title.Caption = '运动员编号'
Width = 78
Visible = True
end
item
Expanded = False
FieldName = 'XZH'
Title.Caption = '小组号'
Width = 55
Visible = True
end
item
Expanded = False
FieldName = 'PDH'
Title.Caption = '跑道号'
Width = 58
Visible = True
end>
end
object jl_con: TADOConnection
LoginPrompt = False
Left = 80
Top = 352
end
object jl_query: TADOQuery
Connection = jl_con
AfterScroll = jl_queryAfterScroll
Parameters = <>
Left = 124
Top = 353
end
object jl_source: TDataSource
DataSet = jl_query
Left = 172
Top = 353
end
object jl1_con: TADOConnection
LoginPrompt = False
Left = 392
Top = 336
end
object jl1_query: TADOQuery
Connection = jl1_con
AfterScroll = jl1_queryAfterScroll
Parameters = <>
Left = 428
Top = 337
end
object jl1_soure: TDataSource
DataSet = jl1_query
Left = 468
Top = 337
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -