frmdbftagp.~dfm

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

inherited FrmDsDbfTag: TFrmDsDbfTag
  Left = 233
  Top = 352
  Caption = #31243#24207#27169#22359#35828#26126#20070#20316#19994
  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 = #31243#24207#27169#22359#35828#26126#20070#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 = #31243#24207#27169#22359#35828#26126#20070#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 = #27169#22359#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 = #27169#22359#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 = #27169#22359#31867#21035
    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 = 3
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -16
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = 'fid'
        Title.Caption = #27169#22359#20195#21495
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'fname'
        Title.Caption = #27169#22359#21517#31216
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'fnote'
        Title.Caption = #31867#21035
        Visible = True
      end>
  end
  object Edit3: TEdit [11]
    Left = 103
    Top = 145
    Width = 138
    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
  end
  object PopupMenu1: TPopupMenu
    Images = FrmMain.ImageList1
    Left = 536
    Top = 144
    object MenuItem1: TMenuItem
      Caption = #26032#22686'/'#20445#23384
      ImageIndex = 0
      ShortCut = 113
      OnClick = popnewClick
    end
    object MenuItem2: TMenuItem
      Caption = #32534#36753'/'#21462#28040
      ImageIndex = 1
      ShortCut = 114
      OnClick = popeditClick
    end
    object MenuItem3: TMenuItem
      Caption = #21024#38500
      ImageIndex = 2
      ShortCut = 115
      OnClick = popdelClick
    end
    object MenuItem4: TMenuItem
      Caption = #25554#20837#19968#31508
      ImageIndex = 3
      ShortCut = 45
      OnClick = popinsertClick
    end
    object MenuItem5: TMenuItem
      Caption = #21024#38500#19968#31508
      ImageIndex = 15
      ShortCut = 46
      Visible = False
      OnClick = popsubdelClick
    end
    object MenuItem6: TMenuItem
      Caption = '-'
    end
    object MenuItem7: TMenuItem
      Caption = #25171#21360
      ImageIndex = 4
      ShortCut = 117
      OnClick = popprintClick
    end
    object MenuItem8: TMenuItem
      Caption = #26597#25214
      ImageIndex = 5
      ShortCut = 118
      OnClick = popfindClick
    end
    object MenuItem9: TMenuItem
      Caption = '-'
    end
    object MenuItem10: TMenuItem
      Caption = #26368#21069#31508
      ImageIndex = 6
      ShortCut = 120
      OnClick = poptopClick
    end
    object MenuItem11: TMenuItem
      Caption = #19978#19968#31508
      ImageIndex = 7
      ShortCut = 121
      OnClick = popbackClick
    end
    object MenuItem12: TMenuItem
      Caption = #19979#19968#31508
      ImageIndex = 8
      ShortCut = 122
      OnClick = popnextClick
    end
    object MenuItem13: TMenuItem
      Caption = #26368#26411#31508
      SubMenuImages = FrmMain.ImageList1
      ImageIndex = 9
      ShortCut = 123
      OnClick = poplastClick
    end
    object MenuItem14: TMenuItem
      Caption = '-'
    end
    object MenuItem15: TMenuItem
      Caption = #30830#35748'/'#21453#30830#35748
      ImageIndex = 10
      ShortCut = 119
    end
    object MenuItem16: TMenuItem
      Caption = #36864#20986
      ImageIndex = 11
      OnClick = popquitClick
    end
  end
  object ADOQ_DsDbfTag: TADOQuery
    Connection = DataM1.Adoc
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'Select * From DsDbfTag ')
    Left = 400
    Top = 56
    object ADOQ_DsDbfTagfid: TWideStringField
      FieldName = 'fid'
    end
    object ADOQ_DsDbfTagfname: TWideStringField
      FieldName = 'fname'
      Size = 30
    end
    object ADOQ_DsDbfTagfnote: TWideStringField
      FieldName = 'fnote'
    end
  end
  object DataSource1: TDataSource
    DataSet = ADOQ_DsDbfTag
    Left = 456
    Top = 72
  end
end