uselectprovider.dfm

天涯進銷存系統

      FF00FFFFFFBFFFFFFF00FFFFFFBFFFFFFF00FFFFFFBFFFFFFF00FFFFFFBFFFFF
      FF00FFFFFFBFFFFFFF00FFFFFF0000000000FF00FF00FF00FF00FF00FF000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000FF00FF00FF00FF00FF00FF00FF00FF00FF00
      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00}
    Style = tbsButton
  end
  object LBSpeecButton1: TLBSpeecButton
    Left = 9
    Top = 34
    Width = 51
    Height = 22
    Cursor = crHandPoint
    Action = Action1
    Flat = True
    Glyph.Data = {
      36040000424D3604000000000000360000002800000010000000100000000100
      2000000000000004000000000000000000000000000000000000FF00FF000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000FF00FF00FF00FF00FF00FF000000
      0000FFFFFFBFFFFFFF00FFFFFFBFFFFFFF00FFFFFFBFFFFFFF00FFFFFFBFFFFF
      FF00FFFFFFBFFFFFFF00FFFFFF0000000000FF00FF00FF00FF00FF00FF000000
      0000FFFFFFBFFFFFFF00FFFFFFBFFFFFFF00FFFFFF0000800000FFFFFFBFFFFF
      FF00FFFFFFBFFFFFFF00FFFFFF0000000000FF00FF00FF00FF00FF00FF000000
      0000FFFFFFBFFFFFFF00FFFFFFBFFFFFFF000080000000800000FFFFFFBFFFFF
      FF00FFFFFFBFFFFFFF00FFFFFF0000000000FF00FF00FF00FF00FF00FF000000
      0000FFFFFFBFFFFFFF00FFFFFF00008000000080000000800000008000000080
      0000FFFFFFBFFFFFFF00FFFFFF0000000000FF00FF00FF00FF00FF00FF000000
      0000FFFFFFBFFFFFFF00FFFFFFBFFFFFFF000080000000800000FFFFFFBFFFFF
      FF00008000BFFFFFFF00FFFFFF0000000000FF00FF00FF00FF00FF00FF000000
      0000FFFFFFBFFFFFFF00FFFFFFBFFFFFFF00FFFFFF0000800000FFFFFFBFFFFF
      FF00008000BFFFFFFF00FFFFFF0000000000FF00FF00FF00FF00FF00FF000000
      0000FFFFFFBFFFFFFF00008000BFFFFFFF00FFFFFFBFFFFFFF00FFFFFFBFFFFF
      FF00008000BFFFFFFF00FFFFFF0000000000FF00FF00FF00FF00FF00FF000000
      0000FFFFFFBFFFFFFF00008000BFFFFFFF00FFFFFF0000800000FFFFFFBFFFFF
      FF00FFFFFFBFFFFFFF00FFFFFF0000000000FF00FF00FF00FF00FF00FF000000
      0000FFFFFFBFFFFFFF00008000BFFFFFFF00FFFFFF0000800000008000BFFFFF
      FF00FFFFFFBFFFFFFF00FFFFFF0000000000FF00FF00FF00FF00FF00FF000000
      0000FFFFFFBFFFFFFF00FFFFFF00008000000080000000800000008000000080
      0000FFFFFFBFFFFFFF00FFFFFF0000000000FF00FF00FF00FF00FF00FF000000
      0000FFFFFFBFFFFFFF00FFFFFFBFFFFFFF00FFFFFF0000800000008000BFFFFF
      FF00FFFFFFBFFFFFFF00FFFFFF0000000000FF00FF00FF00FF00FF00FF000000
      0000FFFFFFBFFFFFFF00FFFFFFBFFFFFFF00FFFFFF0000800000FFFFFFBFFFFF
      FF0000000000000000000000000000000000FF00FF00FF00FF00FF00FF000000
      0000FFFFFFBFFFFFFF00FFFFFFBFFFFFFF00FFFFFFBFFFFFFF00FFFFFFBFFFFF
      FF00000000BFFFFFFF0000000000FF00FF00FF00FF00FF00FF00FF00FF000000
      0000FFFFFFBFFFFFFF00FFFFFFBFFFFFFF00FFFFFFBFFFFFFF00FFFFFFBFFFFF
      FF000000000000000000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00}
    Style = tbsButton
  end
  object LBEdit1: TLBEdit
    Left = 206
    Top = 37
    Width = 83
    Height = 18
    ParentColor = True
    TabOrder = 0
    OnChange = LBEdit1Change
    OnKeyDown = LBEdit1KeyDown
  end
  object LBEdit2: TLBEdit
    Left = 370
    Top = 37
    Width = 130
    Height = 18
    ParentColor = True
    TabOrder = 1
    OnChange = LBEdit1Change
    OnKeyDown = LBEdit2KeyDown
  end
  object Panel6: TPanel
    Left = 506
    Top = 30
    Width = 2
    Height = 345
    Align = alRight
    BevelOuter = bvNone
    Color = 13003057
    Font.Charset = GB2312_CHARSET
    Font.Color = clWhite
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 2
  end
  object Panel4: TPanel
    Left = 0
    Top = 30
    Width = 2
    Height = 345
    Align = alLeft
    BevelOuter = bvNone
    Color = 13003057
    Font.Charset = GB2312_CHARSET
    Font.Color = clWhite
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 3
  end
  object Panel3: TPanel
    Left = 0
    Top = 375
    Width = 508
    Height = 2
    Align = alBottom
    BevelOuter = bvNone
    Color = 13003057
    Font.Charset = GB2312_CHARSET
    Font.Color = clWhite
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 4
  end
  object Panel2: TPanel
    Left = 9
    Top = 65
    Width = 489
    Height = 21
    BevelOuter = bvNone
    Color = 14581072
    Font.Charset = GB2312_CHARSET
    Font.Color = clWhite
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 5
    object Label17: TLabel
      Left = 3
      Top = 5
      Width = 60
      Height = 12
      Caption = #20379#24212#21830#32534#21495
    end
    object Label21: TLabel
      Left = 107
      Top = 5
      Width = 60
      Height = 12
      Caption = #20379#24212#21830#21517#31216
    end
    object Label5: TLabel
      Left = 288
      Top = 5
      Width = 36
      Height = 12
      Caption = #32852#31995#20154
    end
    object Label6: TLabel
      Left = 381
      Top = 5
      Width = 48
      Height = 12
      Caption = #32852#31995#30005#35805
    end
  end
  object DataDBGrid: TLBDBGrid
    Left = 9
    Top = 86
    Width = 472
    Height = 283
    BorderStyle = bsNone
    DataSource = dmData.dsSelectProvider
    GridlineColor = clBackground
    Options = [dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
    ShowScrollBars = False
    SelectRowColor = 16774127
    SelectRowFontColor = clHighlight
    TabOrder = 6
    TitleFont.Charset = GB2312_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -12
    TitleFont.Name = #23435#20307
    TitleFont.Style = []
    OnDblClick = Action2Execute
    OnKeyDown = DataDBGridKeyDown
    Columns = <
      item
        Expanded = False
        FieldName = 'CODE'
        Width = 105
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'PROVIDERNAME'
        Width = 180
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'LINKMAN'
        Width = 93
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'LINKPHONE'
        Width = 91
        Visible = True
      end>
  end
  object LBDBScrollBar1: TLBDBScrollBar
    Left = 481
    Top = 86
    Width = 18
    Height = 284
    Color = 16774127
    LineColor = clBackground
    DownFontColor = clBlack
    Font.Charset = SYMBOL_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = 'Marlett'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 7
    DataSource = dmData.sdsSelectProvider
  end
  object ActionList1: TActionList
    Images = frmMain.ToolbarImageList
    Left = 408
    Top = 224
    object Action1: TAction
      Caption = #21047#26032
      ImageIndex = 4
      OnExecute = Action1Execute
    end
    object Action2: TAction
      Caption = #36873#25321
      ImageIndex = 8
      OnExecute = Action2Execute
    end
  end
end