lx.dfm

客户关系管理系统 客户关系管理系统

object LXFrm: TLXFrm
  Left = 245
  Top = 229
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = #31867#22411#31649#29702
  ClientHeight = 295
  ClientWidth = 261
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnClose = FormClose
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object SpeedButton1: TSpeedButton
    Left = 183
    Top = 144
    Width = 67
    Height = 29
    Caption = #28155#21152'(&A)'
    Flat = True
    Glyph.Data = {
      F6000000424DF600000000000000760000002800000010000000100000000100
      0400000000008000000000000000000000001000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
      777777777777700007777777777770BB07777777777770BB07777777770000BB
      00007777770BBBBBBBB07777770BBBBBBBB07777770000BB00000000077770BB
      07770FFF077770BB07770FFF077770000777CCCCC00077777777CCCCCFF07777
      77777770FFF077777777777CCCCC77777777777CCCCC77777777}
    OnClick = SpeedButton1Click
  end
  object SpeedButton2: TSpeedButton
    Left = 183
    Top = 177
    Width = 67
    Height = 29
    Caption = #21024#38500'(&D)'
    Flat = True
    Glyph.Data = {
      36010000424D3601000000000000760000002800000014000000100000000100
      040000000000C000000000000000000000001000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777774444
      4444777700007777777747778484777700007777777747F77844777700007777
      777747F78484777700007777777747F77844777700007777777747F784847777
      00007777777747F7788477770000777777774444444487770000777777777777
      7770477700007777777777777774047700007777777744777770487700007777
      7774704777748477000077777774F707777844770000777777774477777F4777
      0000777777477777777447770000777777777777777477770000}
    OnClick = SpeedButton2Click
  end
  object SpeedButton3: TSpeedButton
    Left = 183
    Top = 210
    Width = 67
    Height = 29
    Caption = #20445#23384'(&S)'
    Flat = True
    Glyph.Data = {
      66010000424D6601000000000000760000002800000014000000140000000100
      040000000000F000000000000000000000001000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
      7777777700007777777777777777777700007777777777777777777700007777
      770088888888880000007777770007FFFFFFF0000000777797000F7FFFFFF000
      00007777197007FFFFFFF0000000919191970F7FFFFF700000001919191977F7
      F7F7F0000000999991970F7F7F7F700000007777197000000000000000007777
      970000000000000000007777770008888888800000007777770087787F7F7800
      0000777777008778F788F80000007777770087787F8878000000777777808888
      8888880800007777777777777777777700007777777777777777777700007777
      77777777777777770000}
    OnClick = SpeedButton3Click
  end
  object SpeedButton4: TSpeedButton
    Left = 183
    Top = 244
    Width = 67
    Height = 29
    Caption = #36864#20986'(&E)'
    Flat = True
    Glyph.Data = {
      F6000000424DF600000000000000760000002800000010000000100000000100
      0400000000008000000000000000000000001000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777700777777
      77777770E07777777777770EE0777777777700EEE0000000000070EEE0888077
      777770EEE0888077777770EEE0888077777770EEE0888077777770EEE0888077
      707770EEE0888077007770EEE0888070000070EEE0888077007770EEE0888077
      707770EE08888077777770E08888807777777000000000777777}
    OnClick = SpeedButton4Click
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 171
    Height = 295
    Align = alLeft
    BevelInner = bvRaised
    BevelOuter = bvLowered
    Color = clActiveBorder
    TabOrder = 0
    object Label2: TLabel
      Left = 8
      Top = 72
      Width = 33
      Height = 13
      AutoSize = False
      Caption = #31867#22411':'
    end
    object Label1: TLabel
      Left = 7
      Top = 16
      Width = 82
      Height = 13
      AutoSize = False
      Caption = #35831#36755#20837#20869#23481':'
    end
    object Edit1: TEdit
      Left = 4
      Top = 32
      Width = 154
      Height = 21
      Color = clGradientInactiveCaption
      Enabled = False
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      TabOrder = 0
    end
    object DBLookupListBox1: TDBLookupListBox
      Left = 4
      Top = 90
      Width = 157
      Height = 199
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      KeyField = 'typedocument'
      ListField = 'typedocument'
      ListSource = DataSource1
      TabOrder = 1
    end
  end
  object DataSource1: TDataSource
    DataSet = ADOQuery1
    Left = 184
    Top = 24
  end
  object ADOQuery1: TADOQuery
    Connection = MainForm.ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select distinct typedocument,typeID from companytype ')
    Left = 216
    Top = 24
  end
end