⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 mainform.dfm.~9~

📁 双色球彩票历史纪录分析并附带全部双色球开奖数据,chart数据分析
💻 ~9~
📖 第 1 页 / 共 2 页
字号:
          TabOrder = 1
          Text = #32418#29699#36208#21183
          OnChange = TBFSChange
          Items.Strings = (
            #32418#29699#36208#21183
            #34013#29699#36208#21183
            #32418#34013#20849#21516#36208#21183
            #21452#36830#21495#36208#21183
            #19977#36830#21495#36208#21183
            #22235#36830#21495#36208#21183
            #21452#36339#21495#36208#21183
            #19977#36339#21495#36208#21183)
        end
        object btnSave: TBitBtn
          Left = 496
          Top = 8
          Width = 49
          Height = 25
          Caption = #20445#23384
          TabOrder = 2
          OnClick = btnSaveClick
        end
      end
    end
    object TabSheet5: TTabSheet
      Caption = #25968#25454#22270#34920
      ImageIndex = 4
      OnShow = TabSheet5Show
      object tb: TStringGrid
        Left = 0
        Top = 0
        Width = 555
        Height = 399
        Align = alClient
        ColCount = 50
        Ctl3D = False
        DefaultColWidth = 18
        DefaultRowHeight = 18
        RowCount = 2
        ParentCtl3D = False
        TabOrder = 0
        OnDrawCell = tbDrawCell
      end
    end
    object TabSheet3: TTabSheet
      Caption = #36141#20080#35760#24405
      ImageIndex = 2
      ExplicitLeft = 0
      ExplicitTop = 0
      ExplicitWidth = 0
      ExplicitHeight = 0
      object Panel3: TPanel
        Left = 0
        Top = 0
        Width = 555
        Height = 73
        Align = alTop
        BevelOuter = bvNone
        TabOrder = 0
        ExplicitLeft = 16
        object Label4: TLabel
          Left = 8
          Top = 16
          Width = 117
          Height = 13
          Caption = #26368#26032#24320#22870#25968#25454#24405#20837#65306
        end
        object DBEdit1: TDBEdit
          Left = 128
          Top = 8
          Width = 81
          Height = 21
          DataField = #36141#20080#26399#25968
          DataSource = GDS
          TabOrder = 0
        end
        object DBEdit2: TDBEdit
          Left = 216
          Top = 8
          Width = 33
          Height = 21
          DataField = #32418#33394'1'
          DataSource = GDS
          TabOrder = 1
          OnKeyPress = DBEdit2KeyPress
        end
        object DBEdit3: TDBEdit
          Left = 256
          Top = 8
          Width = 33
          Height = 21
          DataField = #32418#33394'2'
          DataSource = GDS
          TabOrder = 2
          OnKeyPress = DBEdit3KeyPress
        end
        object DBEdit4: TDBEdit
          Left = 296
          Top = 8
          Width = 33
          Height = 21
          DataField = #32418#33394'3'
          DataSource = GDS
          TabOrder = 3
          OnKeyPress = DBEdit4KeyPress
        end
        object DBEdit5: TDBEdit
          Left = 336
          Top = 8
          Width = 33
          Height = 21
          DataField = #32418#33394'4'
          DataSource = GDS
          TabOrder = 4
          OnKeyPress = DBEdit5KeyPress
        end
        object DBEdit6: TDBEdit
          Left = 376
          Top = 8
          Width = 33
          Height = 21
          DataField = #32418#33394'5'
          DataSource = GDS
          TabOrder = 5
          OnKeyPress = DBEdit6KeyPress
        end
        object DBEdit7: TDBEdit
          Left = 416
          Top = 8
          Width = 33
          Height = 21
          DataField = #32418#33394'6'
          DataSource = GDS
          TabOrder = 6
          OnKeyPress = DBEdit7KeyPress
        end
        object DBEdit8: TDBEdit
          Left = 456
          Top = 8
          Width = 33
          Height = 21
          DataField = #34013#33394
          DataSource = GDS
          TabOrder = 7
        end
        object DBNavigator1: TDBNavigator
          Left = 257
          Top = 48
          Width = 232
          Height = 25
          DataSource = GDS
          VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbInsert, nbEdit, nbPost, nbCancel]
          TabOrder = 8
        end
      end
      object GDG: TDBGrid
        Left = 0
        Top = 79
        Width = 561
        Height = 281
        DataSource = GDS
        TabOrder = 1
        TitleFont.Charset = ANSI_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -13
        TitleFont.Name = #23435#20307
        TitleFont.Style = []
        Columns = <
          item
            Expanded = False
            FieldName = #32534#21495
            Width = 60
            Visible = True
          end
          item
            Expanded = False
            FieldName = #36141#20080#26399#25968
            Width = 60
            Visible = True
          end
          item
            Expanded = False
            FieldName = #32418#33394'1'
            Width = 60
            Visible = True
          end
          item
            Expanded = False
            FieldName = #32418#33394'2'
            Width = 60
            Visible = True
          end
          item
            Expanded = False
            FieldName = #32418#33394'3'
            Width = 60
            Visible = True
          end
          item
            Expanded = False
            FieldName = #32418#33394'4'
            Width = 60
            Visible = True
          end
          item
            Expanded = False
            FieldName = #32418#33394'5'
            Width = 60
            Visible = True
          end
          item
            Expanded = False
            FieldName = #32418#33394'6'
            Width = 60
            Visible = True
          end
          item
            Expanded = False
            FieldName = #34013#33394
            Width = 60
            Visible = True
          end
          item
            Expanded = False
            FieldName = #36141#20080#26085#26399
            Width = 115
            Visible = True
          end>
      end
    end
    object TabSheet4: TTabSheet
      Caption = #36141#20080#20998#26512
      ImageIndex = 4
      OnHide = TabSheet4Hide
      OnShow = TabSheet4Show
      object GMTB: TStringGrid
        Left = 0
        Top = 0
        Width = 555
        Height = 399
        Align = alClient
        ColCount = 50
        Ctl3D = False
        DefaultColWidth = 18
        DefaultRowHeight = 18
        RowCount = 2
        ParentCtl3D = False
        TabOrder = 0
        OnDrawCell = GMTBDrawCell
      end
    end
    object TabSheet6: TTabSheet
      Caption = #31449#38271#32593#31449
      ImageIndex = 5
      OnShow = TabSheet6Show
      object wb: TWebBrowser
        Left = 0
        Top = 0
        Width = 555
        Height = 399
        Align = alClient
        TabOrder = 0
        OnNewWindow2 = wbNewWindow2
        ControlData = {
          4C0000005C3900003D2900000000000000000000000000000000000000000000
          000000004C000000000000000000000001000000E0D057007335CF11AE690800
          2B2E126208000000000000004C0000000114020000000000C000000000000046
          8000000000000000000000000000000000000000000000000000000000000000
          00000000000000000100000000000000000000000000000000000000}
      end
    end
  end
  object DS: TDataSource
    DataSet = AT
    Left = 156
    Top = 160
  end
  object AC: TADOConnection
    Connected = True
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;Data Source='#21452#33394#29699'.mdb;Persist Sec' +
      'urity Info=False'
    LoginPrompt = False
    Mode = cmShareDenyNone
    Provider = 'Microsoft.Jet.OLEDB.4.0'
    Left = 220
    Top = 160
  end
  object AQ: TADOQuery
    Connection = AC
    Parameters = <>
    Left = 156
    Top = 296
  end
  object GDS: TDataSource
    DataSet = GAT
    Left = 76
    Top = 216
  end
  object AT: TADOQuery
    Active = True
    Connection = AC
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from '#24320#22870#25968#25454'  order by '#32534#21495' desc')
    Left = 312
    Top = 160
  end
  object GAT: TADOQuery
    Active = True
    Connection = AC
    CursorType = ctStatic
    OnNewRecord = GATNewRecord
    Parameters = <>
    SQL.Strings = (
      'select * from '#36141#20080#35760#24405' order by '#32534#21495' desc')
    Left = 272
    Top = 224
  end
end

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -