📄 q_all.dfm
字号:
object frm_q_all: Tfrm_q_all
Left = 356
Top = 213
BorderStyle = bsDialog
Caption = '查询窗体'
ClientHeight = 312
ClientWidth = 351
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
FormStyle = fsStayOnTop
OldCreateOrder = False
Position = poMainFormCenter
OnClose = FormClose
OnDestroy = FormDestroy
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object pc_main: TPageControl
Left = 0
Top = -1
Width = 351
Height = 313
ActivePage = ts_6
TabOrder = 0
object ts_1: TTabSheet
Caption = 'ts_1'
TabVisible = False
object DBGrid1: TDBGrid
Left = 2
Top = 3
Width = 338
Height = 297
DataSource = ds_pj
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
ReadOnly = True
TabOrder = 0
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -13
TitleFont.Name = '宋体'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'pj_id'
Title.Alignment = taCenter
Title.Caption = '编号'
Width = 108
Visible = True
end
item
Expanded = False
FieldName = 'pj_name'
Title.Alignment = taCenter
Title.Caption = '名称'
Width = 144
Visible = True
end
item
Expanded = False
FieldName = 'pj_unit'
Title.Alignment = taCenter
Title.Caption = '单位'
Width = 50
Visible = True
end>
end
end
object ts_2: TTabSheet
Caption = 'ts_2'
ImageIndex = 1
TabVisible = False
object DBGrid2: TDBGrid
Left = 2
Top = 3
Width = 338
Height = 297
DataSource = ds_gg
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
ReadOnly = True
TabOrder = 0
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -13
TitleFont.Name = '宋体'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'pj_kind_name'
Title.Alignment = taCenter
Title.Caption = '类型'
Width = 100
Visible = True
end
item
Expanded = False
FieldName = 'pj_gg_id'
Title.Alignment = taCenter
Title.Caption = '规格编号'
Width = 120
Visible = True
end
item
Expanded = False
FieldName = 'pj_gg_name'
Title.Alignment = taCenter
Title.Caption = '规格名称'
Width = 120
Visible = True
end>
end
end
object ts_3: TTabSheet
Caption = 'ts_3'
ImageIndex = 2
TabVisible = False
object DBGrid3: TDBGrid
Left = 2
Top = 3
Width = 338
Height = 297
DataSource = ds_kind
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
ReadOnly = True
TabOrder = 0
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -13
TitleFont.Name = '宋体'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'pj_kind_id'
Title.Alignment = taCenter
Title.Caption = '编号'
Width = 120
Visible = True
end
item
Expanded = False
FieldName = 'pj_kind_name'
Title.Alignment = taCenter
Title.Caption = '名称'
Width = 183
Visible = True
end>
end
end
object ts_4: TTabSheet
Caption = 'ts_4'
ImageIndex = 3
TabVisible = False
object DBGrid4: TDBGrid
Left = 2
Top = 3
Width = 338
Height = 297
DataSource = ds_jjl
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
ReadOnly = True
TabOrder = 0
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -13
TitleFont.Name = '宋体'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'jjl_xx'
Title.Alignment = taCenter
Title.Caption = '金额下限'
Width = 89
Visible = True
end
item
Expanded = False
FieldName = 'jjl_sx'
Title.Alignment = taCenter
Title.Caption = '金额上限'
Width = 105
Visible = True
end
item
Expanded = False
FieldName = 'jjl_rate'
Title.Alignment = taCenter
Title.Caption = '加价率'
Width = 106
Visible = True
end>
end
end
object ts_5: TTabSheet
Caption = 'ts_5'
ImageIndex = 4
TabVisible = False
object DBGrid5: TDBGrid
Left = 2
Top = 3
Width = 338
Height = 297
DataSource = ds_pg
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
ReadOnly = True
TabOrder = 0
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -13
TitleFont.Name = '宋体'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'pg_id'
Title.Alignment = taCenter
Title.Caption = '派工编号'
Width = 145
Visible = True
end
item
Expanded = False
FieldName = 'pg_name'
Title.Alignment = taCenter
Title.Caption = '派工人员名称'
Width = 128
Visible = True
end>
end
end
object ts_6: TTabSheet
ImageIndex = 5
TabVisible = False
object DBGrid6: TDBGrid
Left = 2
Top = 3
Width = 338
Height = 297
DataSource = ds_bx
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
ReadOnly = True
TabOrder = 0
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -13
TitleFont.Name = '宋体'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'kind_id'
Title.Alignment = taCenter
Title.Caption = '保险类型编号'
Width = 145
Visible = True
end
item
Expanded = False
FieldName = 'kind_name'
Title.Alignment = taCenter
Title.Caption = '保险类型名称'
Width = 128
Visible = True
end>
end
end
end
object qe_pj: TQuery
DatabaseName = 'dn_qp3'
SessionName = 'se_qp3_1'
SQL.Strings = (
'select * from ck_pj_info')
Left = 148
Top = 77
end
object ds_pj: TDataSource
DataSet = qe_pj
Left = 108
Top = 77
end
object qe_gg: TQuery
DatabaseName = 'dn_qp3'
SessionName = 'se_qp3_1'
SQL.Strings = (
'select * from ck_pj_gg')
Left = 148
Top = 109
end
object ds_gg: TDataSource
DataSet = qe_gg
Left = 108
Top = 109
end
object qe_kind: TQuery
DatabaseName = 'dn_qp3'
SessionName = 'se_qp3_1'
SQL.Strings = (
'select * from ck_pj_kind')
Left = 156
Top = 141
end
object ds_kind: TDataSource
DataSet = qe_kind
Left = 116
Top = 149
end
object qe_jjl: TQuery
DatabaseName = 'dn_qp3'
SessionName = 'se_qp3_1'
SQL.Strings = (
'select * from jjl_wh')
Left = 156
Top = 181
end
object ds_jjl: TDataSource
DataSet = qe_jjl
Left = 108
Top = 189
end
object qe_pg: TQuery
DatabaseName = 'dn_qp3'
SessionName = 'se_qp3_1'
SQL.Strings = (
'select * from bg_wh')
Left = 172
Top = 221
end
object ds_pg: TDataSource
DataSet = qe_pg
Left = 116
Top = 229
end
object ds_bx: TDataSource
DataSet = qe_bx
Left = 116
Top = 269
end
object qe_bx: TQuery
DatabaseName = 'dn_qp3'
SessionName = 'se_qp3_1'
SQL.Strings = (
'select * from bx_kind')
Left = 164
Top = 261
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -