modifybjdatasrc.dfm

该程序可作为386的接警程序使用

object FormModifyBJData: TFormModifyBJData
  Left = 489
  Top = 274
  BorderStyle = bsDialog
  Caption = #20462#25913#25253#35686#22120
  ClientHeight = 251
  ClientWidth = 438
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnActivate = FormActivate
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 0
    Top = -8
    Width = 457
    Height = 265
    TabOrder = 0
    object Label1: TLabel
      Left = 6
      Top = 16
      Width = 59
      Height = 21
      AutoSize = False
      Caption = #26597#35810#23383#27573
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label2: TLabel
      Left = 152
      Top = 16
      Width = 73
      Height = 20
      AutoSize = False
      Caption = #36755#20837#23545#24212#20540
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object ComboBoxModifyBJData: TComboBox
      Left = 65
      Top = 14
      Width = 83
      Height = 21
      ImeName = #20013#25991'('#31616#20307') - '#26234#33021' ABC'
      ItemHeight = 13
      TabOrder = 0
      Text = #25253#35686#22120#32534#21495
      OnChange = ComboBoxModifyBJDataChange
    end
    object Edit1: TEdit
      Left = 224
      Top = 14
      Width = 161
      Height = 21
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      TabOrder = 1
    end
    object Button1: TButton
      Left = 46
      Top = 232
      Width = 54
      Height = 22
      Caption = #20462#25913
      TabOrder = 2
      OnClick = ButtonModifyClick
    end
    object Button2: TButton
      Left = 358
      Top = 232
      Width = 54
      Height = 22
      Caption = #20851#38381
      TabOrder = 3
      OnClick = ButtonCloseClick
    end
    object DBGrid1: TDBGrid
      Left = 3
      Top = 40
      Width = 433
      Height = 185
      DataSource = FormBJData.DataSource1
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      ReadOnly = True
      TabOrder = 4
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
    end
    object Button3: TButton
      Left = 389
      Top = 13
      Width = 44
      Height = 23
      Caption = #26597#35810
      TabOrder = 5
      OnClick = ButtonOKClick
    end
    object CheckBox1: TCheckBox
      Left = 31
      Top = 234
      Width = 17
      Height = 17
      TabOrder = 6
      OnClick = CheckBox1Click
    end
    object Button4: TButton
      Left = 201
      Top = 233
      Width = 54
      Height = 22
      Caption = #26597#35810#20840#37096
      TabOrder = 7
      OnClick = Button4Click
    end
  end
end