admin.dfm

1. 纯粹的合同管理,不涉及其它业务,独立成系统2. 简单明了,流程清析3. 合同条款可预定制4. 丰富强大的打印预览系统5. 实用的导入导出功能,可与excel交互使用6. 时刻追踪合同执行情况,包

inherited AdminForm: TAdminForm
  Left = 36
  Top = 100
  Caption = #31649#29702#21592#31649#29702
  ClientWidth = 664
  OnResize = FormResize
  PixelsPerInch = 96
  TextHeight = 12
  inherited palUp: TPanel
    Width = 664
    inherited palRightUp: TPanel
      Left = 569
    end
    inherited palUpMid: TPanel
      Width = 489
      inherited imgCaption: TImage
        Width = 489
      end
      inherited CoolBarMenu: TCoolBar
        Width = 489
        Bands = <
          item
            Control = ToolBarMenu
            ImageIndex = -1
            MinHeight = 23
            Width = 489
          end>
        inherited ToolBarMenu: TToolBar
          Width = 485
        end
      end
    end
  end
  inherited palDown: TPanel
    Width = 664
    inherited imgRightDown: TImage
      Left = 654
    end
    inherited imgDownMin: TImage
      Width = 644
    end
  end
  inherited palRight: TPanel
    Left = 649
  end
  inherited palClient: TPanel
    Width = 639
    inherited BStatusBar: TStatusBar
      Width = 639
      Panels = <
        item
          Width = 300
        end
        item
          Alignment = taCenter
          Bevel = pbNone
          Text = #20849#26377#31649#29702#21592#20154#25968
          Width = 100
        end
        item
          Alignment = taCenter
          Width = 50
        end
        item
          Alignment = taCenter
          Bevel = pbNone
          Text = #26426#25151#31649#29702#31995#32479'1.0'
          Width = 100
        end
        item
          Bevel = pbNone
          Width = 50
        end>
    end
    inherited BDBGrid: TDBGrid
      Width = 639
      DataSource = DM.DSAdminList
      Columns = <
        item
          Expanded = False
          FieldName = 'adLoginName'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'adName'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'adSex'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'popedom'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'sysSetup'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'fillTime'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'award'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'online'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'member'
          Visible = True
        end>
    end
    inherited palToolbar: TPanel
      Width = 639
      inherited tiHelp: TTradeImg
        Visible = False
      end
      inherited tiPrint: TTradeImg
        Visible = False
      end
      inherited tiLocate: TTradeImg
        Visible = False
      end
      inherited LabelBtn8: TLabelBtn
        Visible = False
      end
      inherited LabelBtn9: TLabelBtn
        Visible = False
      end
      inherited LabelBtn10: TLabelBtn
        Visible = False
      end
    end
  end
  inherited BActionList1: TActionList
    inherited DataSetDelete1: TDataSetDelete
      OnExecute = DataSetDelete1Execute
    end
    inherited DataSetInsert1: TDataSetInsert
      OnExecute = DataSetInsert1Execute
    end
    inherited DataSetEdit1: TDataSetEdit
      OnExecute = DataSetEdit1Execute
    end
  end
end