frmdsdeptp.~dfm

进销存管理系统包含开题报告、无错程序源代码、无个性标记的可执行程序、院优毕业论文、PPT答辩资料等

inherited FrmDsDept: TFrmDsDept
  Left = 183
  Top = 198
  Caption = #37096#38376#36164#26009#32500#25252#20316#19994
  ClientHeight = 339
  ClientWidth = 545
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 13
  object Img1: TImage [0]
    Left = -73
    Top = -72
    Width = 618
    Height = 425
    PopupMenu = FrmBaseForm.PopM1
    Stretch = True
  end
  object Label1: TLabel [1]
    Left = 16
    Top = 10
    Width = 273
    Height = 27
    AutoSize = False
    Caption = #37096#38376#36164#26009#32500#25252#20316#19994
    Font.Charset = GB2312_CHARSET
    Font.Color = clWhite
    Font.Height = -29
    Font.Name = #21326#25991#34892#26999
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object Label2: TLabel [2]
    Left = 18
    Top = 10
    Width = 272
    Height = 27
    AutoSize = False
    Caption = #37096#38376#36164#26009#32500#25252#20316#19994
    Font.Charset = GB2312_CHARSET
    Font.Color = clTeal
    Font.Height = -29
    Font.Name = #21326#25991#34892#26999
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object Shape1: TShape [3]
    Left = -56
    Top = 41
    Width = 605
    Height = 2
    Pen.Width = 2
  end
  object Shape2: TShape [4]
    Left = -52
    Top = 44
    Width = 601
    Height = 1
    Pen.Color = clWindow
  end
  object Label3: TLabel [5]
    Left = 16
    Top = 66
    Width = 89
    Height = 25
    AutoSize = False
    Caption = #37096#38376#20195#21495
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    Transparent = True
  end
  object Label4: TLabel [6]
    Left = 16
    Top = 103
    Width = 81
    Height = 26
    AutoSize = False
    Caption = #37096#38376#21517#31216
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    Transparent = True
  end
  object Label6: TLabel [7]
    Left = 16
    Top = 149
    Width = 81
    Height = 24
    AutoSize = False
    Caption = #36127'   '#36131'  '#20154
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    PopupMenu = FrmBaseForm.PopM1
    Transparent = True
  end
  object Edit1: TEdit [8]
    Left = 104
    Top = 62
    Width = 161
    Height = 28
    Color = cl3DLight
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ImeName = #33521#25976
    ParentFont = False
    PopupMenu = FrmBaseForm.PopM1
    ReadOnly = True
    TabOrder = 0
  end
  object Edit2: TEdit [9]
    Left = 103
    Top = 101
    Width = 290
    Height = 28
    Color = cl3DLight
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ImeName = #33521#25976
    ParentFont = False
    PopupMenu = FrmBaseForm.PopM1
    ReadOnly = True
    TabOrder = 1
  end
  object dg1: TDBGrid [10]
    Left = 8
    Top = 192
    Width = 523
    Height = 145
    DataSource = DataSource1
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ImeName = #33521#25976
    Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
    ParentFont = False
    ReadOnly = True
    TabOrder = 4
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -16
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    OnDrawColumnCell = dg1DrawColumnCell
    Columns = <
      item
        Expanded = False
        FieldName = 'fid'
        Title.Caption = #37096#38376#20195#21495
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'fname'
        Title.Caption = #37096#38376#21517#31216
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'fleader'
        Title.Caption = #36127#36131#20154
        Visible = True
      end>
  end
  object Edit3: TEdit [11]
    Left = 103
    Top = 145
    Width = 82
    Height = 28
    Color = cl3DLight
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ImeName = #33521#25976
    ParentFont = False
    PopupMenu = FrmBaseForm.PopM1
    ReadOnly = True
    TabOrder = 2
    OnExit = Edit3Exit
  end
  object Edit4: TEdit [12]
    Left = 191
    Top = 145
    Width = 130
    Height = 28
    Color = cl3DLight
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ImeName = #33521#25976
    ParentFont = False
    PopupMenu = FrmBaseForm.PopM1
    ReadOnly = True
    TabOrder = 3
  end
  object ADOQ_DsDept: TADOQuery
    Connection = DataM1.Adoc
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'Select * From DsDept')
    Left = 400
    Top = 56
  end
  object DataSource1: TDataSource
    DataSet = ADOQ_DsDept
    Left = 456
    Top = 72
  end
  object ADOQ_DsUser: TADOQuery
    Connection = DataM1.Adoc
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'Select * From DsUser')
    Left = 408
    Top = 104
  end
end