u_busnosellplan.dfm

数据库基本信息添加

object Form1: TForm1
  Left = 192
  Top = 137
  Width = 696
  Height = 480
  Caption = 'Form1'
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -19
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 19
  object Label1: TLabel
    Left = 61
    Top = 104
    Width = 32
    Height = 16
    Caption = #36710#27425
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label2: TLabel
    Left = 256
    Top = 104
    Width = 32
    Height = 16
    Caption = #21040#31449
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label3: TLabel
    Left = 421
    Top = 105
    Width = 64
    Height = 16
    Caption = #31105#21806#26102#38388
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label4: TLabel
    Left = 192
    Top = 29
    Width = 273
    Height = 36
    Alignment = taCenter
    AutoSize = False
    Caption = #31105#21806#20449#24687#35843#25972
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -32
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Edit1: TEdit
    Left = 97
    Top = 102
    Width = 100
    Height = 22
    Ctl3D = False
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = []
    ParentCtl3D = False
    ParentFont = False
    TabOrder = 0
  end
  object Edit2: TEdit
    Left = 292
    Top = 102
    Width = 100
    Height = 22
    Ctl3D = False
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = []
    ParentCtl3D = False
    ParentFont = False
    TabOrder = 1
  end
  object Button1: TButton
    Left = 295
    Top = 351
    Width = 143
    Height = 33
    Caption = #33258#21160#35843#25972
    TabOrder = 2
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 88
    Top = 352
    Width = 169
    Height = 32
    Caption = #25552#20132#22522#26412#20449#24687
    TabOrder = 3
    OnClick = Button2Click
  end
  object DateTimePicker6: TDateTimePicker
    Left = 512
    Top = 99
    Width = 64
    Height = 24
    CalAlignment = dtaLeft
    Date = 39018.7437194097
    Time = 39018.7437194097
    DateFormat = dfShort
    DateMode = dmComboBox
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = []
    ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
    Kind = dtkTime
    ParseInput = False
    ParentFont = False
    TabOrder = 4
  end
  object DBGridEh1: TDBGridEh
    Left = 56
    Top = 144
    Width = 561
    Height = 201
    DataSource = DataSource1
    Flat = False
    FooterColor = clWindow
    FooterFont.Charset = GB2312_CHARSET
    FooterFont.Color = clWindowText
    FooterFont.Height = -19
    FooterFont.Name = #23435#20307
    FooterFont.Style = []
    OddRowColor = clBlue
    Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
    OptionsEh = [dghFixed3D, dghData3D, dghHighlightFocus, dghClearSelection, dghDialogFind]
    PopupMenu = PopupMenu1
    TabOrder = 5
    TitleFont.Charset = GB2312_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -19
    TitleFont.Name = #23435#20307
    TitleFont.Style = []
    Columns = <
      item
        EditButtons = <>
        FieldName = 'bliID'
        Footers = <>
        Title.Caption = #36710#27425
        Width = 138
      end
      item
        EditButtons = <>
        FieldName = 'prtName'
        Footers = <>
        Title.Caption = #21040#31449
        Width = 158
      end
      item
        EditButtons = <>
        FieldName = 'bpnSendTime'
        Footers = <>
        Title.Caption = #24320#22987#31105#21806#26102#38388
        Width = 150
      end>
  end
  object Button3: TButton
    Left = 464
    Top = 350
    Width = 153
    Height = 33
    Caption = #22522#26412#20449#24687#26597#35810
    TabOrder = 6
    OnClick = Button3Click
  end
  object ADOConnection1: TADOConnection
    ConnectionString = 'FILE NAME=.\conn\conn.udl'
    LoginPrompt = False
    Provider = '.\conn\conn.udl'
    Left = 128
    Top = 24
  end
  object ADOQuery1: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    Left = 216
    Top = 24
  end
  object Timer1: TTimer
    Enabled = False
    Interval = 60000
    OnTimer = Timer1Timer
    Left = 608
    Top = 32
  end
  object ADOQuery2: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    Left = 480
    Top = 24
  end
  object ADOQuery3: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    Left = 128
    Top = 64
  end
  object DataSource1: TDataSource
    DataSet = ADOQuery3
    Left = 168
    Top = 64
  end
  object PopupMenu1: TPopupMenu
    Left = 208
    Top = 280
    object N1: TMenuItem
      Caption = #21024#38500
      OnClick = N1Click
    end
  end
  object ADOQuery4: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    Left = 40
    Top = 64
  end
end