RTFormwork/public10/design/U_QryBaseList.dfm

object frmQryBaseList: TfrmQryBaseList
  Left = 0
  Top = 0
  Caption = 'frmQryBaseList'
  ClientHeight = 538
  ClientWidth = 1077
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -16
  Font.Name = #24494#36719#38597#40657
  Font.Style = []
  OldCreateOrder = False
  OnClose = FormClose
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 21
  object ToolBar3: TToolBar
    Tag = 1
    Left = 0
    Top = 0
    Width = 1077
    Height = 27
    AutoSize = True
    ButtonHeight = 27
    ButtonWidth = 92
    Caption = 'ToolBar1'
    GradientEndColor = clWindow
    List = True
    GradientDrawingOptions = [gdoHotTrack]
    ShowCaptions = True
    TabOrder = 0
    object Trefresh: TToolButton
      Left = 0
      Top = 0
      AutoSize = True
      Caption = #26597#35810
      ImageIndex = 8
      OnClick = TrefreshClick
    end
    object Tprint: TToolButton
      Left = 48
      Top = 0
      AutoSize = True
      Caption = #23548#20986'Excel'
      ImageIndex = 28
      OnClick = TprintClick
    end
    object TprintGrid: TToolButton
      Left = 134
      Top = 0
      AutoSize = True
      Caption = #25171#21360
      ImageIndex = 21
      OnClick = TprintGridClick
    end
    object TsaveGrid: TToolButton
      Left = 182
      Top = 0
      AutoSize = True
      Caption = #20445#23384#26684#24335
      ImageIndex = 30
      OnClick = TsaveGridClick
    end
    object TgridLiSet: TToolButton
      Left = 262
      Top = 0
      AutoSize = True
      Caption = #34920#26684#21015#35774#32622
      ImageIndex = 16
      OnClick = TgridLiSetClick
    end
    object Tclose: TToolButton
      Left = 358
      Top = 0
      AutoSize = True
      Caption = #20851#38381
      ImageIndex = 7
      OnClick = TcloseClick
    end
  end
  object cxGrid1: TcxGrid
    Left = 8
    Top = 209
    Width = 1033
    Height = 321
    TabOrder = 1
    object tv1: TcxGridDBTableView
      Navigator.Buttons.CustomButtons = <>
      ScrollbarAnnotations.CustomAnnotations = <>
      DataController.DataSource = DataSource1
      DataController.Filter.AutoDataSetFilter = True
      DataController.Summary.DefaultGroupSummaryItems = <>
      DataController.Summary.FooterSummaryItems = <>
      DataController.Summary.SummaryGroups = <>
      OptionsData.Deleting = False
      OptionsData.DeletingConfirmation = False
      OptionsData.Inserting = False
      OptionsView.Footer = True
      OptionsView.GroupByBox = False
      object tv1SSel: TcxGridDBColumn
        Caption = #36873#25321
        DataBinding.FieldName = 'SSel'
        DataBinding.IsNullValueType = True
        PropertiesClassName = 'TcxCheckBoxProperties'
        Properties.NullStyle = nssUnchecked
        HeaderAlignmentHorz = taCenter
        Width = 57
      end
    end
    object cxGrid1Level1: TcxGridLevel
      GridView = tv1
    end
  end
  object dxLayoutControl_query: TdxLayoutControl
    Tag = 999
    Left = 0
    Top = 72
    Width = 1077
    Height = 45
    Align = alTop
    ParentBackground = True
    TabOrder = 2
    Transparent = True
    LayoutLookAndFeel = BaseDataLink.dxLayoutSkinLookAndFeel1
    OptionsItem.SizableHorz = True
    OptionsItem.SizableVert = True
    OnDblClick = dxLayoutControl_queryDblClick
    ExplicitTop = 73
    object dxLayoutControl_queryGroup_Root: TdxLayoutGroup
      AlignHorz = ahParentManaged
      AlignVert = avParentManaged
      CaptionOptions.AlignVert = tavCenter
      SizeOptions.AssignedValues = [sovSizableHorz, sovSizableVert]
      SizeOptions.SizableHorz = True
      SizeOptions.SizableVert = True
      Hidden = True
      LayoutDirection = ldHorizontal
      Padding.Bottom = -5
      Padding.Top = -5
      Padding.AssignedValues = [lpavBottom, lpavTop]
      ShowBorder = False
      Index = -1
    end
  end
  inline frmFrameDateSel1: TfrmFrameDateSel10
    Left = 0
    Top = 27
    Width = 1077
    Height = 45
    Align = alTop
    AutoSize = True
    Color = clBtnFace
    ParentBackground = False
    ParentColor = False
    TabOrder = 3
    ExplicitTop = 30
    ExplicitWidth = 1077
    inherited dxLayoutControl1: TdxLayoutControl
      Width = 1077
      inherited TimeType: TcxComboBox [0]
        Left = 16
        Top = 11
        ExplicitLeft = 16
        ExplicitTop = 11
      end
      inherited BegDate: TcxDateEdit [1]
        Left = 116
        Top = 11
        ExplicitLeft = 116
        ExplicitTop = 11
      end
      inherited EndDate: TcxDateEdit [2]
        Left = 265
        Top = 11
        ExplicitLeft = 265
        ExplicitTop = 11
      end
      inherited cxButton4: TcxButton [3]
        Left = 385
        Top = 11
        ExplicitLeft = 385
        ExplicitTop = 11
      end
      inherited cxButton1: TcxButton [4]
        Left = 465
        Top = 11
        ExplicitLeft = 465
        ExplicitTop = 11
      end
      inherited cxButton5: TcxButton [5]
        Left = 545
        Top = 11
        ExplicitLeft = 545
        ExplicitTop = 11
      end
      inherited cxButton2: TcxButton [6]
        Left = 625
        Top = 11
        ExplicitLeft = 625
        ExplicitTop = 11
      end
      inherited cbbType: TcxComboBox [7]
        Left = 705
        Top = 11
        ExplicitLeft = 705
        ExplicitTop = 11
      end
      inherited cxButton3: TcxButton [8]
        Left = 756
        Top = 11
        ExplicitLeft = 756
        ExplicitTop = 11
      end
      inherited jqModel: TcxCheckBox
        Left = 859
        Top = 11
        ExplicitLeft = 859
        ExplicitTop = 11
        ExplicitWidth = 89
        ExplicitHeight = 33
      end
      inherited dxLayoutControl1Group_Root: TdxLayoutGroup
        ItemIndex = 1
      end
      inherited dxLayoutItem1: TdxLayoutItem
        CaptionOptions.Text = 'New Item'
      end
      inherited dxLayoutItem2: TdxLayoutItem
        CaptionOptions.Text = 'New Item'
      end
      inherited dxLayoutItem8: TdxLayoutItem
        CaptionOptions.Text = 'New Item'
      end
      inherited dxLayoutItem9: TdxLayoutItem
        CaptionOptions.Text = 'New Item'
      end
    end
  end
  object Panel_page: TPanel
    Left = 0
    Top = 117
    Width = 1077
    Height = 37
    Align = alTop
    AutoSize = True
    BevelInner = bvRaised
    BevelOuter = bvLowered
    TabOrder = 4
    ExplicitTop = 118
    DesignSize = (
      1077
      37)
    object LBCPAP: TLabel
      Left = 425
      Top = 8
      Width = 100
      Height = 20
      Alignment = taCenter
      Anchors = [akLeft]
      AutoSize = False
      Caption = #24403#21069#39029'/'#24635#39029#25968
      Layout = tlCenter
      ExplicitTop = 7
    end
    object Label31: TLabel
      Left = 14
      Top = 8
      Width = 96
      Height = 21
      Alignment = taCenter
      Anchors = [akLeft]
      Caption = #27599#39029#35760#24405#26465#25968
      Layout = tlCenter
      ExplicitTop = 7
    end
    object BTNP: TButton
      Left = 532
      Top = 5
      Width = 78
      Height = 30
      Anchors = [akLeft]
      Caption = #19979#19968#39029
      TabOrder = 0
      OnClick = BTNPClick
    end
    object BTLP: TButton
      Left = 338
      Top = 4
      Width = 78
      Height = 31
      Anchors = [akLeft]
      Caption = #19978#19968#39029
      TabOrder = 1
      OnClick = BTLPClick
    end
    object TCBNOR: TcxComboBox
      Tag = 2
      Left = 122
      Top = 2
      Properties.DropDownListStyle = lsEditFixedList
      Properties.Items.Strings = (
        '500'
        '1000'
        '5000'
        '10000')
      Properties.OnChange = TCBNORPropertiesChange
      TabOrder = 2
      Text = '500'
      Width = 94
    end
  end
  object DataSource1: TDataSource
    DataSet = CDS_List
    Left = 768
    Top = 296
  end
  object ADOQueryList: TADOQuery
    Connection = DataLink_schedule.ADOLink
    LockType = ltReadOnly
    Parameters = <>
    Left = 704
    Top = 368
  end
  object cxGridPopupMenu1: TcxGridPopupMenu
    Grid = cxGrid1
    PopupMenus = <>
    Left = 208
    Top = 287
  end
  object ADOQueryBaseCmd: TADOQuery
    Parameters = <>
    Left = 281
    Top = 248
  end
  object ADOQueryBaseTemp: TADOQuery
    LockType = ltReadOnly
    Parameters = <>
    Left = 201
    Top = 225
  end
  object CDS_List: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 395
    Top = 280
  end
end