qyda1.dfm

思微POS连锁超市管理系统 (商业代码),几年前的东西了

object qyda: Tqyda
  Left = 156
  Top = 131
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = '企业档案'
  ClientHeight = 331
  ClientWidth = 442
  Color = clBtnFace
  DefaultMonitor = dmMainForm
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = '宋体'
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Position = poMainFormCenter
  Visible = True
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 12
  object Label1: TLabel
    Left = 41
    Top = 54
    Width = 60
    Height = 12
    Caption = '企业代号：'
    Color = clOlive
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    ParentColor = False
    ParentFont = False
    Transparent = True
  end
  object Label2: TLabel
    Left = 41
    Top = 87
    Width = 60
    Height = 12
    Caption = '企业名称：'
    Color = clOlive
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    ParentColor = False
    ParentFont = False
    Transparent = True
  end
  object Label3: TLabel
    Left = 41
    Top = 121
    Width = 60
    Height = 12
    Caption = '地    址：'
    Color = clOlive
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    ParentColor = False
    ParentFont = False
    Transparent = True
  end
  object Label4: TLabel
    Left = 41
    Top = 154
    Width = 60
    Height = 12
    Caption = '联系电话：'
    Color = clOlive
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    ParentColor = False
    ParentFont = False
    Transparent = True
  end
  object Label5: TLabel
    Left = 41
    Top = 187
    Width = 60
    Height = 12
    Caption = '传    真：'
    Color = clOlive
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    ParentColor = False
    ParentFont = False
    Transparent = True
  end
  object Label6: TLabel
    Left = 41
    Top = 221
    Width = 60
    Height = 12
    Caption = '联 系 人：'
    Color = clOlive
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    ParentColor = False
    ParentFont = False
    Transparent = True
  end
  object Label7: TLabel
    Left = 41
    Top = 254
    Width = 60
    Height = 12
    Caption = '备    注：'
    Color = clOlive
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    ParentColor = False
    ParentFont = False
    Transparent = True
  end
  object Label8: TLabel
    Left = 178
    Top = 18
    Width = 85
    Height = 19
    Caption = '企业档案'
    Font.Charset = GB2312_CHARSET
    Font.Color = 10642477
    Font.Height = -19
    Font.Name = '楷体_GB2312'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label10: TLabel
    Left = 42
    Top = 54
    Width = 60
    Height = 12
    Caption = '企业代号：'
    Color = clOlive
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    ParentColor = False
    ParentFont = False
    Transparent = True
  end
  object Label11: TLabel
    Left = 42
    Top = 87
    Width = 60
    Height = 12
    Caption = '企业名称：'
    Color = clOlive
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    ParentColor = False
    ParentFont = False
    Transparent = True
  end
  object Label12: TLabel
    Left = 42
    Top = 121
    Width = 60
    Height = 12
    Caption = '地    址：'
    Color = clOlive
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    ParentColor = False
    ParentFont = False
    Transparent = True
  end
  object Label13: TLabel
    Left = 42
    Top = 154
    Width = 60
    Height = 12
    Caption = '联系电话：'
    Color = clOlive
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    ParentColor = False
    ParentFont = False
    Transparent = True
  end
  object Label14: TLabel
    Left = 42
    Top = 187
    Width = 60
    Height = 12
    Caption = '传    真：'
    Color = clOlive
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    ParentColor = False
    ParentFont = False
    Transparent = True
  end
  object Label15: TLabel
    Left = 42
    Top = 221
    Width = 60
    Height = 12
    Caption = '联 系 人：'
    Color = clOlive
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    ParentColor = False
    ParentFont = False
    Transparent = True
  end
  object Label16: TLabel
    Left = 42
    Top = 254
    Width = 60
    Height = 12
    Caption = '备    注：'
    Color = clOlive
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    ParentColor = False
    ParentFont = False
    Transparent = True
  end
  object Bevel1: TBevel
    Left = 24
    Top = 40
    Width = 401
    Height = 237
  end
  object Bevel2: TBevel
    Left = 192
    Top = 281
    Width = 233
    Height = 48
  end
  object wwDBNavigator1: TwwDBNavigator
    Left = 202
    Top = 287
    Width = 217
    Height = 38
    AutosizeStyle = asSizeNavButtons
    DataSource = DataSource1
    Flat = False
    ImageList = ImageList1
    RepeatInterval.InitialDelay = 500
    RepeatInterval.Interval = 100
    object wwDBNavigator1Post: TwwNavButton
      Left = 0
      Top = 0
      Width = 73
      Height = 38
      Hint = 'Post changes of current record'
      ImageIndex = 2
      NumGlyphs = 2
      ShowText = True
      Spacing = 4
      Transparent = False
      Caption = '保存&S'
      Enabled = False
      DisabledTextColors.ShadeColor = clGray
      DisabledTextColors.HighlightColor = clBtnHighlight
      Index = 0
      Style = nbsPost
    end
    object wwDBNavigator1Cancel: TwwNavButton
      Left = 73
      Top = 0
      Width = 72
      Height = 38
      Hint = 'Cancel changes made to current record'
      ImageIndex = 4
      NumGlyphs = 2
      ShowText = True
      Spacing = 4
      Transparent = False
      Caption = '取消&C'
      Enabled = False
      DisabledTextColors.ShadeColor = clGray
      DisabledTextColors.HighlightColor = clBtnHighlight
      Index = 1
      Style = nbsCancel
    end
    object wwDBNavigator1Button2: TwwNavButton
      Left = 145
      Top = 0
      Width = 72
      Height = 38
      ImageIndex = 0
      NumGlyphs = 1
      ShowText = True
      Spacing = 4
      Transparent = False
      Caption = '退出&X'
      DisabledTextColors.ShadeColor = clGray
      DisabledTextColors.HighlightColor = clBtnHighlight
      OnClick = wwDBNavigator1Button2Click
      Index = 2
      Style = nbsCustom
    end
  end
  object dxDBEdit1: TdxDBEdit
    Left = 104
    Top = 48
    Width = 305
    Color = 15524050
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    Style.BorderColor = clNavy
    Style.BorderStyle = xbsSingle
    Style.ButtonStyle = btsDefault
    Style.Edges = [edgLeft, edgTop, edgRight, edgBottom]
    Style.HotTrack = False
    Style.Shadow = True
    TabOrder = 1
    OnKeyDown = dxDBEdit1KeyDown
    DataField = 'code'
    DataSource = DataSource1
  end
  object dxDBEdit2: TdxDBEdit
    Left = 104