unitbasic1.~dfm

远程抄表系统的客户端程序 安徽六安项目-客户端程序 0 开发环境 Delphi 7.0 所需控件 mxOutlookBar 数 据 库 Sybase 11.5 1 04-12-

object FormBasic1: TFormBasic1
  Left = 69
  Top = 112
  AlphaBlend = True
  BorderStyle = bsNone
  Caption = #32447#36335#22522#26412#20449#24687
  ClientHeight = 435
  ClientWidth = 689
  Color = clSkyBlue
  DragKind = dkDock
  DragMode = dmAutomatic
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clGreen
  Font.Height = -16
  Font.Name = 'MS Sans Serif'
  Font.Style = [fsBold]
  OldCreateOrder = False
  WindowState = wsMaximized
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 20
  object ListView: TListView
    Left = 0
    Top = 37
    Width = 689
    Height = 398
    Align = alClient
    BevelOuter = bvNone
    BevelKind = bkSoft
    BorderStyle = bsNone
    Color = clSkyBlue
    Columns = <>
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -13
    Font.Name = #23435#20307
    Font.Style = []
    GridLines = True
    HideSelection = False
    HotTrack = True
    MultiSelect = True
    ReadOnly = True
    RowSelect = True
    ParentFont = False
    ParentShowHint = False
    PopupMenu = PopupMenu
    ShowWorkAreas = True
    ShowHint = False
    TabOrder = 0
    ViewStyle = vsReport
    OnDblClick = BtnModifyClick
  end
  object CoolBar: TCoolBar
    Left = 0
    Top = 0
    Width = 689
    Height = 37
    AutoSize = True
    BandBorderStyle = bsNone
    Bands = <
      item
        Control = ToolBar
        ImageIndex = -1
        MinHeight = 35
        Width = 687
      end>
    EdgeInner = esNone
    EdgeOuter = esRaised
    object ToolBar: TToolBar
      Left = 9
      Top = 0
      Width = 674
      Height = 35
      Cursor = crHandPoint
      Align = alClient
      ButtonHeight = 36
      ButtonWidth = 89
      Caption = 'ToolBar'
      DragCursor = crHelp
      EdgeBorders = [ebLeft]
      EdgeInner = esNone
      EdgeOuter = esNone
      Flat = True
      Font.Charset = ANSI_CHARSET
      Font.Color = clGreen
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      Images = ImageList
      ParentFont = False
      ParentShowHint = False
      ShowCaptions = True
      ShowHint = False
      TabOrder = 0
      Transparent = False
      object BtnAdd: TToolButton
        Left = 0
        Top = 0
        Cursor = crHandPoint
        Hint = #22686#21152#26032#32447#36335
        Caption = '    '#22686#21152'    '
        DragCursor = crHandPoint
        ImageIndex = 0
        ParentShowHint = False
        ShowHint = True
        OnClick = BtnAddClick
      end
      object BtnModify: TToolButton
        Left = 89
        Top = 0
        Hint = #20462#25913#36873#20013#32447#36335
        Caption = #20462#25913
        DragCursor = crHandPoint
        ImageIndex = 1
        ParentShowHint = False
        ShowHint = True
        OnClick = BtnModifyClick
      end
      object BtnDel: TToolButton
        Left = 178
        Top = 0
        Hint = #21024#38500#36873#20013#32447#36335
        Caption = #21024#38500
        DragCursor = crHandPoint
        ImageIndex = 2
        ParentShowHint = False
        ShowHint = True
        OnClick = BtnDeleteClick
      end
      object BtnSeek: TToolButton
        Left = 267
        Top = 0
        Hint = #22797#26434#26465#20214#26597#35810
        Caption = #26597#35810
        DragCursor = crHandPoint
        Enabled = False
        ImageIndex = 3
        ParentShowHint = False
        ShowHint = True
        OnClick = BtnSeekClick
      end
      object BtnRefresh: TToolButton
        Left = 356
        Top = 0
        Hint = #37325#26032#35835#21462#25968#25454#24211
        Caption = #21047#26032
        DragCursor = crHandPoint
        ImageIndex = 4
        ParentShowHint = False
        ShowHint = True
        OnClick = BtnRefreshClick
      end
      object BtnExit: TToolButton
        Left = 445
        Top = 0
        Hint = #20851#38381#27492#31383#21475
        Caption = #20851#38381
        DragCursor = crHandPoint
        ImageIndex = 5
        ParentShowHint = False
        ShowHint = True
        OnClick = BtnExitClick
      end
    end
  end
  object PopupMenu: TPopupMenu
    Images = ImageList
    Left = 8
    Top = 56
    object MenuAdd: TMenuItem
      Caption = ' '#22686#21152#32447#36335'(&A)'
      ImageIndex = 0
      OnClick = BtnAddClick
    end
    object MenuModify: TMenuItem
      Caption = ' '#20462#25913#32447#36335'(&B)'
      ImageIndex = 1
      OnClick = BtnModifyClick
    end
    object MenuDelete: TMenuItem
      Caption = ' '#21024#38500#32447#36335'(&C)'
      ImageIndex = 2
      OnClick = BtnDeleteClick
    end
    object MenuSeek: TMenuItem
      Caption = ' '#26465#20214#26597#35810'(&D)'
      Enabled = False
      ImageIndex = 3
      OnClick = BtnSeekClick
    end
    object MenuRefresh: TMenuItem
      Caption = ' '#21047#26032#25968#25454'(&E)'
      ImageIndex = 4
      OnClick = BtnRefreshClick
    end
    object MenuExit: TMenuItem
      Caption = ' '#20851#38381#31383#21475'(&F)'
      ImageIndex = 5
      OnClick = BtnExitClick
    end
  end
  object ImageList: TImageList
    Left = 40
    Top = 56