main.~dfm

小型CRM客户关系管理

object F_Main: TF_Main
  Left = 262
  Top = 162
  Width = 453
  Height = 353
  Caption = #23458#25143#31649#29702#36719#20214
  Color = clAppWorkSpace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIForm
  Icon.Data = {
    000001000200202002000000000030010000260000002020100000000000F002
    0000560100002800000020000000400000000100010000000000000100000000
    000000000000000000000000000000000000FFFFFF0000000000000000000000
    000000000000000000000000000000036000000D80000036BC0000DB6000006C
    FF000093F00001FFEF0003F8DF800BF73FD01BFBFFB41DFDFF6E5EC006DFEF00
    01BFF780037FFB0000FFFC0003FEFC0001FEFC0001FE780000FC780000FC7000
    00783000007820000030200000200000000000000000FFFFFFFFFFFFFFFFFC7F
    FE3FFBFFFFDFF73FFCEFFEFC1F7FFFF00FFFFFC003FFFF0001FFFE0000FFFE00
    007FFE00007FFC00007FF000000FE0000003C00000018000000000000000003F
    F800003FF800007FF80000FFF80101FFFC0101FFFC0183FFFE0383FFFE0387FF
    FF07C7FFFF07CFFFFF8FCFFFFF9FFFFFFFFFFFFFFFFF28000000200000004000
    0000010004000000000080020000000000000000000000000000000000000000
    000000008000008000000080800080000000800080008080000080808000C0C0
    C0000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
    0000000000000000000000000000000000000000000000000000000000000000
    0077700000000000000777000000000007000000000000000000007000000000
    7000770000000000007700070000000000070000000000000000700000000000
    00000000008F07700000000000000000000000008F08F0000000000000000000
    0000008F08F0808877000000000000000000FF08F08F08F00000000000000000
    00000FF08F008FFF88770000000000000000F008008FFFF80000000000000000
    000FFFFFFFFFFF808888000000000000008FFFFF80008808FFF8700000000000
    608FFFFF0FF8008FFFFF8707000000066088FFFFF0FFFFFFFFFFF0880700000E
    66088FFFFF0FFFFFFFFF0BB07770060E666088000000000007F0BB0787776660
    E666000000000000000BB078787766660E6660000000000000BB088787876666
    60EE0000000000000700F888787866666600000000000000007F8F8887806666
    66000000000000000008F8F8887066666600000000000000000F8F8F88800666
    60000000000000000000F8F8F8000666600000000000000000008F8F8F000666
    0000000000000000000008F8F0000066000000000000000000000F8F80000060
    0000000000000000000000F80000006000000000000000000000008000000000
    000000000000000000000000000000000000000000000000000000000000FFFF
    FFFFFFFFFFFFFC7FFE3FFBFFFFDFF73FFCEFFEFC1F7FFFF00FFFFFC003FFFF00
    01FFFE0000FFFE00007FFE00007FFC00007FF000000FE0000003C00000018000
    000000000000003FF800003FF800007FF80000FFF80101FFFC0101FFFC0183FF
    FE0383FFFE0387FFFF07C7FFFF07CFFFFF8FCFFFFF9FFFFFFFFFFFFFFFFF0000
    000000000000}
  Menu = MainMenu1
  OldCreateOrder = False
  Position = poDefault
  WindowState = wsMaximized
  WindowMenu = M_Windows
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object ToolBar1: TToolBar
    Left = 0
    Top = 0
    Width = 445
    Height = 29
    Caption = 'ToolBar1'
    Color = clBtnFace
    Images = ImageList1
    ParentColor = False
    TabOrder = 0
    object TB_Cli_Input: TToolButton
      Left = 0
      Top = 2
      Caption = #23458#25143#36755#20837'(&I)'
      ImageIndex = 0
      MenuItem = M_Cli_Input
      ParentShowHint = False
      ShowHint = True
    end
    object TB_Cli_Modify: TToolButton
      Left = 23
      Top = 2
      Caption = #23458#25143#20462#25913'(&M)'
      ImageIndex = 1
      MenuItem = M_Cli_Modify
      ParentShowHint = False
      ShowHint = True
    end
    object TB_Cli_Del: TToolButton
      Left = 46
      Top = 2
      Caption = #23458#25143#21024#38500'(&D)'
      ImageIndex = 2
      MenuItem = M_Cli_Del
      ParentShowHint = False
      ShowHint = True
    end
    object TB_Cli_Query: TToolButton
      Left = 69
      Top = 2
      Caption = #23458#25143#26597#35810'(&Q)'
      ImageIndex = 3
      MenuItem = M_Cli_Query
      ParentShowHint = False
      ShowHint = True
    end
    object TB_Cli_Print: TToolButton
      Left = 92
      Top = 2
      Caption = #23458#25143#25171#21360'(&P)'
      ImageIndex = 4
      MenuItem = M_Cli_Print
      ParentShowHint = False
      ShowHint = True
    end
    object ToolButton4: TToolButton
      Left = 115
      Top = 2
      Width = 8
      Caption = 'ToolButton4'
      ImageIndex = 3
      Style = tbsSeparator
    end
    object TB_Win_Cascade: TToolButton
      Left = 123
      Top = 2
      Action = WindowCascade1
      ParentShowHint = False
      ShowHint = True
    end
    object TB_Win_Hor: TToolButton
      Left = 146
      Top = 2
      Action = WindowTileHorizontal1
      ParentShowHint = False
      ShowHint = True
    end
    object TB_Win_Ver: TToolButton
      Left = 169
      Top = 2
      Action = WindowTileVertical1
      ParentShowHint = False
      ShowHint = True
    end
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 288
    Width = 445
    Height = 19
    Panels = <
      item
        Width = 300
      end
      item
        Width = 50
      end>
    SimplePanel = False
  end
  object MainMenu1: TMainMenu
    Images = ImageList1
    Left = 32
    Top = 136
    object M_Client: TMenuItem
      Caption = #23458#25143#31649#29702'(&M)'
      Hint = 'File related commands'
      object M_Cli_Input: TMenuItem
        Caption = #23458#25143#36755#20837'(&I)'
        ImageIndex = 0
        ShortCut = 16457
        OnClick = M_Cli_InputClick
      end
      object M_Cli_Modify: TMenuItem
        Caption = #23458#25143#20462#25913'(&M)'
        ImageIndex = 1
        ShortCut = 16461
        OnClick = M_Cli_ModifyClick
      end
      object M_Cli_Del: TMenuItem
        Caption = #23458#25143#21024#38500'(&D)'
        ImageIndex = 2
        ShortCut = 16452
        OnClick = M_Cli_DelClick
      end
      object M_Cli_Query: TMenuItem
        Caption = #23458#25143#26597#35810'(&Q)'
        ImageIndex = 3
        ShortCut = 16466
        OnClick = M_Cli_QueryClick
      end
      object M_Separate1: TMenuItem
        Caption = '-'
      end
      object M_Cli_Print: TMenuItem
        Caption = #23458#25143#25171#21360'(&P)'
        ImageIndex = 4
        ShortCut = 16464
        OnClick = M_Cli_PrintClick
      end
    end
    object M_Order: TMenuItem
      Caption = #35746#21333#31649#29702'(&O)'
      object M_Ord_Input: TMenuItem
        Caption = #35746#21333#36755#20837'(&I)'
        OnClick = M_Ord_InputClick
      end
      object M_Ord_Modi: TMenuItem
        Caption = #35746#21333#20462#25913'(&M)'
        OnClick = M_Ord_ModiClick
      end
      object M_Ord_Del: TMenuItem
        Caption = #35746#21333#21024#38500'(&D)'
        OnClick = M_Ord_DelClick
      end
    end
    object M_Rank: TMenuItem
      Caption = #25490#24207'(&R)'
      Hint = 'Edit commands'
      object M_Rank_Code: TMenuItem
        Caption = #25353#32534#21495'(&B)'
        OnClick = M_Rank_CodeClick
      end
      object M_Rand_Com: TMenuItem
        Caption = #25353#20844#21496'(&D)'
        OnClick = M_Rand_ComClick
      end
      object M_Rand_City: TMenuItem
        Caption = #25353#22478#24066'(&C)'
        OnClick = M_Rand_CityClick
      end
    end
    object M_Windows: TMenuItem
      Caption = #31383#21475'(&W)'
      Hint = #35843#25972#31383#21475
      object M_Win_Cascade: TMenuItem