umsgmanager.dfm

适合行业为眼镜业

      Top = 5
      Width = 59
      Height = 40
      Caption = #20851#38381
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
        03333377777777777F333301BBBBBBBB033333773F3333337F3333011BBBBBBB
        0333337F73F333337F33330111BBBBBB0333337F373F33337F333301110BBBBB
        0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB
        0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB
        0333337F337F33337F333301110BBBBB0333337F337FF3337F33330111B0BBBB
        0333337F337733337F333301110BBBBB0333337F337F33337F333301110BBBBB
        0333337F3F7F33337F333301E10BBBBB0333337F7F7F33337F333301EE0BBBBB
        0333337F777FFFFF7F3333000000000003333377777777777333}
      Layout = blGlyphTop
      NumGlyphs = 2
      OnClick = SpeedButton5Click
    end
  end
  object Panel2: TPanel
    Left = 246
    Top = 47
    Width = 478
    Height = 342
    Align = alClient
    BevelInner = bvLowered
    BevelOuter = bvSpace
    Color = clInactiveCaption
    TabOrder = 1
    object wwDBGrid2: TwwDBGrid
      Left = 2
      Top = 2
      Width = 474
      Height = 338
      LineStyle = gls3D
      ControlType.Strings = (
        'Orders;CustomEdit;wwExpandButton1;F'
        'Company;URL-Link;Company'
        'State;CustomEdit;wwDBEdit2;F')
      Selected.Strings = (
        'lmno'#9'14'#9#26639#30446#32534#21495#9'F'
        'memo'#9'37'#9#20855#20307#20869#23481#9'F'
        'date'#9'17'#9#21457#24067#26085#26399#9'F')
      IniAttributes.FileName = 'm:\ip2001\temp.ini'
      IniAttributes.Delimiter = ';;'
      TitleColor = clBtnFace
      FixedCols = 0
      ShowHorzScrollBar = False
      Align = alClient
      Color = clInfoBk
      DataSource = dsdata
      Options = [dgEditing, dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit, dgWordWrap]
      ReadOnly = True
      TabOrder = 0
      TitleAlignment = taCenter
      TitleFont.Charset = GB2312_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -13
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
      TitleLines = 1
      TitleButtons = False
      UseTFields = False
      LineColors.HighlightColor = clHighlightText
      PaintOptions.BackgroundBitmap.Data = {
        07544269746D617056020000424D560200000000000076000000280000001E00
        00001E0000000100040000000000E0010000C40E0000C40E0000100000000000
        0000D9EEEE00C7E0E000EBFEFE00C6DFDF00B3D0D000EDFFFF00DAEFEF00B2CF
        CF00A1C0C000FFFFFF0000000000000000000000000000000000000000000000
        0000600111111111111333111116660110000001111110011111331111100011
        3000600001110601111111110000011331000000000000011111111000000011
        1100600000001100001111111006001111000000001111166600001111126011
        1000111001160006666666014411060011001100601000006666660111110001
        3300110666000000006662260001001111000000000000000006622226611111
        1000000111100011000662222260111106000601111000010006662222620113
        1100660111060000000600062662611111000601106660000000011066026111
        0600660000060100001062662262201102000600000600000000626622626011
        0200600006666000000062662262601102000066666666011000066622660011
        0600266622266001100000666660001006002226222660011100100000000000
        6600200666660000113131000000000662000000000601100341330011000066
        2200000006600000134000011111106626000000000111111111111111310066
        6600000001144333111331111110066600001000000114311113100000100060
        0000310066661410001111000000000001003110022201302011111111100000
        1100111002220000000011333110000000000010022222013100011310022000
        0000}
      PaintOptions.AlternatingRowColor = 12320251
      PaintOptions.BackgroundOptions = [coFillDataCells, coBlendFixedRow, coBlendFixedColumn, coBlendAlternatingRow]
    end
  end
  object Panel1: TPanel
    Left = 0
    Top = 47
    Width = 246
    Height = 342
    Align = alLeft
    BevelInner = bvLowered
    BevelOuter = bvLowered
    Color = clBtnShadow
    TabOrder = 2
    object wwdbgrid1: TwwDBGrid
      Left = 2
      Top = 2
      Width = 242
      Height = 338
      LineStyle = gls3D
      ControlType.Strings = (
        'Orders;CustomEdit;wwExpandButton1;F'
        'Company;URL-Link;Company'
        'State;CustomEdit;wwDBEdit2;F')
      Selected.Strings = (
        'lmno'#9'10'#9#26639#30446#32534#21495#9'F'
        'lmname'#9'20'#9#26639#30446#21517#31216#9'F')
      IniAttributes.FileName = 'm:\ip2001\temp.ini'
      IniAttributes.Delimiter = ';;'
      TitleColor = clBtnFace
      FixedCols = 0
      ShowHorzScrollBar = False
      Align = alClient
      Color = clInfoBk
      DataSource = dsview
      Options = [dgEditing, dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit, dgWordWrap]
      ReadOnly = True
      TabOrder = 0
      TitleAlignment = taCenter
      TitleFont.Charset = GB2312_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -13
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
      TitleLines = 1
      TitleButtons = False
      UseTFields = False
      LineColors.HighlightColor = clHighlightText
      OnDblClick = wwdbgrid1DblClick
      PaintOptions.BackgroundBitmap.Data = {
        07544269746D617056020000424D560200000000000076000000280000001E00
        00001E0000000100040000000000E0010000C40E0000C40E0000100000000000
        0000D9EEEE00C7E0E000EBFEFE00C6DFDF00B3D0D000EDFFFF00DAEFEF00B2CF
        CF00A1C0C000FFFFFF0000000000000000000000000000000000000000000000
        0000600111111111111333111116660110000001111110011111331111100011
        3000600001110601111111110000011331000000000000011111111000000011
        1100600000001100001111111006001111000000001111166600001111126011
        1000111001160006666666014411060011001100601000006666660111110001
        3300110666000000006662260001001111000000000000000006622226611111
        1000000111100011000662222260111106000601111000010006662222620113
        1100660111060000000600062662611111000601106660000000011066026111
        0600660000060100001062662262201102000600000600000000626622626011
        0200600006666000000062662262601102000066666666011000066622660011
        0600266622266001100000666660001006002226222660011100100000000000
        6600200666660000113131000000000662000000000601100341330011000066
        2200000006600000134000011111106626000000000111111111111111310066
        6600000001144333111331111110066600001000000114311113100000100060
        0000310066661410001111000000000001003110022201302011111111100000
        1100111002220000000011333110000000000010022222013100011310022000
        0000}
      PaintOptions.AlternatingRowColor = 12320251
      PaintOptions.BackgroundOptions = [coFillDataCells, coBlendFixedRow, coBlendFixedColumn, coBlendAlternatingRow]
    end
  end
  object dsview: TDataSource
    DataSet = cdsmanager
    Left = 200
    Top = 56
  end
  object dsdata: TDataSource
    DataSet = Cdsview
    Left = 280
    Top = 48
  end
  object cdsmanager: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 496
    Top = 16
  end
  object Cdsview: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 584
    Top = 16
  end
end